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SWITC H 

SWITCH T05'^" DOUBLE DENSITY 



^l^KDtmblei* S/s 




FEATURES 



6- and 8-inch" disk drives 

Single- & double-deniity 

Any lize and density in any mix 

R«ad Model I. H* and III disks 

6- or 8-inch* system disk 

Single & double sided disk drives 

DOS+ 3.3.9 included, with Disk 

BASIC. 

6 month warranty 

Up to 3.75 megabytes online 

Eaay inttallation - plug-in & run 

Analog phase lock loop data 

separation 

PMdsinn write precompensation 

Ragulated power supply 

Guaranteed operation at 4MHz 

All contactH frnld plated 

Solder ma&ked & »ilk screened 

Run* under IX)S^ :t.3.9. TRSDOS 

2.3,NEWDOS 2.1. NEWDOS/SO 

1.0. LDOS.NEWDOS/80 2.0, 

and ULTRADOS 

Reads 40- and 36-track diska on 
80- track drivee 

FD1791 controller + your FD1771 
Pits Model 1 expansion interfaces 
Fits LNW expansion interfaces 
Track cunrifCuration& to 80 track* 
o inch disk storage increaned to: 
161.280 byte* - 36-track SS/DU 
322.660 byte» ~ 35-Uack DS/DD 
184.320 bytes - 40.track SS/DD 
368.640 l^es - 40-track DS/DD 
388340 bytes - 60-track SS/DD 
737.280 bytes - 80-track DS/DD 
8 inch disk storage increased to: 



591.360 bytes - 77track SS/DD 
1.182.720 bytes - 77-tr8ck DS/DD 
S5: iingle-sided DS: double-sided 
SD: single -density DD: double-density 

COMPLETE - The L.\ Doubter 5/8, 
switches your Model I or LNW-80 
into the most versatile computer you 
can own. The LNDoubler's switch 
allows you U> boot from 5- or 8-inch 
system diska, and it's accessible Trom 
outaide the interface. The LNDoubler 
his comes with a double -density disk 
operating »>'Btem (DOS* 3.3.9). 
complete with BASIC and utility 
proftrams . . ready to run your 
software NOW! 

VERSATILE - Whether you want 

Hinftle sided, double-sided, single- or 
double-density, 5- or ^inch operation, 
complete versatility is here today! 
Any combination of 5- and 8-inch di^k 
storage is possible with the 
LNDoubler 5/8. Each uf your present 
40track, single-sided .%-inch drives 
will store up to 184.320 byt«a 
(formatted storage) - that's an 80'^ 
inrrea«e in storage rapacity for only 
half the cotit of ju»t one diisk drive 
With three Sinch double-density, 
douhle-sided drives your Model I will 
have 3.75 Megabytes of online storage 
that's more fitorage than n Model 11 
or Model IIT' 

ADVANCED - The LNDoubler 5/B 
is the most technically advanced. 
tested and reliable dfHiblo-density 



board you can buy. The LNDoubler 
5/8 has more features, more options 
and more software support than any 
other product of its kind. 

EASY TO INSTALL - The 

LNDoubler 5/8 a easy to install. 
There are no traces to cut. no wiring 
to do, just a acrewdriver artd a few 
minutea of your time is all thai is 
required. The instructions are fully 
illustrated for all interfaces. In 
minutes you will be 'up- and -running'. 
and enjoying >-our computer as never 
before. 

COMPARE - Compare features, 
compare quality, compare value, and 
make the SWITCH today! 

inmedlate delivery from alock - at 
your daaler NOW ff>r only 



219.95 



DRALERS - You too ran 
make The Swiuh. 
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Percom's DOUBLERIl tolerates wide variations in media, drives 



GARLAND, TEXAS — May U. mi — 
iLirold Mauch. prrMiient o» IVtcom Daia 
Compjttv. .iDnmincrJ here (odav that jn im- 
pfovcU vcikion of the CMnpanv ' iniia\'utlvc 
IX)UBLIJI'' aJaprer, a AwHf -»icn*tr>* plug-in 
module fur TRS-80' M(»icl I computrr*. U 
ihjw iivmldblc. 

RctlccTinc Jcsicn refinements hateJ on boch 
theorcTicnt an>ilv)^?* >nd Hrld rcftins, the 
LXK'BLER II". v> nitmoj, pcrmu* even Rrrjt- 
cr tolerance in vjtiittiunt lunung mcdid aiiJ 
Jnvcs than the fnvvicMB dcsiKn. 

Uke the oriipnal LXXBLBR. che IX^U 
BLbR tl plup mio the Jnvv cijncrullcr IC 
■rocket ()f A Tr.S-dO MiiJcl I ExpiinMon Inter- 
nee and pcrmiti a u«ct ro njn nrhrr tiniflc- or 
di^uble-Jeruir)' ditkelle» on a MoJrl I. 

With .. LX>UBLER II ln>tiilleU, lAxr four 
timet nkne i(*rmAiieJ data — a« much at 364 
Kbytes — can be wirctl tm one nklc trf » five- 
irwn diskette than can he «iorrd minn a st-in- 
d.utl Tandy Miidel I drive system. 

Mtirefver, a DOUBLER II equips j KK)del I 
wtth the hardw-,irc rntutred to nin Model III 
dukenes- 

(£d Note: See •"OS-80"Brid(£inK the TRS- 
80* loftware competlNUt^- gtf'" elsewhere tm 
thitpaiBC-) 

The critical ck>ck-d»ta icpanituHi circuitT\ 
of the LXX'BLER II i» a proprietarv desiitn 
called a ROM-progrAmmed digital phase- lock 
liMjp iLita separator 

Accordintt to Mjuch, this Jc^iitn a more 
tolerant of Jificrerweifntm diskette todiskene 
and <lrive to Jrivr, arul al»i) pntviJes immiimrv 
Tu pctiormatKC dcfCTiidation caused K circuit 
componcnr aitin|{. 



PcKom LK)UBLbK 



Mauch Mid "A DCXJBLER II will operate 
]uM » reliaHy ivm* yeart nfter it i* itutalled at it 
will two d-avs after itutallation." 

The difiiTal pl|jae-l(ick loop aho climituites 
the need tor tnmtncr ikljusTmcnt;- r>pitjl ik 
iiinaliit: phase-lock Uxip ctrctiiti>. 

■You pluK in A Ptftom IXJUBLER II and 
then furaet it." he Mid 

The DOL'BLER II n\M^ fcamres a refined 
Write Precot:»pen»atttin circuit that more 
etiectivcly minimi:c» the nlienomcnn of bit- 
and peak- shitting, .1 relinhtliTY'impaitins char- 
acteristic (4 ni-iKnetii djt.i rciordinj{ 

The DOL'BLER II. which i> ftdli wirwart 
compatible with the rreviou* IXJUBLER. n 
tupplied with DBLlKlS". a TRSDOS*- 
tompatihle disk opvr^tinE -iVftteiit 

The LXJUBLER II >cIK K.r i^h^'y ■' ■ lad- 
ing tlie DBLIX> d.sK.-tr,._ ^^-^i^ll^^! 
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Circuit misapplication causes diskette read, format problems. 

High resolution key to reliable data separation 



GARLAND, TEXAS — The Pcrcom 
SEPAR-ATOR" Aw* very *ell fi* the Radio 
Shack TRS-SO* Model I c**rp«tcT what the 
Tand\ disk ci«itroller doe* pooiriy at he*c; rtb- 
J?N tcpjrdtcs clock and data signalt durini; 
JisK-read operaTiimi. 

Unretishle data-clock teparatKm caiuc» fvr- 
mat vtfrJiC4iu»n tailures and tcpealed read 
[yCTic? 

CRC HRROR -TRACK LOCKED OUT 

TlKirtoblcm isnK>»t severe on high-number 
Ihitcti-Jcnsity) inner file tracks. 

Aa terutted earlier, the ck^ck-data .*epara- 
tion prioicm w<» traced by Percom to miutv 
plicaiion of the tntcmal sepdiator ol the 17/1 
drive cnnmjllcr IC u!kcd in the Model I. 

The Percom Separator substitutes a fiig/i- 

TtMiiuliun diifiial <klii separator circuit, one 

n*hich operate* at 16 meR-iherri, for the low- 

rr*iJatk»n one-megaherr: circuit ol rhe Taivly 

I dcii^L 

Separator citcuiu thai operate at lower 
frcqiiencic- — tor example, rwo- or f.Hir- 



megaheni — were finind b>' Percom to pntvidc 
only marginallv improved performarwe over 
the oriKiruil Tai^y circuit. 

The Pcrcttm toturitm L* a simple adapter that 

flugs into the drive conmillcr of the Expjmion 
ntctf-itc tEl). 

Not a kit — tome vcndon Nupfly an un- 
te*ted scpjirator kit of resi*tt»rs, ICs .ind i>ther 
par,iplicrnalia that m.»y he imt.illed hv mod- 
ifving the computer — the Percinn 
SEPARATOR i.* a lully .wscmhjcd. fully tcurcJ 
plug-in mtiilule. 

lrutalIaiiL>n involvn merely plugging the 
SEPAR.ATOR into the Mt^kl I El Jhk t.>n- 
ir("4lcr chip »ocker. and pUij^nnc the ci>nm)ller 
chip into .1 MKket on the SbPAR-ATOR. 

The SEPARATOR, which sells i.k only 
529.95. iiu\ he purchased fr.>f:iduth«ttixd Per- 
com retailers or dtik-red dirccrlv rntm rhc tac- 
t.»rv. Tlie factory toll-tree orcler number is 
I 800 527 1222 

Ed rule C^-ning the TRS-HO Enpaniinn In- 
terface may void the T^mdv limited 90-diiv 
w^rranrv. ^-at 



Owneii of oiiffiiud LOCBLER* may pur- 
chase a DOUBLER 11 upL:r.idc kit, wirhtnit rhc 
ii^lt conrrollcT l(.. ti"* SK\OC Prt-of or pur- 
. Kiise of iin oriiciniil IXHIBLER is required, 
arvJvfu:hlX)UDl,ERov^nc[ nuv purchase only 
ofw EX>UBLER II at the 5K\00 price. 

The Percom IX^l Bl.hR II is avuLiKIc fn>m 
autht)n:eil Perci*ni retailer.', or nin l->c nr^lcird 
direct from the factorv The factory loll-fH*c 
onWr numlx-r i> 1 8(X)-5^7-12^^. 

Ed. t*ite <'>pcninK the TRS-80 ExpanML-n In- 
terrace may void rhc TatvJy limited 90-dav 
warranty _. 



All ih«t Klittcrtt ik nut |{uld 

OS-80 BridKinK the TRS-BO* 

ftoftware compacibilitY gap 

OanpwO'tl.n Mwr«n TRS-lfC' Mtxicl I Jolcttn m>J 
ihc new Mi»k-I III i^ jfriiwt a% airvMnt ji « |^lU-^4»tcd IcJtJ 
)inmtnmi- 

Tfiw. M.xtd 1 TKSIXIS' ditkniocanhi: tmJxtK Mikirl 
111. Put tint !hct mmt W (in^ntnl *nd w-trciwJnl tin 
Mt-icl 111 .•prrtfMin 

AnJ pAj canrut u-ntt 1,. ■ M.Jtl I TRSHOS'di.keiK 
NkMwiih jMivkMII Y^i,>n»i<{addatilt Dct«tc«tilc Or 
in m\y «m >tii<JllY 4Mi<Jrt 1 'rRS[OSiiakrtu with* MlnJcI 
111 KKTputrr. 

hirihOTiBuic, luutconvcrtnl TRSDOSdiihcttntanniM 
hr cunvfrad kdt far Madd I jfcritiiVi. 

TKSDOSi»«L)n(-wir Hrwi. AnJ thctf inurvticittiiif 
A point i<i<<«ittJnkefci(v nviKhina ihc ccxngum t pavull 
iLik,Hjrr.niM.Jc]|||. 

Rrii ix^Twarv ciiin|<4iil<iltra thu-ulJ jJKm (ht- <inm in- 
ruJuM irtrrcK*r){ea('ilii( d Mi-Jcl I anJ NUxlcl 111 Ji<krt 
Id No mKl4>nlv limUDuf^t. td u>ntCTu;«t/icrtVti(Jtni 
Mcpt HvJ nu ctuncc l-> 1^ left high *nii lirv «nth Mudrt III 
(jukntet tlutf can't ht tun on a Mudd 1. 

WKai'i the ttuwtti THe anntrr ii PcKuRi't OS-W* 
tiniihr (4 THS-^ lU if>c'^'<init *i<i«m 

OS^MiVranualkw JirtK. imniediaK tnutchtntcahiUfV 
.t M.>itl I HtJ VioJrl III .iLikcitrt 

Y<Mi tjn tun Miitkl I un«tc-Oeniiiiv<iiikcitBi]n>Mudel 
III: inM«[l PctLjrt'» p^t-ln DOt'BLER** Mijftcr ir v»vt 
MuJtll. MklvowcanninilMblc-ilcniin MjdclJlltJiskrttn 
vn i MoJci 1. 

TSrre't no tixwcnion, nu tc-TVt»tdln|. 

Si ri .>n (>S-M Jtakcn* «« .4 »u*-i Mi-Jfl I mi (ivten ii 
awcviK T a WoJcl III 

AnJ *kc-\rt»a 

JiMi hivt the cucrcci iX-9C diik i«<ct»ttn« iiru<iii — 
CTS-BC OS-OOncrClS-aClll — ir wcf. tLWlXiMr 

MLVccttt, «>Hh^'^90<t»Trru>, \<ai>..ir *lii. Jrlcic and 
Ufxl^cfile* YiMLTrcaijMJuiiK Jttkvcic* tcsjAilnavllbc 
nUetr ct origin. 

OS-X II i'k crunral Petuwn TKS-rC IKl!» t.* K\>K 
pnifnwTureTi 

Evvfi t>S-lK> iitiLlilci Jir wniun ir ftASK" 

O'y-K » tf»f IVrtiifr 'i*iffn jhinj' iihiih ,i loct wiuu. m 
CicMixe OinBMiuia ni.i»i;ine. . . ilie bcM SM 00 (toj 

will cvn tf«(Kl "t 

Rc^iurg jnh »cvrn KhwPtulnvrttuTv. OS-9C JMt iipef- 
iliniifwtttntrciiirc.inrlcKlvinR.^M T(icT**sniJHffdtii 
Jhlicair » Jrii.r rachiiivrlv liir » n»tW di^knir 

Artd. urliki: TRSIKT^. ,i.)n, tmi «(«l> jr iht rutk »ei-l.i 
le\i-l. JrfL»i»ie*rJii'#itfi>llin«d.n.i\'frn.tu ^tlI^.^J■K- — 
ii> k^nic Mitiptc >H i^nqVo ttitu ilntLiiiitt Ui4l c\ci:ulc 
mxe qiAkK [Iwv TRSDOS tilci. 

TSe FfiC(«i OS-HC IXIS HT?f"" uriile Jcnrity upcM- 
riiiorflhf Mtidil lci«ii«ifef p»i(t i->5;« "JS; th. OS^HCD 
aiCf^ini klik^'iv-iinuiit iifiM-diK<n ^^ MiiJH I unni'ijiott 
.■J..IIT.-J -.th •■ rX'll'Nii* .1 rxX PLEU Ii; ,ir>J. dS-SiV 
III hil^KM^aielllK^LLiune — I'UfrJtbK-di SLTldk- «ii 
ducbk-dintuvitfcrjluin (.V-SlI^ and O^-W-lIl e»ch 
tril M H'* '♦i ^429 
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Ji9 REMARKS 



"Golly, won't anyone do 

anything anymore without 

having to be paid off?" 



Tandy Kisses 

By golly, 80 Microcomputing was 
finally mentioned in the Tandy TRS 
publication. Not a great mention, by any 
means, but a mention. 

The Radio Shack people got consider- 
ably bent out of shape over a recent 80 
subscription ad In which I pointed out the 
savings which could be acrued by buying 
a complete Model III system via mail order 
ads In 80 Instead of paying Radio Shack 
catalog prices. 

Since Radio Shack is a manufacturer, 
distributor and dealer, making money at 
every step of the line, they obviously have 
a vested interest in customers paying full 
list price. Indeed, were I in their position, I 
too would encourage this approach. 

Now, it is a fact that one can cause a 
great deal of expense by breaking the 
computer seal to install cut-rate memory 
chips or some other device Inside the 
computer. Radio Shack service centers 
sock It to those who have trifled with the 
seals when making warranty repairs. I can 
see some justification lor Radio Shack en- 
couraging customers not to fiddle around 
in the computer. 

But when it comes to buying a system 
from a local dealer at full list price, vs buy- 
ing one from a mail order dealer advertised 
In SO {where the warranty is as good as 
gold), I think the Radio Shack complaints 
are unfair. These are the very same com- 
puters, sold at a discount. Indeed, I be- 
lieve the government is adamant In their 
protection of a dealer's right to discount. 

Accessories such as modems, extra 
disk drives, printers, and so forth can all 
be bought by mail order at substantial 
savings, and beefs by Radio Shack about 
this are not only unfair, but should call for 
some serious soul searching at the Tandy 
Towers In Fort Worth. 

The TRS systems do need service, 
make no mistake about that. Just this 
week we've had two Model Is, two Model 
lis, and one Model III go down. None of the 
problems stemmed from accessories, au- 
thorized or unauthorized. 

One of the purposes of 80 is to educate 
the computer user so he will be able to 
cope with minor problems in the system. It 



is of key importance to open up the com- 
puter to make small repairs, rather than 
having to make the trip to a Radio Shack 
storeand wait a week or two for the unit to 
come back. Few of us own so many sys- 
tems that we can function under that sort 
of delay. It is a fact of life that once you 
get used to using your computer even a 
few hours without It are painful. 

It may not be possible to save quite 
$1,000 by buying a Model III through the 
ads in 80 and still retain the factory war- 
rantee, but it is possible to save a bundle. 
I'd be interested in readers estimates of 
what they find as the bottom line price In 
our mall order ads. Make that a Model III 
ASK system with two disk drives, printer 
and modem. ■ 

You Can Help 

Crankly, I'm disappointed in you. Just 
the other day I was in my home town 
and stopped in to visit the Radio Shack 
store there, I asked the manager if he was 
Interested in carrying 80 Microcomputing; 
he said he had heard vaguely about It, but 
had never seen a copy. Now look here, 
how are we going to keep 80 growing so 
we can bring you even more articles and 
programs If you are going to be a lazy, 
thankless, unsupportive reader? I want 
you to shape up. 

When you go into a Radio Shack store I 
expect you to take a few extra minutes 
and show them 80. See that I get the 
business card from the owner of the store, 
complete with a bulk order for at least ten 
copies of 80 per month. There's no way the 
store can lose— we guarantee sale. That 
means if the store is so isolated not even 
ten copies a month can be sold, we'll give 
full credit for the returned copies. 

The Radio Shack store owner will find 
this a nice way to make a little extra profit, 
and also a way to keep customers coming 
In (at least ten of them) every month for 
magazines, thus exposing them to his 
newest electronic gadgets. The magazine 
will also sell more computer equipment 
for him, since we run articles on the latest 
Radio Shack equipment and software. 

The most important value of 80 for the 
Radio Shack store is as documentation 



for the TRS-80. Since most lower cost 
computer systems are fairly equal, the 
really big difference for the TRS-SO is in 
the amount of documentation and pro- 
grams available for it. This Is where 80 
makes the difference, at least doubling 
the value of the system. 

Remember that stores owned by Tandy 
are not permitted to sell or even show a 
copy of 80 in their stores. Most stores get 
one copy and keep it hidden so company 
spies won't see and report it. Alt this 
stems from paranoia on the part of Tandy 
that they might lose a sale of some ac- 
cessory to an 50 advertiser. I suspect they 
are doing everything they can to discour- 
age people from buying computers from 
discount Radio Shacks which advertise In 
80. The law prevents them from stopping 
discounting, so all they can do is try to 
keep the word from getting around. 

This still leaves over 2,500 Radio Shack 
tranchise, associate and other non-Fort 
Worth-owned outlets which should be 
selling 80 Microcomputing. 

Yes, I know, now you want to know 
what's in it for you, other than the satis- 
faction of knowing you've helped a publi- 
cation you like to grow. Okay, you 
mercenary, If you sign up a Radio Shack 
store I'll send you $20 worth of Instant 
Software of your choice. Golly, won't any- 
one do anything nice anymore without 
having to be paid off? Well, we'll eventual- 
ly make money out of the sales, so 1 sup- 
pose sharing the wealth is only fair. Send 
me the business card or purchase order 
from the store with a number for how 
many copies of 80 they'd like per month. 
Let me know what programs you'd like 
and we'll get at it. 

Let's see. . .2,500 stores at ten copies 
each. . .that's 25,000 more circulation. 
That should attact another 40 pages of 
advertising and bring you at least 40 more 
pages of articles and programs per 
month. What will you do when it takes two 
months to read each copy?H 

Second Birthday 

his issue of 80 rounds out two full 

years for the magazine. If there have 

been more successful technical maga- 
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zines In the past, I am unaware of them. 
That the magazine is based on the pro- 
ducts of a single manufacturer maltes it 
even more surprising. 

Does the industry make the magazine 
or does the magazine make the industry? 
A bit of both, really, for where would the 
support industry for TRS computers be 
without a communications medium such 
as SO to bring news of their products to the 
customers? There is no question but that 
a strong magazine is a key element in 
helping an industry to expand. It just can't 
be done without that communication link. 

TRS computers have some powerful ad- 
vantages over others; the parent company 
is the most powerful in the business (or at 
least it was until IBM and Xerox came 
along). The 6,000 store merchandising net- 
work is a tough act for Apple, Com- 
modore, Exidy, 051, Atari, and the others 
to fight. But when you compare the sup- 
port Radio Shack has provided their sys- 
tem with the support coming from several 
hundred smaller firms, you begin to see 
where the real strength of the TRS lies, 
and it is not Radio Shack. 

The Tandy people have been working as 
hard as they can to provide software, and 
they have come up with a few nice pro- 
grams. But their efforts are insignificant 
compared with the host of support firms 
which have run circles around Big Daddy 
(down near Big D). Indeed, without this 
software support from outside firms, and 
SOasthe medium to bring the news of this 
support to customers, it seems likely Ap- 
ple would have overrun Tandy long ago. 

How is it a relatively small publishing 
firm up in the mountains of New Hamp- 
shire has been able to come up with a 
magazine which has grown in two years to 
over 100,000 paid readers (plus about 
150,000 pass-along readers), with over 400 
pages an issue? It's all the more remark- 
able when you know that virtually all the 
work involved is done by our own staff: 
Only the magazine printing and circula- 
tion is handled by outside suppliers. 

My own publishing experience started 
when I was hired as a television director 
for a station in Cleveland, Ohio. The sta- 
tion had a mimeograph machine and I had 
a need to provide communications on the 
subject of amateur radio Teletype. In June 
1951 the first issue of a monthly newslet- 
ter was started. 

This grew to a circulation of over 2,000 
and a regular column in one of the two 
amateur radio magazines. I eventually be- 
came the editor of the ham magazine and, 
five years later, started my own, called 73 
(which means Best Wishes in ham lan- 
guage). 73 Is still going strong. 

In 1975, when the first microcomputer 
was put on the market by Mits, I decided 



to start a microcomputer magazine. I 
talked the Idea over with some of the firms 
advertising in 73 which were also in the 
microcomputer and digital field (such as 
Bill Godbout— one of the pioneers in mi- 
crocomputing, and still a leader there). Bill 
and I got together during the 1975 Dayton 
Hamvention (the big ham event of the 
year) and talked over my ideas. 

During May I contacted the editors of 
several microcomputer club newsletters 
to see if any would like to edit a magazine 
for me. I didn't know beans about comput- 
ers, but I did know a good field for a 
magazine when I saw it. The newsletter 
editors didn't think the Idea would fly, so 
they turned me down, one after the other. 

Eventually I got together with a chap 
named Heimers who was putting out a 
small newsletter in Boston with a circula- 
tion of about 200, concerned mostly with 
building a microcomputer to play the 
game of Lite. He came up to talk, I out- 
lined what I had in mind, and we decided 
to go ahead. 

The next five weeks defy description. I 
wanted a short name for the magazine us- 
ing a popular term in the field. I came up 
with Byte, which was just right. I then had 
to design the letterhead, envelopes, write 
form letters to solicit subscriptions, ar- 
ticles, bulk subscriptions from electronic 
stores, and so on. The type of articles I 
wanted had never been written before, so 
we were starting from scratch. 

I made up lists of 73 Magazine authors 
interested in digital electronics and com- 
puters who might be able to help. I went 
over every computer club newsletter for 
the names and addresses of possible au- 
thors. I contacted every firm even remote- 
ly in the business, asking for leads for ar- 
ticles and for lists of names of possible 
subscribers. 

As the requested articles began to 
come in I devised a completely new four 
column magazine layout, which would 
make Byte look different from any other 
magazine. I had to do much of the rough 
layout and proofing myself, teaching 
others what I wanted. I had to battle with 
Heimers, who wanted to put out an imita- 
tion IEEE technical journal. I wanted a 
magazine for the newcomer to computers, 
with simple articles. 

With the massive help of the 73 staff, 
the first Issue of Byte went to press just 
exactly five weeks after my decision to 
publish. The first issue, dated September 
1975, came off the presses in late July and 
I immediately got on a plane and headed 
out with copies to visit the firms in the in- 
dustry. I wanted to get their support and 
pave the way both for advertising and the 
articles I needed.This trip took me to Mits 
in Albuquerque, Sphere In Salt Lake, 



Southwest Tech in San Antonio, plus 
stops in Dallas, with a visit to Ed Juge in 
Fort Worth, and so forth. 

73 inc. was being harassed by a couple 
of annoying lawsuits, so our company 
lawyer set up a separate corporation for 
publishing Byte and our new books, with 
Virginia holding the stock for me so the 
new magazine would not get dragged in. 

Byte took off, growing rapidly, with ad- 
vertising going from 25 to almost 40 pages 
by the fourth issue. The subscriptions 
poured in too. Then one night I returned 
from addressing a club to find 8yfe had 
been totally removed from the 73 building. 
I was reminded the stock was in someone 
else's name. Virginia, with the help of her 
fiancee and our lawyer, ran the magazine: 
They've done well, eventually selling it to 
McGraw Hill for big bucks. 

I was left with massive debts and a very 
good excuse for a heart attack. I also de- 
veloped a slight distrust of people. Oh 
well, probably the best thing was to get 
started with law suits and a new 
magazine. We all worked doubly hard, 
paid off the bills and were finally in a posi- 
tion to get going with a new publication. 



The Saga Revisited 

To spur the input of articles tor a new 
publication I set up an I/O section for 73 
Magazine. This, in turn, inspired the start- 
ing of I/O magazine in Japan, one of the 
leading Japanese hobby computer maga- 
zines. The I/O section attracted over 20 
pages of microcomputer advertising, 
which gave us a good start toward the 
new magazine. 

Again I made a trip around the country 
visiting firms in the business. I wanted to 
know if I would have support for a new 
magcizine. They encouraged me to go 
ahead, so in August we started selling the 
first subscriptions to Kiiobaud. The first 
issue, dated January 1977, came out in 
November 1976. It started with about 40 
pages of ads and sold so well we had to go 
back and reprint the first issue several 
times to keep up with the demand. 

With the introduction of the TRS-80 in 
late 1977 more and more articles for this 
system came in. By 1979 the TRS articles 
were pushing everything else out of 
Kilobaud Microcomputing and it was time 
to consider a spinoff. 

The circulation and advertising work to 
get SO started were begun in August 1979, 
and the first issue was dated January 
1980 and had over 50 pages of ads. We 
printed 50,000 of the first issue and sold 
out. Two years later, the advertising Is 
around 200 pages and the circulation 
climbing over 100,000 with an estimated 
250,000 readers. 
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META TECHNOLOGIES 

26111 Brush Avenue. Euclid Ohio 44132 

CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



THINGS TO 



PERSONAL COMPIiTERl 

Bf MtRK SAWUSCH 



333 pages $10.95 

333 pages, wrrtten in simple terms, of 
"what -to-do" and "how-to-do- it". Suitable 
not only tor microcomputers, but lor pro- 
grammable calculators as well. Includes 
program listings, formulas, a glossary ol 
computer terms and more! Delimtely a 
MUST BUY! 



"OTHER MYSTERIES" 
VOLUME IV 

"BASIC FASTER 
AND BETTER" 

If you program in BASIC, you want this tiooti! 
Tlmetesled and proven, the techniques and 
routines can be used in thousands ot ways to 
make your programs smaller, taster, and look 
truly professional- Over 280 pages, includes 
hundreds of routine listings, sample programs, 
explains not only ■how-io". but "why" and 
"when." You'll newer need to "'re-mvent the 
wheel ' again! Topics Includes screen and key- 
board handling, searching, sorting, fast string 
manipulation, simple machine-language 
usage, utility programs, and much more! 
BA SIC FASTER & BETTER . , $24.9 5 | 

"OTHER MYSTERIES" 
VOLUME III 

by Dennis Kitsz 

THE CUSTOM TRS-80^" $29.00 

CALL FOR AVAIUBILITY 



MICROPARAPHERNAUA 

NEWDOS by APPARAT 

NEWDOS/aObyAppata! S1 39.95 

NEWDOS UPGRADE CALL 

NEWDOS * wilh ALL UTILITIES 

35track .-.. $69 95 

40 track $79.95 

BOOKS 

TRS 80TM DISK 

AND OTHER MYSTERIES . - $19.95 
MICROSOFTfw BASIC DECODED $24 95 



EPSON 

MX-80. MX-80FT. MX-100 

PRINTERS 

CALL FOR PRICE 
10 FT. RIBBON 

CABLE 

$24^5 

CONNECTS EPSON PRINTER 
& TRS-80 MICROCOMPUTER 



DISK DRIVE 

EXTENDER 
CABLE 

|95 

for VISTA. MICROPOLIS. 
MTI, PERTEC, SHUGART, 

PERCOM & OTHERS 



Let your TRS-80^'^ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

by David Stambaugh 

A complete checkup lor your MODEL I or 
MODEL III. THE FLOPPY DOCTOR Version 3 
completely checks every sector ol single or 
double density 35. 40-, 77-, or SO-track disk 
drives. Tests motor speed, head positioning, 
controller functions, status bits and provides 
complete error logging. THE MEMORY 
DIAGNOSTIC checks tor proper writeJread. 
refresh, executability and exclusivity of all ad- 
dress locations. Includes both diagnostics and 
complete inslruclion manual 

SYSTEM DIAGNOSTICS S24.95 
For MODEL in $29.95 



Single SnJed, Soft Sectored S'.-irKh. 
(lor TRS-80^'*} Mini floppy 

DISKETTES 



$19 



95 



box of 10 



TM 



PLAIN JANE 



These are factory fresh, absolutely ttrst 
quality (no seconds') mini-floppies They are 
complete with envelopes, labels and write 
protect tabs in a shrink-wrapped boi. 

PLAIN JANETM Diskettes $19.95 



PLAIN JANP 



M 



','>«/</ 



Introducing MTC's premium generic 
diskette Single-Sided. Soft Sectored, 
DOUBLE-DENSITY, 5' .inch diskettes with 
reinforcing HUB RINGS Individually 100% 
ERROR-FREE certified. Invest in GOLD! 
PLAIN JANETM /,,yy $24.95 

VERBATIMS PREMIUM DISKETTES 



DATALIFE 



Seven data shielding Improvements mean 
greater durability and longer data lite. 
These individually, 100% error-free cer- 
tified diskettes feature thicker oxide 
coating, longer lasting lubricant improved 
liner, superior polishing and more! Meets 
or exceeds IBM. Shugart. ANSI. ECMA 
and ISO standards, 
VERBATIM DATALIFETM DISKETTES 
5'«-inch(t>oxo( 10) 

MD525-01 $26.95 

10 boxes ot 10 (each box)$25 95 

8-inch FLOPPIES 

Double- Density. FD34-8000 . $43.95 



'RINGS' & 
THINGS 

HUB RING KIT tor 5' 4" disks $ 10 95 

HUB RING KIT tor 8" disks $12 95 

REFILLS (50 Hub Rings! $ 5 95 

CLEANING KIT tor 5' ." drives $24 95 

5'/4-inch diskette case $3.50 

8-inch diskette case $3.95 

S'A-lnch File Box tor 

50 diskettes S24.95 

6-inch File Box for 

SOdiskettes 529.95 



Tf)S 80 is a tradenMrh ol the 

Radio SliJcH DivKion ot Tandy 

Corporation DATALIFE ii a 

Uadenurii ol VERBATIM PLAIN 

JANE AIDS I. AIDS III CALCSIII 

CALCSIV MERGE ill ar« 

tradrniarkj dI MTC 

1981 by MctatKhnotoc*! 
CorporaDon. Inc 



MOST ORDERS 

SHIPPED WITHIN 
ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged 



PRICES IN EFFECT 
Dec 1. 1981 THRU 
December 31. 1981. 
Prices, Specifications, 
and Offerings subfCCt to 
change without notk:e. 

8112 



WE ACCEPT 

• VISA 

• MASTER CHARGE 
- CHECKS 

• MONEY ORDERS 

• COD 



•Add S3 % lor shipptng 

&hvKll>ng 
• $300EXTRAfor COD 
•Oh© resxJents add 5' ? ^0 

sales tai ^^ 
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With one of the highest subscription 
renewal rates I've ever seen, 80 Is doing 
well and we're projecting the circulation 
to grow to around 200,000 during 1982. 
How thick the magazine Is going to get Is 
anyone's guess. I Itnow the people at Byte 
are chewing their hangnails as 80 creeps 
up on them. They're even starting to run a 
few articles on the TRS-flO. 

With t>oth magazines In the same town, 
not much happens that we don't hear 
about. Peterborough, by the way, Is a town 
with a population of about 4,500 In the 
mountains of southern New Hampshire. 
The area has attracted Brookstone tools. 



Eastern Mountain Sports, New England 
Business Service, ail major mall order 
firms, and New IHampshire Bali Bearing 
{one of the major miniature ball bearing 
makers) as well as a rash of computer 
magazines. Not bad for a tiny New En- 
gland town. Yes, I'm president of the 
Chamber of Commerce. 

It has been a tussle keeping up with the 
growth of 80 and Instant Software, which 
we started in 1 978. We've had to buy many 
buildings around Peterborough, add offic- 
es, better and faster film processing, more 
typesetting equipment, and so on. Our 
staff has been at>out doubling each year, 




Model II 64K $3395 

284160 1 Drive Exp $1014.00 

26-4161 2 Drive Exp 1559.00 

284162 3 Drive Exp 2099.00 

26-4530 Scripsit II 259.00 

26-4512 Profiie II 159.00 

264511 VisicalcII 259.00 

264501 Gen Ledger 179.00 

264506 Mail List 72.00 



MODEL III 

26-1061 4K I $ 599.00 

26-1062 I6K III 859.00 

26-1066 48K III 

W/2 Drives, RS 232 2225.00 

26-1162 1st Drive 765.00 



IDS PAPER TIGERS 

Dot Resolution Graphics quality print 

IDS 445G 7 wire printhead, graphics (List $ 985) % 795.00 

IDS 460G 9 wire printhead. graphics (List '.0945 886.00 

IDS560G9 wire, wide carriage, graphics. ..(List 1394) 1129.00 



Modell 

26-1140 Expansion Interface $249.00 

26-1141 16K Exp. Interface 359.00 

26-1142 32K Exp. Interface 469.00 

26-1145 RS232C Board 84.00 

26-1160/1 Mini Disk Drive 419.00 

28-1563 Scripsit-Disk 79.00 

26-1566 Visicalc 83.00 



PRINTERS 

26-1 167 94 Line Printer VII .... $ 360.00 

26-1166 Line Printer V! 1080.00 

26-1158 Daisy Wheel II 1798.00 

26-1165 Line Printer V 1710.00 

26-1401 Cable 36.00 



Color Computer 4K $353 

26-3001 4K S353.00 

26^002 16K Ext. Basic 533.00 

26-3009 Joysticks 22.50 

26-3010 Color Video 353.00 

26-1206 Recorder 54.00 

All prices are subject to change without notice. Freight, handling, and 
insurance charges are extra. Most items are shipped United Parcel 
Service. Model II and other hardware weighting over 50 lbs. is ship- 
ped freight collect by truck. Certified Check for immediate shipment 
from stock. Master Charge, Visa or Bank Card add 3't surcharge. 

Vern Street Products 114 West Taft Sapulpa, Ok 74066 
The Computer Store, Inc. 4949 South Peoria Tulsa, Ok 74105 

918-747-9333 



now numbering over 200. 

We're looking forward to the future, and 
have so many irons in the fire we some- 
times have trouble keeping the fire going. 
80 obviously is going to keep growing as 
long as Tandy can stay ahead of IBM and 
Apple. Kilobaud Microcomputing has 
been somewhat neglected in the flurry 
over 80, so it will get a lot more attention 
In 1982. With the combined readership of 
80 and Kilobaud being more than Byte, 
and with the combined advertising rates 
being less, we may see some Increases in 
advertising. 

We're laying the groundwork for five 
more publications. If IBM is Interested 
and develops a user base, we might think 
in terms of something for them. The suc- 
cess of LOAD80 will definitely push us to 
back up more of our published programs 
with machine readable cassettes or disks. 
We're already getting around 5,000 orders 
a month for LOAD60, and the growth is 
strong. The 80 Encyclopedia has also 
caught on well, with orders increasing 
every month. We may look at a simitar 
treatment for some other systems. 

Is there no end to the amount of infor- 
mation needed for the TRS-80? Apparent- 
ly not. The true value of a computer lies In 
the documentation and programs avail- 
able for it, which puts the TRS-80 way 
ahead of everything else on the market. 

We're working toward establishing a 
major educational institution to teach 
electronics and computers. My plans for 
this are being taken more seriously by ed- 
ucational groups and even by groups in 
other countries. 

In line with this, I've been made the 
chairman of an FCC subcommittee to 
work with the commission toward the 
resurgence of American technology 
through the growth of amateur radio. 
We're going to aim at getting amateur 
radio and computers into every high 
school in the country as a way to get 
teenagers Interested in technical careers. 
With amateur radio and computers com- 
ing rapidly together, it will eventually be 
difficult to separate computers and com- 
munications, so this is a fortuitous mar- 
riage. It is a synergism of two fields, both 
of which I have been in for some time and 
understand. 

The day when our computers will be 
communicating with each other via phone 
lines, cables and even satellites is coming 
soon. You may be sure that I will be in 
there pushing for the changes we need, 
and for the people we need to bring about 
these changes in the schools and through 
my magazines. 

You haven't seen anything yet.B 
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META TECHNOLOGIES 

26111 Brush Avenue. Euclid Ohio 44132 

CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



MTCAIDS-III 



MODELS I & III... $69.95 



MODEL II. .$99.95 



Introducing the latest addition to MTC's family of data managemert systems, AIDS-HI. NO 
PROGRAMMING easy to use COMPLETE PACKAGE including demonstration application, 
documentation and MAPS Ml (see below). 

• Up to 20 USER DEFINED FIELDS of eittier numeric- or ctiaracter-type 

• CHARACTER type fields may be any length (total- up to 254 characters), 

• NUMERIC-type fields feature automattc formatting, rounding, decimal alignment and 
validation 

• Full feature EDITING when adding or changing records: 

ENTER FIELD (can'i type in more characters than speciliedi 
BACKSPACE (delete last cHaracter typed] RIGHT JUSTIFY FIELD contents. 

DELETE FIELD contents ■ SKIP FIELD do next or previous field) 

RESTORE FIELD contents ■ SKIP RECORD (to next or previous record) 

• SORTING of records is MACHINE CODE assisted- 

200 RECORDS (40 characters) m about 5 SECONDS 

ANY COMBINATION of fields (including numerics) with eacfi field m ascending or 

descending order 

• SELECTION of records for Loading. Updatmg. Deleting. Printing and Saving is 
MACHINE CODE assisted 

Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS 

LOAD or SAVE selected records using MULTIPLE FILES 

Example Select records representing those people who live in the state of Col 

orado but not in the city of Denver, whose last names begin with "F" 

and whose incomes exceed $9000 00, 
Example Select records representing those sales made to XYZ COMPANY that 

exceed $25 00, between the dates 03/ 15 and 04/10 

MAPS III iMTC AIDS PRINT SUBSYSTEM), included at nocharge. has the following features 

• Full AIDS III SELECTION capabilities 

• Prints user specified fields DOWN THE PAGE 

• Prints user-specified fields in titled columnar REPORT FORMAT automatically 
generating column headings, paging and (optionally) indentation, 

• Can create a single report from MULTIPLE FILES 

• Prints user defined formats for CUSTOM LABELS, custom forms etc 

BELOW ARE TESTIMONIALS from owners of AIDS systems These are absolutely authentic 
statements and are typical of the comments we receive. 

"This program will do more for my business than all the other programs I 
have, combined." 

David Wareham. Vice President (EDP). National Hospital and Health Care Services Inc 

"We have 32 different Data Base Management packages lor the TRS-80. AIDS-HI is easily 
the best It also makes it easier lor us to step up to our Model II since the package is 

available (or both computers." , . „ , , r, . ^^ .. 

Jack Bilinski, President, 80 Microcomputer Services 

"Your AIDS program is far and away the finest information management system that I've 
ever seen, I am currently using it to maintain a clear picture of the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm. Director, Front Door Residential Treatment Program 



MTC AIDS CALCULATION SUBSYSTEM- 

MODELSt&lll ...$24.95 MODEL II . . .$39.95 

MTC s most popular AIDS subsystem. Use 
for report generation involving basic 
manipulation of numeric data. Features are: 

• User-specified page title 

• Columnar Headings 

• Optional Indentation 

• Use for accounting, inventory, financial 
and other numerK-based information 
systems. 

Compare AIDS-IH"'/CALCS-IM"' with any other data management package under SlOO! 



• Columnar subtotals generated when 
there is a change in a user specified 
column. 

• User specified Columnar Totals 

• Columnar values computed using con- 
stants and/or column values 

• Balance forward calculations (Ex: Gross 
sales equals prevkjus gross sales + sale 
amount + sales tax). 



AIDS OWNERS! 

WE HAVE WHAT 

YOU'VE BEEN 

WAITING IV. . . 

MTC CALCS-IV^", Ihat is. 

• More Computations 

• Save Report Formats on Disk 

• Faster, and more! 

MTC CALCS-IVTw $39.95 

ForModelsl&lll $39.95 

ForModelll S59.95 



MTC AIDS MERGE-lir 

I This subsystem will combine up to 14 AIDS- 
I created data tiles into a single, large lile. An op- 
tional purge capability removes duplKate entries 
! while perlorming the merge operatton tcan even 
I be used to eliminate dupltcates in a single tile). 
Machine-code assisted for high-speed pertor- 
marKe, MERGE-IIITM properly handles liles sorted 
by any combinatk>n of fields, including numerics, 
I with each field in ascending or descending order. 

I MTC AIDS MERGE-lir" J19.95 

For Models t& III $19.95 

ForModelll $29,95. 



TM 



THE COMPLETE 

MTCAIDS-III 

PACKAGE 
SAVE $$$$ 

Includes MTC AIDS-lir^ 
CALCS-lir" and MERGE-III™ 

A comprehensive system 
at a competitive price! 

MODELI&III $99.95 

MODELII $149.95 

Add $25 for CALCS-IVTM 



CALCSIir" REQUIRES THE PURCHASE OF AIDS- 



AIDS/P" 

IS COMING! 



TRSBO IS « Irademarh of the 

R^dn ShacK Divnion ol Tandy 

Cofporation DATALIFE is a 

trademark of VERBATIM PLAIN 

JANE, AIDS'l. AIDS'lll, CALCS-llt. 

CALCS-IV. MERGE III are 

tradBmsrhi ol MTC 

1981 by MelatKfinoloiiM 

Corporation, Inc 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
transit wHI be exchanged- 



PRICES IN EFFECT 
Dec. 1. 1981 THRU 
Deceml)er 31. 1981. 
Prices, ^)ecifications, 
and Offerings subject to 
change without notice. 

8112 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

. MONEY ORDERS 
•COD 



•Add S3 00 lor shiQping 
& handling 

• $3,00 EXTRA lor COD, 

• Ohio residents add 5 '-2 % 
sates tax 

t^ 20 
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'My enjoyment sometimes goes 

flying out the window when 

I find the program will 

not run on the Model III." 



More on Motorola 



In reference to Chris Brown's article 
entitled "Seniinars Cover Color Computer 
Chip" (80 Microcomputing, August 1981) 
I would like to provide the followino 
comments: 

The Mid-Range Marketing Group at 
Motorola aggressively nnarkets products 
such as the MC6809 to the broad base 
market. This Is evidenced by the fact that 
the MC680g is widely used in many high 
performance eight-bit microprocessor 
applications. 

The majority of personal computer 
manufacturers were well Into their design 
cycles at the time of the MC6609's in- 
troduction. In spite of this the MC6a09 
has found a home in several personal 
computers. 

The MC6809 Is definitely nor the end of 
the line for eight-bit technology at Motoro- 
la. Strategic planning for the MC6809's 
future is not common knowledge even 
within Motorola. Future directions of the 
MC6809 are stiil considered confidential 
and not yet available for general release. 
George Nelson 
Manager, Mid-range MPU 
Marketing A Applications 
Motorola Inc. 
Austin, TX 



Production 
Lynxes Improved 



I reviewed the September 1981 80 
Microcomputing article "Spanning the 
Electronic Nation" In detail with author 
Dennis KItsz. He agreed to correct his 
statements which we showed to be Inac- 
curate. Dennis explained that he was not 
aware his review copy of the Lynx modem 
was an obsolete prototype, which of 
course, seriously affected the outcome of 
the comparison. The fact that this article 
was prepared approximately one year In 
advance of publication did not allow for 
the evolution production Lynxes have 
undergone as a result of continued efforts 
toward product Improvement by our own 



engineering and programming staff, as 
well as feedback from the multitude of 
sincere Lynx owners, retailers and inde- 
pendent software authors. 

Keeping Lynx established as "first 
choice for TRS-80" will always be the first 
priority here at ESI Lynx. We are proud to 
offer our product to the growing demand 
for quality peripherals In the TRS-60 
aftermarket. 

John E. Bickel. Vice-President 

Emtrol Systems, Inc. 

Lancaster, PA 

Dennis Kitsz' update of his review on 
the Lynx modem appeared In 80 Input, 
November 1981.— Eds. 



Information Request 

I wish to add my support to Daniel M. 
Long (80 Input. August 1961) who asked 
you to indicate whether your printed pro- 
grams are for Model I or Model III or tx>th. 

t know that I could subscrit>etoLoad80 
but Inasmuch as I am retired, I get a lot of 
enjoyment out of typing the programs. My 
enjoyment sometimes goes flying out the 
window when I discover that the program 
on which I have spent a lot of time will not 
run on the Model til. 

Would It be such a hard job to put a line 
under the title or at the start of the first 
paragraph stating that the program Is 
either Model I, Modal III or for both? 

Several of my friends with Model Ill's 
have the same complaint. 

William E. Eccles 
Scottsdale, AZ 

We've heard your complaints. Starting 
with the January 1982 issue look for a box 
containing this information and more on 
the first page of our articles.— Eds. 



Reinlcer Kits Available 



The response to my article alwut auto- 
matic ribtxsn reinkers for printers ("Keep It 



in the Black," 80 Microcomputing, May 
1981) was overwhelming. 

Within a couple of weeks all of my ex- 
cess reinker kits had t>een sent out, and 
several hundred disappointed readers 
were turned away. Since that time, 
however, one of the readers turned up a 
large supply of them, and I agreed to take 
them on for redistribution to other 
microcomputer users. The cost is the 
same as descrit)ed in the original article 
($18.25, plus S1.00 for Air Mail). I also ob- 
tained a supply of spare parts. A price list 
can be had by sending me a self-addressed 
stamped envelope. 

Since there were a great many readers 
who were disappointed when the original 
supply ran out, I thought I would write to 
let them know that the reinker kits are 
again available. 

William D. Johnston 

1808 Pomona Drive 

Las Cruces, NM 88001 

Thanks 

Thanks for the "Reload 80" (page 344, 
September 1981). It serves to give us a pre- 
view of what you'll offer on the Reload 80 
for the month and to share a tip about Its 
use. I have purchased several tapes since 
April and am welt pleased. 

W. Robert Hetrick, PhD 

Clinical Psychologist 

Wichita, KS 



No Sale 

Is there any truth to the rumor that the 
FCC regulations prohibit the sale of 
TRS-80 Model I hardware add-ons after 
December 31, 1981? I hope this rumor Is 
false, because the hobbyist needs to be 
constantly updating his equipment to 
keep up a strong Interest. 

Gerald C. Gray 
Danviile. CA 

To our knowledge, the FCC is serious 
about its computer RFI requirements. If a 
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META TECHNOLOGIES 

26111 Brush Avenue. Euclid Ohio 44132 
CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call 1216) 289-7500 (COLLECT) 



Let your TRS-80'" Teach You 

ASSEMBLY 
UNGUAGE 

REMSOFT's unique package. "INTRODUCTION 
TO TRS-80- ASSEMBLY PROGRAMMING" in 
eludes ten 45-minute lessons on audio cassettes, i 
display program tor each lesson providing illustra 
tion & rejnlorcement. and a text book on TRS-80' 
Assembly Language Programming. Includes use 
tul routines to access keyboard, video, printer and 
ROM. Requires 16K - Level II, Model I. 

REMASSEM-1 $69.95 

FOR DISK SYSTEMS $74.95 



Let Your TRS-80'" Teach You 

ASSEMBLY LANGUAGE 
DISK I/O TECHNIQUES 

REMSOFT does ft again! REMDISK 1 isaconcise 
capsulated supplement to REMASSEM-l Package 
consists of two 4S'minute lessons on audk> casset- 
tes, and display programs providing illustration 
and reinforceinent Provides specific track and 
sector I techniques, and sequential and random 
Itte access methods and routines. 

REMDISK-1 $29.95 



MICROPA RA PHERNAUA 

DISKETTES (box of ten) 

5'/." PLAIN JANETM $19.95 

5'/," PLAIN JANETM '6o/i/ $24.95 

5'/«'DATALIFETMMD 525-01 ..$26.95 
8' DATALIFE™ FD34-8000 .... $43.95 

NEWDOS by APPARAT 

NEWDOS/SObyApparat $139.95 

NEWDOSUPGRADE CALL 

NEWDOS + with ALL UTILITIES 

35-track $69.95 

40-track $79.95 

BOOKS 

TRS-80TM DISK 

AND OTHER MYSTERIES $19.95 
MICROSOFTTM BASIC DECODED $24 95 
1001 THINGS TO DO WITH YOUR 

PERSONAL COMPUTER. $ 7.95 



N EWDOS/80 Version 2.0 



$139 



SPECIAL 
95 INTRODUCTORY 
PRICE 



Apparat's long-awaited successor to NEWDOS + is here! This is not an enhanced ver- 
sion of NEWDOS. but a completely new product- Simplified DOS commands can be in- 
stantly executed from BASIC, even within a program, without disturbing the resident 
code. System options, such as password protection, number and type of disk drives. 
BREAK key enable/disable and lowercase modification recognition, can be quickly and 
easily changed. Five new random-access file types allow record lengths ot up to 4096 
bytes, and no FIELDing! A powerful CHAIN facility alhjws keyboard INPUTs to t>e read 
from a disk file. An improved RENUMBER facility permits groups ot statements to be 
relocated within program code. Diskettes may even be designated as RUN-ONLY! 
Features alt NEWDOS+ utilities (SUPERZAP 3.0. etc.) and much more! One MTC 
technical staff member said having NEWDOS/80 is "better than sex" (you'll fuve to 
judge for yourself!). 

MODEL III VERSION 
Has all the features of the Model I version plus enhancements. Allows any mix of 
single- or dual-sided 40- or BO-track disk drives. Most BASIC and many machine 
code programs written for the Model I will run without modification. Includes a 
utility for converting Model I single density to Model III double density. 



NEWDOS;80#SPECIAL# 

CALL REGARDING OUR UPGRADE PRICING 



$139.95 



Michael Shrayer's 

ELECTRIC PENCIL 
VERSION II 

for 
Model I and Model III 

An expanded version of the critically ac- 
claimed original word processing system! 
Includes all features of Version I plus many 
new extensions. Runs under most disk 
operating systems, has improved video 
text handling, loads any ASCII file tor 
editing (including BASIC files), single sheet 
mode for printing on letterhead and more! 
Simple to use, features 2-key commands. 
An incredible package at an incredible 
price! 

SPECIFY MODEL I OR III 

Disk Version $79.95 

Tape Version $69.95 

CALL FOR AVAILABILITY 



Complete for Model I with all utilities 
Plus exclusive MTC QUE card! 

NEWDOS + 



$69 



95 



by Apparat 



Includes REF. RENUM, SUPERZAP. 
EDITOR/ASSEM., DtSASSEM., DIRCHECK. and 
more! This is ttie original NEWDOS with all of 
Apparat's utility programs. Includes exclusive 
MTC QUE (Quick User Educatton) card. 

40-Track Verston $79.95 

MTC QUE Card only $ 1.50 



TRS 80 IS d trademark oT tne 

Radio Shack Division ol Tandy 

Corporation. DATALIFE it a 

trademarh of VERBATIM PLAIN 

JANE, AlOS-l AIDS III. CALCS III. 

CALCS-IV, MERGE III are 

trademarkt ol MTC 

I 1981 by Metatechnolociei 

Corporation. Inc 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
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PRICES IN EFFECT 
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■ MONEY ORDERS 
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• Add S3.00 for shipping 
& handling 

• 53 00 EXTRA for COD, 
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manufacturer's peripherals do riot pass 
the required RFI tests, they may not be 
marketed in the USA as of 1 January, 1982. 
Whether or not the FCC will be able to 
prosecute violators is another question 
altogether.~Eds. 

Interface with 
Braille Printer Wanted 

Although I am a happy TRS-80 Model I 
owner and a programmer trainee, I started 
in February 1981 via help on TRS-80. 1 want 
to ask all Interested manufacturers of 
TRS-80 devices to consider something for 
deaf and blind and deaf-blind persons to 
use the TRS-80 and other computers via 
RS-232 or common bus with a Baudot/ 
ASCII converter device or a braille printer. 

There may be a small market for these 
devices, but you would make the handi- 
capped happier. I am deaf. I am doing it 
not for myself, but for all deaf and blind 
people. I believe that deaf schools use 
them, but I am not sure atiout nationally. I 
communicate with a blind programmer via 
the CRT system at the company. He has a 
braille printer. It Is a good way to commu- 
nicate between deaf and blind worlds. 

I am still looking for a device between 
the deaf Baudot TTY or TTD and the 
TRS-80. I might be buying a TTD unless 
someone helps me to use the TRS-80 to 
help all deaf people. 

David Ong 

BREAK? 

Last June, I asked In \he 80 Aid column 
for the POKE In TRSDOS 2.3 that would 
disable the Break Key. The response I 
received was unbelievable, so this should 
clear everything. 

Table 1 lists all the standard POKEs for 
the Break key. They are all modifications 
to a single byte. Incidentally, POKE 
16396,165 leaves the [shift] Break active 
but disables the normal Break. 



ra»Tmoi»i3t 


OFF 


ON 

tsam,m 


innun 


tr\nj7 


wasTjoi H3Br.ta> 
T9bi§2 



MM" OFT 


on 


Uwail lOOaji 


naoMfri 


NetM)0»2-1 »A3H£ 


SOUK* 


NFWDOBSO oesH.o 


43«9H,IA 


nSDOSU 33M0uO 


K*«a8 ' 


rabtof 





Table 2 lists three series of POKEs 
which also disable the Break key. They are 
modifications to two or three bytes. The 
third set also disables all disk I/O, so this 
could be very valuable. 



I also received a POKE that would work 
for TRSDOS 2.1 , 2.2, 2.3, NEWDOS 2.1 and 
ULTRADOS I. It was: 

POKE PEEK(17171| + PEEiyi7172)-256 + 1,0 tof OFF 
POKE PEEK(17171) + PEEK117172)-256+ 1,1 for ON 

This does work, but it is very interesting to 
note that location 17171 holds 77 and 
17172 holds 93, so this Is the exact same 
POKE as the standard (23886)! 

As a side point, I found that pressing 
the G,B and [space] together produces a 
Break, as well as [shlft],[down-arrow] and 
A (control-A). They all appear to do the 
same thing, except after POKEing 16396, 
249. [BREAK] and GB[space] produce 
7SYNTAX ERROR, but control-A hangs up 
the TRS-80. Any ideas why? 

Alan Dardik 
Tenafiy. NJ 

Faster Sorts 

I want to share a few programming tips 
which I have not seen before In 80 Micro- 
computing. Many times in programming 
we find It useful to LPRINT or PRINT the 
month name from a program, and though I 
have seen and experimented with various 
methods, the best I have found is (if you 
don't mind abbreviations) the user defined 
function: 

DEFFNMOS(M) = MIDS(" JanFebMsrAprMayJunJul 
AugSepOctNovDec",M'3,3) 

(This method does not use up string 
space as storing the names in an array, 
and does not use time as For. . .Read. . . 
Next looping would. Readers note there 
are two required blanks at the start "bb- 
Jan. . .) 

Along the same line if you might need to 
know the numtwr of days In any month 
use the following user defined function: 

DEFFNND(M} = VAL(MIDS{" 31283130313031313031 
303V,M-a,2)) 

If you feel It should know all leap years 
then: 



DEFFNNO(M,Y) = VAL(MIDSC' 312B31303130313130 
313031",M-2,2)HY;4 = (NT(Y/4B+(V = 19001 

(You may not know that the year 1900 
was not a leap year. Only centuries evenly 
divisible by 400 are leap years. Readers 
tKite there is one required blank at the start 
"b3128. ..) 

A significant speedup of what I call 
"Switch-Swap-Sorts" of array elements 
can be attained by the use of an end marker 
in the sorting routine in the following NO = 
number of Items in the array to be sorted: 

100 EM>N0-1 

110 SW = 0:FOflZ = 1loEM;IFA(Z)< = AiZ+1)THEN130 
120 SWAPA(Z|.A(Z + 1):SW= -1: EM =Z<- Model II 
120 A = A(Z):A(Z)^A(Z + 1):A(Z+1)=Z:SW= -1 EM = 

Z< - Model I 
130 NEXTZ : IF SW THEN 110 

After testing several methods of sorting 
in Basic I found this method to be the 
quickest. The addition of the end marker 
improved the speed by as much as 20 per- 
cent. The reason for this is that EM is reset 
to the position of each swap. When the 
last swap for any pass is made, EM is set 
to the last element which would need to 
t>e checked instead of continuing to the 
total number of elements. After half the ar- 
ray is sorted, only half of the array needs 
to be checked! 

Charles D. Robertson 
Fort Worth, TX 



Hard Copy Your Screen 

If you have a Radio Shack Line Printer 
VI you can hard copy your screen includ- 
ing graphics and all other characters (ex- 
cept for the arrows). The replacement 
characters are up arrow [, down arrow / 
left arrow ], right arrowt. 

Call the following program as a subrou- 
tine from the main program at the appro- 
priate time. The program runs very slow 
when printing the screen contents be- 
cause it checks each graphic point on the 
screen (6144) plus each print position 
(1024). Notice that line 6005 sets up the 
printer for normal characters and line 
spacing at 12 lines per inch. Line 60010 
sets up the character print line count. Line 
60020 sets up the graphic line count for 
each print line. There are three graphic 
lines for each print line. This line also sets 
printer tab position to eight. This centers 
your copy on an 8 1/2 Inch wide paper at 
the normal character setting. Line 60030 
sets up the graphic pixel count for each 
line. This line also checks if any key on the 
keyboard is pressed and returns to the 
main program If so. Line 60040 checks for 
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Expand your TRS-80@ MODEL I with 

EHTEnT-aD®FOR$99 



95 







DRIVES 4-7 
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CONNECT TO 
EXPANSION 
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DRIVES 0-3 
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DRIVES 

Metatronics (a subsidiary of Meta Technologies Corp., as of September 1,1981)introduces a unique device allowing the connec- 
tion of as many as 8 disk drives to a TRS-80 MODEL I computer. Us integrated design is compatible with application software 
running under VTOS. LDOS. NEWDOS/80 (versions I & Jl). NEWDOS + and TRSDOS 2.3. Features include a U.L.-approved power 
supply, power-monitor LED. operating environment protection circuitry, high-impact metal case and gold-plated contacts. 
Complete with instructions and patch program diskette for configuring your favorite operating system. 

THS-80 & THSOOS are trademarki of lb« Radio Shack dlwUion ol Tandy Corp. EXTENT-BO is a trademsfk ol M«tatf onics Corp. LDOS i> a liadaname ol Loolcal Svatems Inc 
NEWDOS is a tradsname ol Apparal inc. 



DISK DRIVE 

EXTENDER 
CABLE 

|95 



$9' 



for VISTA, MICROPOLIS, 

MTLPERTEC, SHUGART, 
PERCOM & OTHERS 



J 



\ /* 



EPSON 

MX-80, MX-80FT, MX-100 

PRINTERS 

CALL FOR PRICE 



10 FT. RIBBON 

CABLE 

$24^5 

CONNECTS EPSON PRINTER 
& TRS-80 MICROCOMPUTER 



(m)etatronics 

^^^/ CORPORATION 

A Subsidiary of Meta Technologies Corporation ►'^ 



TO ORDER 
CALL TOLL FREE 
1-800-321-9390 
IN OHIO, call 
(216) 289-1210 (COLLECT) 



.MOBtMCOtJ , 



OFFICES 

26111 BRUSH AVENUE 
EUCLID. OHIO 44132 

ISEND MAIL ORDERS HERE) 



PRICES IN EFFECT 
Dec 1, 1981 THRU 
December 31. 1981. 

Prices. Specifications, 
and Offerings subject to 
change without notice. 

8112 



' Add $3.00 for shipping & handling 

'$3.00 EXTRA for C.O.D. 

' Ohio residents add 5Vi% sales tax. 



vrsA 



'C. 1581 by Melal'onics Coip 
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both pixels in the print position, and, if 
both are on, it prints CHR$(239) (the wid- 
est graphics character of the Line Printer 
VI). Line 60050 checks if the left pixel is on 
and the right pixel is off and if so prints 
CHR$(233). Line 60060 checks if the right 
pixel is on and the left pixel is off and if so 
prints CHR$(234). 

OK! That takes care of the first line of 
graphics {if any) on the top row of the 
print line. 

In the second row of the print line we 
want to print all graphics and all ASCII 
characters. Line 60070 takes care of this. 
The variable (S) is the switch for this line 
and If It Is equal to two, It PEEKs each 
print location on that line and if it contains 
an ASCII value less than or equal to 122, it 
prints the character. CHR$(122) Is lower 
case for Z, so if you have lower case modi- 
fication installed in your keyboard it will 
print them on the printer. Line 60075 
prints a space if a CHR$(128) is found on 
the screen. 

The variables used in this subroutine 
are A. S, T$, X, Y. 

60005 LPRINT CHRJ(27); CHRRIS); CHBR27); CHRS(28J; : 

REM SET PntNTER FOR NORMAL CHARACTER AND 12 

LINES PER INCH, 

6O010 FORY = 0TO47STEP3;S = 

60020 FOR A = YT0Y + 2:S = S + 1: LPRINT TAB(8); 

60030 FOR X = OT0 127 STEPS : IF INKEYJO " " THEN 

RETURN 

60040 IF P0INT(X.A1 AND P0INT(X + 1,A| THEN LPRINT 

CHH$<239); : GOTO 60060 

60050 IF POINT(X,A) AND P0INT(X+1,A) =0 THEN 

LPRINT CHR»(233); ; GOTO 60080 

60060 IF P0INT(X.A) =0 AND POINT(X + 1,A] THEN 

LPRINT CHR$(234); : GOTO 60090 

60070 IF S = 2 THEN TJ = CHRS(PEEK(()INT(A/3)*64| + 

(X/2) + 15360))) ; IF T$< = CHR$ (122) THEN LPRINT T$; : 

GOTO 60060 

60075 LPRINT" "; 

60060 NEXTX 

60090 LPRINT" " 

60100 NEXT A , Y 

60110 RETURN 

Jerry I. Trudgen 
Kittanning, PA 



80 and the CC 

As a new owner of the TRS-80 Color 
Computer, I purchased your August 1981 
Annual Games Issue with the anticipation 
of finding at least one or two games that 
could be programmed on the Color Com- 
puter without rewriting the entire pro- 
gram. (As a novice in the computer field 
this would be quite difficult right now.) 
Much to my disappointment, except for 
the "Color Computer First Impressions" 
article no programs written for this com- 
puter appeared. What are the magazine's 
plans to include more materials readily 
usable on the Color Computer? A true 



magazine calling themselves "the 
magazine for TRS-80 users" should in- 
clude something for every model. I had all 
intentions of sending in the subscription 
card but the contents of this issue stopped 
me cold. 

Joel Hotter 
Little Neck. NY 



(1) The January issue is a Color Graph- 
ics issue. (2) We have been running arti- 
cles on the CC as soon as we receive 
them— apparently the CC is still too new 
to our authors. If anyone has any CC arti- 
cles, please be sure to send them in. (3) 
Bill Barden will be doing some articles for 
us on the CC in the near future. (4) Dennis 
Kitsz' Applications is now featuring the 
CC.—Eds. 



do not have to be the same as in the 
DEFIne FuNction statement. 

Since many of us do not choose to pur- 
chase disk and don't want to tie up memo- 
ry with Level III, Basic3, and so forth, 
a small utility like TWOHAF fills the 
gap nicely. 

If anyone can figure out a neat state- 
ment to simulate INSTR(„) with the DEF 
FN, we tape users will only have to solve 
the problem of Random Access to Tape 
to give up second thoughts about disk 
altogether. 

Howard W. Mueller 
Pocahontas, MO 



MID$ 



I really enjoyed the program by Gil 
Spenser, "Enhance Your Level II Basic" 
(July 1981). The ability to use the DEF FN, 
10 USR calls, Renumber and Hex Conver- 
sion in a small utility Is fantastic. 

Here is a demonstration program for 
simulating Disk's ability to use MID$ on 
the left side of the equalsf = ) sign. Instead 
of using MID$, define the function as in 
line 40 and then use MD$ in order to avoid 
conflict with the Level II Reserved Words. 

10 CLS;PRINT"MIDJ = (Replace portion ol string) AS IN 
DISK BASIC usinfl TWOHAF (rom July 1981 
80-MlCROCOMPUriNG. Page 204H wllh LEVEL II Basic" 
20 ■ SOS = SOURCE STRING: ST = STARTING POSITION 
: LE, LENGTH OF INSERT : 8S- INSERT: MDI IS 
USED AS MIDS WOULD BE USED IN DISK 
30 CLEARIOOO 

40 DEFFNMD$(S0$,ST,LE,BS) = LEFT$(S0$,ST.1) + 
LEFTS(B$,LE) + HIGHT$(SO$,LEN(SOS)-LEN( LEFTS 
(BS,LE)VLEN(LEFTJ(S05,ST-1))) 
50 INPUT-ENTER THE SOURCE STRING";GS 
60 INPUT-ENTER THE STRING YOU WISH TO INSERTMS 
70 INPUr'STARTING POSITION IN SOURCE STRING";PO 
80 INPUP'NUMBER OF CHARACTERS OF IS YOU WILL 

INSERT",IN 
90 MDS = FNMDS(GS,PO,IN,lS) 
100 PHINT:PRINT"STRING AS IT WAS:" 
110PRINTGS 

120 PRINT" RESULTING STRING:" 
130 PRINTMDS 

ENTER SOURCE STRING? MERRY CHRISTMAS AND A 
HAPPY NEW YEARl 

ENTER THE STRING YOU WISH TO INSERT? but 
STARTING POSITION IN SOURCE STRING? 17 
NUMBER OF CHARACTERS OF IS YOU WILL INSERT? 3 

STRING AS IT WAS: 

MERRY CHRISTMAS AND A HAPPY NEW YEAR! 

RESULTING STRING: 

MERRY CHRISTMAS but A HAPPY NEW YEARl 

This must of course be used with 
"TWOHAF", and as the demonstration 
program shows the Strings and Variables 



Mod III Scripsit 



I read with compassion the letter from 
Larry M. Mohr in the "90 /npuf" section of 
the July issue. I waited almost three 
months for the Mod III tape version of 
Scripsit. During that time I became so dis- 
couraged with the slow rate of data trans- 
fer during cassette I/O (500 baud and 50 
percent plus sync bytes) that I purchased 
disk drives. When the Mod III Scripsit did 
arrive I was able to get it loaded in a cas- 
sette and for data to be saved or loaded at 
1500 baud. 

I will gladly provide a copy of the 1500 
baud Scripsit to Mr. Mohr or anyone else 
desiring a copy. Send proof of purchase, a 
blank cassette and return postage. If so 
desired I will provide the cassette and pay 
the postage for $4.00. 

Lee A. Hillard 

304 North 17th Street 

Mount Vernon, WA 98273 



Terminal Modifications 

I frequently use my TRS-80 Model III as 
a terminal to communicate with a Cyber 
171 by telephone. This works quite well, 
using a modified version of the dumb ter- 
minal program found in the Model III Disk 
System Owner's Manual. I think the 
modifications could be useful to persons 
using their Model Ill's as terminals for 
other mainframe machines. The revised 
listing is found below. 



2 PRINT CHF»<14) 

5 DEFINT A-2 

10 POKE 16890,0 

15 POKE16888,(5M6) + 5 

20 DEFUSRO = iH005A 

40 X = USRO(0) 

60 DEFUSR1 = &H0050 

65 OEFUSR2 = iH0055 

70 01 = 16872 

ao 00=16880 
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HpNNON 
nGNCTICL 



To Order: 

Toll Free 1-800-525-7958 

1650 South Laredo Court • Aurora, Colorado 80017 



MICRO COMPUTER DISKEHES 

5'A" Double Density. Single Stded, Mtnl Disks. Shrink wrc^ped boxes ot 10 with Jackets, Lobels and Tabs 

REGULAR SPECIAL 

RETAIL FALL 

PRICE SALE 

$26.95 $22.95 

WE ARE NATIONALLY INTRODUCING OUR HIGH QUALITY MINI-DISKS 
DIRECT TO THE END-USER AT A SPECIAL PRICE FOR A LIMITED TIME. 



THESE DISKETTES ARE FULLY GUARANTEED FOR ONE YEAR AGAINST DEFECTS. 
RETURN ANY DISKEHE GOOD. BAD OR OTHERWISE AND WE WIU. 
REPLACE IT FREE WITH NO QUESTIONS ASKED. YES - WE MEAN IT! 

This offer expires midnight Dec 31, 1981 
UPS SHIPPING FREE 
FLIPSORT DISKETTE FILE BOX SV» $19.95 with 50 SHANNON MAONCTICSl disks $109.95 



VERFIN DISK DRIVE 
HEAD CLEANERS 

by Shannon Magnetics 

These drive cleaning diskettes assure proper operation of all types of SV*" disk drives by removing dirt and 
debris which can cause read/vwrite errors and lost data. Designed for use with double or single density dual 
or single headed drives of any track count. They will provide maximum effective cleaning for drive of any 
brand name without harsh liquid chemicals which may damage delicate mechanisms or cause excessive 
head wear. The kits contain two cleaning disks and instructions in a reusable hard plastic diskette box. 
Everything you need is included. NO TOOLS or SPECIAL SOFTWARE are required. You can use it in just 
seconds to insure the reliability of your system. 

COMPLETE KIT $24.95 



Two kits for only $3995 



MASTERCARD |^^ We also accepi 

AND VISA ^S • COD* CHECKS 

WELCOME \—J • MONEY ORDERS 

ORDERS IN U.S.A. SHIPPED U.P.S. FREE. Colorado residents add 6V2% sales tax 
WE OFFER ATTRACTIVE DISCOUNTS TO DEALERS IN SMALL QUANITIES 



^MC 
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5^(9 INPUT 



90 'CHECK FOR SEHIAL INPUT 

ltOX = USR1(0) 

1 20 CS = CHRS(PEEK(CI)) 

12SIFASC(CJ) = 13THEN 140 

130 PRINT OS; 

140 'CHECK FOR KEYBOARD INPUT 

150C$ = INKEY$ 

160 IF C$='" THEN 110 

163 IF C$= "I" THEN C«.CHRS(94) 

164 IFC$ = "a"THENCJ = CHRS(126) 

165 PRINT C$; 
UOPOKECO, ASC(C$) 
190X = USR2(0) 

200 GOTO 110 



I added lines 2, 125, 163 and 164. Line 2 
turns on the cursor, a useful feature when 
editing programs. When connected to the 
Cyber, the Model III gets two line returns 
for each line, one from the Cyber and one 
from Itself. The result is double spacing 
for each line that appears on the screen. 
Line 125 eliminates one of those spaces, 
so that the lines are single spaced. Lines 
163 and 164 provide characters needed for 
editing on the Cyber but which are not on 
the TRS-80 keyboard. They use previously 
unused keys. Line 163 transmits, both to 
the screen and the Cyber, a caret (up ar- 
row) when the up-arrow key is depressed. 
(This usually sends a left bracket on the 
Mod III.) Line 164 converts the @ key to a 
tilde, also used for editing. You can 
transmit any appropiate ASCII characters 
to the mainframe by this technique. 

Phil DiLavore 
Terre Haute, IN 



One Liner 



This one liner is a winner. It requires 
NEWD05 Operating System. It will display 
the disk directory for any specific drive. It 
will also permit you to kill up to ten (10) 
files at once. 

The program will ask fora drive number. 
It wilt then display that drive's directory. A 
request for up to ten file names will follow. 
If less than ten files are to be killed, hit the 
Enter key to all other requests. That is all! 

10 CLS:CLEAR500.INPUT"DRIVE NUMBER . ■';DS:AI = 
"DIR :" + DS:CMDA1 PRINTSTRINGS(60,131):FORX = 
0TO9;PRINTX,.LINEINPur'-FILE NAME (ENTER) :", 
F$(X):FJ(Xt= FS(X) * ":■ + DJ:NEXTX:CLS;FORJ = 
OTOX 1;IFL£N(FJ(J))>2PRINTKILUNG FILE : "FUJ): 
KILLF((JJ:NeXTJ 



Miguel Diaz 
Ponce, Puerto Rico 



Mod 11 Word Processor 

Here is a modification to my Everyman's 
Mod II Word Processor [80 Microcomput- 
ing. July 1981). This modification will 
greatly speed up disk read/writes (load/ 



"This one liner displays 

the disk directory 
for any specific drive. " 



save) commands. Perform the modifica- 
tion in the following manner: 

• Delete lines 1520-1570. 

• Delete lines 1770-1810. 

• Load in the replacement lines from 
the listing which follows. 

• Change line 1645 to the new one (in- 
cludes CLOSE statement). 

• Add lines 3000 and 3010. 



1520 FS» = "TABLE";G0T015M 

1522 QOSUB17ae'lrMc] 

1524 OPEN'rM,FSS:CLS:PRINyu»d(nfl ■■:CHFm26) ; 

■■ ■■;FS»;" ■■;CHRS(25); 

1526 INPUT#1,LA,LL.S,NS,FL,LP.LM,PS,PNS.FP, 

P1S,PS,M$ 

1528 FORL = 0TOLA:L!NElNPUT»1,AS(L):GOSUa3000: 

NEXTLGOTOITS* 

1770 GOSUBl7B6;IFA = 9eTHEN60'8a¥e 

1772 IFRIGHTJ(HJ,1)<>SSTHEN1776 

1774 Y = LEN(H$) H» = LEFTJ(HS, V - 1);IFY> ITHEN 

1772ELSEHI = CHR$(0) 

1776 H = 1;GOSUB480:OPEN"0'M,FSJ:CLS;PRINT 

a900,"Savlr>g ■';CHRS(2B)i" ■'.FSS;' ■';CHR$(25); 

1778 PRINT»1,LA:LL;S;NS;",",FULP;LM;PL;PS;PNJ;'',"; 

FP;Plt;",";Pt;",";H$ 

1780 FORL = 0TOLA:IFASC{RIGHTS{AS(L),1)) = ID 

THENA»(LJ = A$(L) + S$ 

17B2 PRINT»1,A$(L):NEXTL 

1784 PRINT ■ -— Completo0':CLOSE:GOTO60 

1786 IFFS$ = ''"THENFS$ = 'TEXTWP" 

1787 CLS:PRINTTAB(15)'' PRESS ■" TO ESCAPE AND 
RETURN TO ";CHRS(26);" COMMAND '■;CHR$(25| 

1788 PR I NT ®B90." Current tlleBpec^ '■;CHRH26);" 
FS$;" ";CHRJ(25),:A$=FSJ:LINEINPUT"NEW = ?";AS 
1790 IFAJ = "-"THEN60ELSEIFA$=' "THENRETURN 
ELSEIFLEFT$(A$,1) = '"THEN1787ELSEEFSS = AS 
1792 CLS: RETURN 

3000 Y = LEN(AS(U):IFYTHENA = ASC(RIGHTS(AS(q,l)) 
ELSEA = D 

3010 IFY> 1ANDA = UTHENAI(L| = LEFT$(AS(L),Y-1): 
GOTO3000E LS ERETURN 

1645 IF ERR = 5TH EN PRINT" YOU CANT DO THATII Ml 
":CLOSE:FORQ-0TO4000:INEXTQ:RESUMEe0 

30 CLEAR20000:DEFINTA-Z:NL = 380;DIMAHNL), 
X$(3),S(25),T126) 



These modifications are courtesy of Mr. 
Delmer Hinrlchs of Washougal, Washing- 
ton. He also suggested that the Clear 
statement In line 30 be put before the DE- 
PINT statement. As it Is, the Clear also 
clears the OEFINT statement which pre- 
cedes It. 

Mike Kilroy 
Dayton, OH 



Uppercase 



Hats off to Martin C. Hambel for his pro- 
gram Shift Lock {80 Microcomputing. May 
1981). One problem that I have with it, 
however. Is that I don't have a lower case 
mod In my computer. I can't find out If a 
character is upper case or lower case until 
I output it to my printer. By adding these 
five instructions to his program: 

00460 CP 60H ;LOWER CASE LETTER? 

00470 JR NC.RET ;RETURN IPSO 

00480 LD IY,(4020H) ;LOAD lY WfTH CURSOR 

POSITION 
00490 LD [IY).5BH ;DISPLAV UPWARD ARROW 
00500 INC lY 
00510 LD (4020H).IY ;MOVE CURSOR ONE POSI 

TION 

I am able to display an up arrow to the im- 
mediate left of any upper case character. 
The printer does not print the up arrow 
because it is POKEd into video memory. 
The only drawback in POKEing it into 
video memory is ttiat the arrows disap- 
pear on a list. 

J. Keith Eller 
Laurel, MD 



Graphic Codes 



This is a patch for NEWDOS 80 version 
2.0. It allows the JKL function to send 
graphics to the Epson MX-80 printer with 
the correct graphic code values. For this 
feature you will need to change file 
sys3/3ys. Relative sector 4 starting at 
relative byte B9 insert the following 
values: 

FE8O3802C620 47 3A7O43Ba 
78 30 02 3E 2E CD 3B 00 C3 85 51 

Although you still have to send the stan- 
dard Epson values from your programs, 
the JKL function now copies the screen 
contents correctly. 

Burgin L. Howdeshell 
Goodtellow AFB, TX 



Ribbon Rewinding 

For those troubled by the $8/shot cost 
of each ribbon gobbled up by the Radio 
Shack Daisy Wheel Printer II, there's an 
alternative. Rewind the old multi-strike rit?- 
bon. It produces acceptable results for 
non-critical typing. Characters are read- 
able but lighter in density on the ribbon's 
second pass. 

continued on page 34 



18 • 80 Microcomputing, December 1981 



Data Resources is pleased to continue its commitment to professional quality TRS-80 
software by introducing The Silver Edition Software Series. This collection of programs 
represents the best contributions from the most talented and popular authors available. 



^. DATA RESOURCES M^ 

QUALITY SOFTWARE FOR YOUR TRS-80® DISK SYSTEM 
TO ORDER CALL TOLL FREE 800-525-7958 



DATA RESOURCES NEW SUBSYSTEMS FOR AIDS III 



AIDS DISK SORT 

Designed for tiles that are too large lo sorl "in 
memory" with AIDS or for wfien you don't 
want to wait wfiile AIDS loads tfie records. 
Records are pfiysically rearranged on disk 
MODEL I $24.95 

AIDS FILE EDITOR 

Allows you to update and edit records in AIDS 
data tiles witfioul loading tfie file inlo memory. 
Now you can cfiange a single record in a 
mailing list quickly and easily witfi random 
access selection. 
MODEL I $24.95 



AIDS DATA ENTRY MODULE 

Designed for inputting data directly into AIDS 
tiles. Fields may be fixed to repeat tfie same 
data Tfie key-in routines are improved in 
speed — no more over keying Data can be 
added to the end of an existing tile or a new file 
can be created. Files are aulomalically opened 
and closed so even if tfie computer is turned 
off in tfie middle of work, no more than 255 
keystrokes can be lost. 

MODEL I $24.95 



BIONIC BASIC 

By Glynn Owen 
The BIONIC BASIC routines implement a number 
ot useful commands and functions tfiat are not 
available in regular BASIC BIONIC BASIC appends 
these routines to the BASIC/Cf«1D file so that they 
load automatically ^-i^ti time Disk BASIC is 
entered The BIONIC BASIC modules will not 
require reserved memory. Ihey are resident in 
memory whenever Disk BASIC is being used. 
Model I $49.95 



THE MICRO ACCOUNTING SYSTEM 

This IS the finest accounting system available tor your 
TRS-80 Ideal tor small business, this Intergrated 
General Ledger. Accounts Receiveable Payable 
System includes a Checkbook manager 
We offer something no olfier general business package 
can give you-a money back guarantee. If you are not 
totally satisfied return the package within 60 days and 
receive a full refund. Write tor sample repons and full 
descriptions 

MAS/80 complete $489.00 



VERBATIM DISKETTES 
5V/ DOUBLE DENSITY 
40 TRACK DATALIFE . $26.95 

FLIPSORT 
FILE BOX STORAGE 

5V." $19.95 

1 BOX VERBATIM 5V." DISKS 
WITH FLIPSORT $43.95 



B.T. ENTERPRISES 
UNITERM/80 

By Pete Roberts 
This IS the state of the art in communications 
software. It configures itself tor either Model 1 or 
Model III and can be used with any standard 
modem, both RS-232 and Bus-Decodmg 
Especially designed to use the extended commands 
in NEWDOS/BO, but fully compatible with ail major 
DOS systems 
For Model I and III $89.00 



THE FLOPPY DOCTOR 

By Dave Stambaugfi 
FLOPPY DISK/MEMORY DIAGNOSTIC 
Computer 'protesstonals" have long known the 
importance ot regular use of diagnostic software in 
verifying the integrity ot computer hardware The 
TRS-BO is no exception, good diagnostics are a 
must. The fwllCRO CLINIC offers two programs 
designed to thoroughly check out the two most 
trouble prone sections of the THS-BO, the disk 
system (controller and drives) and the memory 
arrays 

MODEL I $24.95 MODEL III 429.95 



PAPER 
9ViXl1 TRACTOR FEED WHITE 

3300 SHEETS $29.95 

14'/.x11 TRACTOR FEED 
GREEN BAR 
3300 SHEETS $39.95 

PAPER SHIPPED BY TRUCK 
FREIGHT CHARGES COLLECT 



DATA RESOURCES 
NOW EXPRESS SERVICE 

We will guarantee to have any software order 
placed before noon M S T delivered the 
next business day Air freight charges are 
collect We promise service and we deliver - 
over night if necessary or the order if yours 
FREE. 



J 



AIDS SYSTEMS 

BY METS TECHNOLIGIES 

MTC AIDS III 

This easy to use system allows even a novice 
TRS-80 user to create data files custom 
configured tor many applications from lists 
for mailing and cataloging lo financial 
reporting and time scheduling It requires NO 
PROGRAMMING and is complete with 
features for adding, deleting, sorting^ 
updating and printing 
MODEL I $69.95 MODEL II $99.95 

MTC CALCS III 

Performs numeric calculations of data 

contained in AIDS files Ideal for financial 

applications 

MODEL I $24.95 MODEL II ...$39.95 

MTC CALCS IV 

The same features as CALCS III with more 
powerful formulas and the ability to store 
report formats. 

MODEL I $39.95 MODEL II ... . $59.95 

MTC MERGE — III 

Combines up to 14 AIDS data tiles into a single 
file Duplicates may optionally be purged, and 
sorted order ot records is maintained. 
Machine code tor speed makes this useful if 
large data tiles are to be created from smaller 
ones 

MODEL I $19.95 

MODEL II $29.95 

SPECIAL 

AIDS III SUPER SYSTEMS 

AIDS III & CALCS III a MERGE III 

MODEL I $99.95 

AIDS III a CALCS IV a MERGE III 

MODEL I $109.95 

NEWDOS/80 Version 2.0 
for MODEL I and III $149.00 

The hottest Disk Operating System is now 
available in its latest version This is the ONE 
from Apparat. Inc . the people whose systems 
have made the TRS-80 a reliable computer 
This system includes 

• Double Density support on the Model I 

• New Superzap with expanded capabilities 

• Diskette compatibility between Model I 
and III 

MODEL I DOUBLE DENSITY PACKAGE 

NEWDOS/BO Version 2.0 and (he 

LNDOUBLER 

Everlhing you need to convert your TRS-80 
Model I to run double density Complete with 
software, haroware. and instructions, 
installs in minutes with NO SOLDERING, 

WIRING OR CUTTING $229.95 

LNDOUBLER Alone $149.95 
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MASTERCARD 
AND VISA _ 
WELCOME 
We also accept 
COD • CHECKS 
MONEY ORDERS 



Data Resources Corporation 

Business & Professional Center 8000 East Quincy Ave. 
Denver, Colorado 80237 (303) 773-6665 



ALL SOFTWARE SUPPLIED ON DISKETTE, 
ORDERS IN U.S.A. SHIPPED U.P.S. FREE. 
Colorado residents add 6V2% sales tax. 

ATTN: DEALERS - We offer attractive pricing and terms to small 
computer retailers Write for information on our dealer program and 

discounts in small quantities. 



1981 DATA RESOURCES CORP 

THS-80- IS A TRADEWAHK OF TANDY CORP 

Prices in eltect Dec 1 1981 lo Dec 31 1981 and subject lo changes 

AIDS III • CALCS III - MERGE III ■ ARE TRADEMARKS OF METATECHNOLOGIES 
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MX-80 Sans Interface 

This is in answer to David D. John- 
son's query in Septemper 80 Micro- 
computing regarding the possibility of 
using an Epson MX-BO printer without 
an expansion interface. I have used 
this setup and it works well. You do 
have to make a minor change inside 
the MX-80 however. 

A Radio Shack Extension cable 
(catalog number 26-1411) and a Radio 
Shack 16 pin DIP Header (catalog 
number 276-1980) plus a short length of 
wire and soldering equipment is re- 
quired. Extension cable 26-1411 is a 
two-part buffered printer extension 
cable and has the correct connector 
for mating with the MX-80. The buffers 
are contained in a plastic box on a 
short stub cable and require 5 volts to 
operate. The modification to the MX-80 
is to supply 5 volts to the buffers. 

Remove the MX-80 cover as de- 
scribed in the MX-80 manual. Remove 
the two screws retaining the small cir- 
cuit board at the left rear of the MX-80. 
Gently pry the board connectors open 
and move the board lo one side. This 
will expose the cable connector. 
Carefully solder a lead to the right- 
most connector lead (this is pin No. 18 
and is not used by my MX-80 — it would 
be a good Idea to check this with a low- 
current ohm meter on a more recent 
MX-80). Solder the otherend of the lead 
to pin No. 8 of the DIP header after clip- 
ping of all pin Nos. 9-16 and also pin 
No. 7. Plug the DIP header into MX-80 
socket 3B so that pin No. 8 of the DIP 
header is plugged into pin No. 24 of 
socket 3B. DIP header pins 1-6 are re- 
tained merely to help secure the plug 
in place— no connections should be 
made to them. Carefully reinstall the 
printed circuit board, replace the 
printer covef and, with power off, con- 
nect the printer cable and you're in 
business. If at a later date you add an 
expansion interface, simply eliminate 
the buffer stub cable. 

Incidentally, David Lien's excellent 
MX-80 Instruction Manual says on 
page 64 that, with "a Radio Shack 



cable, switches 1-3, 1-2 and 2-3 are all 
overridden and LF is automatically ad- 
ded to every CR". Strictly speaking, 
this is true but there Is something quite 
simple that can be done about it. The 
cure is to place a tiny bit of tape over 
pin No. 14 of the Radio Shack cable 
connector. This is to prevent this plug 
pin from making contact with Its match- 
ing socket pin I used a sliver of typing 
correction tape. This removes the 
ground applied by the Radio Shack 
buffer unit to pin No. 14 of the MX-80. 
With this ground removed, the above 
listed switches function as Epson in- 
tended. Whatever is used should be as 
thin as possible to avoid damage to the 
connector. 

fl.e. Trueblood 

Box 381 

Jatfrey, NH 03452 



Epson Expansion 
Interface 

This letter Is In response to David 
Johnson's letter "Connecting Printers 
Without Expansion" (80 Input, Septem- 
ber 1981). He asked for assistance in 
locating a direct interface from his 
TRS-80 Level II computer to an Epson 
MX-80 printer, In other words, avoiding 
the purchase of a very expensive, full- 
featured expansion interface when all 
he really wants to add is a printer. 

About three months ago I went 
through the same frustrating search. I 
was beginning to believe that I was the 
only one of 250,000 TRS-80 Model I 
owners who had not gone the expan- 
sion interface/disk route, but I per- 
severed. Finally, I located a company 
which would provide me with a TRS-80 
interface kit on a special order for $75 
plus tax and shipping charges. The 
company name is, believe it or not, Ep- 
son America Inc. It seems that even 
their sales representatives are not 
aware of the fact that they have the in- 
terface. I have not seen it advertised 
anywhere although there were plenty 
of advertisements for the Epson Apple 
Interface kit. 



You can obtain this interface kit 
from the same person that located It 
for me: Emmanuel B. Garcia, Jr. & As- 
sociates, 203 North Wabash, Chicago, 
IL 60601, phone (312) 782-9750, 

The TRS-80 Interface kit consists of 
an Interface board (Epson cat. no. 
81 20) and a TRS-80 bus Interface cable 
(Epson cat. no. 8221). It works beau- 
tifully, but a couple of words of 
caution. When installing it, first be 
sure that your internal switches are set 
as shown on page 14 of the MX-80 
user's manual. You will never be able 
to change them again without remov- 
ing the Interface board since It mounts 
directly overthese switches. Secondly, 
the Instructions for Installing the Inter- 
face kit are very good (many pictures) 
except for one thing. When you get to 
the point where the interface board 
and the cable have been mounted In 
the printer, and you are standing with 
the other end of the cable In your hand, 
it is not clear how to plug it into the 
TRS-80 keyboard unit (no picture). 
Looking at the back of the keyboard 
unit, you should be able to read 3M 
plug no. without standing on your 
head, the cable should dress down and 
the black line on the cable should be 
on the left side. You may have to put a 
twist In the cable to accomplish this. 
Because the cable is very short, do it 
carefully. 

James E. McCullough 

25155 West Caine Road 

Ingleside. IL 60041 



Making Patches 



I am rather reluctantly planning to 
add a disk drive to my system later this 
year, and am irritated by the fact that I 
have several cassette based utility pro- 
grams (e.g. Scripsit) which save their 
output to tape, and therefore will not 
be much use with a disk. So 1 either 
have to buy the disk version of the pro- 
grams, or to put up with having two dif- 
ferent systems in use. 

What I want In the short term is a 
patch which will enable me to modify 
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Scripsjt to save text on disk and load 
text to disk. In the long term t would 
like to see an article which explains in 
simple "cook book" terms how to mod- 
ify programs. I know it can be done, 
since I have seen Paspatch advertised. 
I want to know how to do it myself. 

A. F.J. Bell 

49 Hyde Park Road 

Traralgon, 3844, 

Australia 

ULCBAS Incompatibility 

ULCBAS Is the lowercase driver rou- 
tine supplied by Radio Shack when 
they install the lowercase electronics 
in your TRS-80 Model I keyboard. Use 
this routine in Level 11 Basic; use 
ULCDVR in Disk Basic. 

If you use ULCBAS with your user 
written programs, especially if you 
have 32K or 46K of RAM, you may find 
that your program is incompatible with 
ULCBAS. Programs which use RAM lo- 
cations above 705CH (26764 decimal) 
may result with a non-responding key- 
board. It you have experienced such 
difficulties and desire a simple fix to 
the problem, please write. 

James E. Lundee 

918 South Thomas Avenue 

Forest Park, IL 60130 

Line Spacing 

I have a Radio Shack Model II, a 
Daisy Wheel II Printer and Scripsit. I 
use this system for preparing patent 
applications. 

I file U.S. patent applications direct- 
ly from my system, however for foreign 
filing It is a requirement that the appli- 
cations be typed at a line spacing of 
one and a half (1 .5), and the lines num- 
bered at every fifth line. I do not know 
how to get my system to comply with 
this format and would appreciate any 
suggestions from you or your readers. 

Michael J. Welns 

3 Humphrey 

Convent Station, NJ 07961 



TFORTH Info wanted 

Do any readers have information on 
the use of TFORTH? On the basis of 
continual advertising in 80 Microcom- 
puting, I recently bought TFORTH from 
Slrlus Systems In Knoxvllle, TN. After 
months of hassle they finally delivered 
the software, but without instructions 
for making TFORTH produce /CMD 
flies. This advertised feature was the 
only reason I spent $140 on the soft- 
ware to begin with. Sirlus never 
answered letters, and now thetr phone 
Is disconnected too. If anyone Is famil- 
iar with this software, or with the 
authors of it, please write! In particu- 
lar, I would like to get in touch with 
David Wedeking, who was listed as 
technical support on this package. 

Roxton Baxter 

Box 8272 

APO San Francisco 96555 

HPLC-pumps 

HPLC is an important analytical 
technique in biochemical and chemi- 
cal laboratories. Several companies 
sell modular Instruments consisting, 
among other things, of the pumps and 
a microprocessor control unit running 
the pumps. 

I am searching for a person, who has 
interfaced a simple, cheap computer 
(such as the Apple II) to HPLC-pumps. 
This ought to be a simple matter and 
much cheaper and more fun to do. 

Could you help me to find a reference 
to such an application? I would greatly 
appreciate any assistance that you 
can give me. 

Kasper Kirschner, Ph.D. 

Professor of Physical Biochemistry 

Stanford University 

Stanford, CA 



Exchange Software? 

I've written three game programs as 
well as some business application 



units, and I suspect that there are 
many other readers who have done 
much the same. 

If you'd be Interested In hashing 
over some ideas for exchanging pro- 
grams (I'm thinking of some sort of two 
for one deal), drop me a line and I'll put 
together the Ideas and get back to you 
with an operating proposal. 

Describe programs you've devel- 
oped, memory required, disk or cas- 
sette, or Model I. II, or 1)1 (Level also. If 
It's Level I). 

Jay Chidsey 

205 East Adams Street 

Green Springs, OH 44836 

Memory Chips Needed? 

Does the TRS-80 expansion Inter- 
face require special memory chips? 
Some advertisers have different part 
numlaers for the interface. 

I ordered a complete set from God- 
txiut. They worked in the keyboard but 
not In the interface. Radio Shack's re- 
pair said they were too fast. Could you 
please explain this. 

Harvey Churkey 

3056 Water Street, Apt. 33 

Stevens Point. Wl 54481 

Model II Tabs 

After having used a Model I for 
several years to my full satisfaction, I 
have recently t»ught a Model II which I 
hope will be as reliable as my Model I. 
In the meantime I twught a new printer, 
the C.ITOH 8510 dotmatrix model, 
which I was told would sooner or later 
also be available in the U.S. I find it a 
fantastic printer which can easily com- 
pete with the popular ones available in 
the U.S. One of the features allows the 
user to set up Individual Tabs and to 
call these then successively with 
CHR$(9) instructions. This allows the 
use of the proportional spacing func- 
tion and still have straight columns. 
Unfortunately, the Model M has preset 
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Our incredible 
low prices 

2% lower. 

"^ke an additional 2% off our listed prices, until December 24. 

Have a merry computer 
and a happy software. 




PRINTERS 

ANADEX DP 9500 1296 00 

ANAOEXDP9501 129500 

CENTRONICS 739 785.00 

C1TOH25CPS PARALLEL 1440 00 

CITOH 25 CPS SERIAL 1495.00 

C-ITOM 45 CPS PARALLEL 1 770.00 

CITOH 40 CPS SERIAL 1670 00 

C-ITOM TRACTOR OPTION 195 00 

EPSON MX-80 SCALL 

EPSON MX 80 Frr SCALL 

EPSON MX 100 GRAPHIC SCALL 

EPSON GRAPHICS ROM 90 00 

IDS 445G PAPER TIGER 779 00 

IDS 460G PAPER TIGER 945.00 

IDS-560G PAPER TIGER 1195.00 

MALIBU 200 DUAL MODE 2695.00 

NEC SPINWRITER 3510 SERIAL RO 2195.00 

NEC SPINWRITER 3530 PARALLEL HO . , 2196.00 
NEC SPINWRITER 7710 SERIAL RO 2645,00 

NEC SPINWRITER 7730 PARALLEL RO . 2M6.00 

NEC SPINWRITER 7700 D SELLUM OPTION . 2795.00 
NEC SPINWRITER 3500 SELLUM OPTION -. .2295.00 

0KIDATAMICROLINE80 399.00 

OKIDATAMICROLINE82A 569.00 

OKIDATA MICROLINE 83A 799 00 

0KIDATAMICR0LINE84 1199.00 

16K RAM SPECIAL 13.95 

SET OF 8 NEC 4116 ns WITH INSTRUCTIONS 
GUARANTEED ONE FULL YEAR, 



MODEL I, III SOFTWARE 

LAZY WRITER MOD 1 119,00 

LAZY WRITER MOD III 169-00 

MICROPflOOF SPELLING CHECK 84,96 

PROSOFT NEWSCRIPT MOD I. Ill 99-00 

PROSOFT MAILING LABELS 29.95 

PROSOFT NEWSCRIPT LABELS 115 00 

SPECIAL DELIVERY MOD I. Ill 11900 

XTRA SPECIAL DELIVERY MOD I. Ill 179 00 

TRACKCESSMOD I 24,95 

OMNITERM SMART TERMINAL MOD l.lll 89 96 

MAXI-MANAGER 89,95 

DOS PLUS 3.3 89.00 

LDOS 139 00 



DISKETTES 



ALPHA DISKS® 21.95 



SINGLE SIDED. CERTIFIED DOUBLE DENSITY 

40 TRACKS, WITH HUB-RING. BOX OF 10 

GUARENTEED ONE FULL YEAR 

VERBATIM 

MD525«1. 10,16 26-50 

MD 550-01,10,16 44.50 

MD 577-01,10.16 34.80 

FD 32 OR 34 9000 36 00 

FD 32 OR 34-8000 45,60 

FD34-4O01 4860 



DYSAN 

5V..SS/DD, B0X0F5 



.24.50 



DISKETTE STORAGE 

5V." PLASTIC LIBRARY CASE 2,50 

e" PLASTIC LIBRARY CASE 3,50 

PLASTIC STORAGE BINDER WITH INSERTS , 9,95 

PROTECTORS". 21,95 

PROTECTOR S 24.95 

TRS-80 MOD I HARDWARE 

PERCOM DATA SEPARATOR 27,00 

PERCOM DOUBLEH II 15900 

TANDON 80 TRACK DISK DRIVE 429,00 

TANDON 40 TRACK DISK DRIVE 299.00 

LNWDOUBLERWITH DOSPLUS3.3D 159,00 

TRS-80 MOD I 32K EXPANSION INTERFACE , . 355,00 

MODEMS 

NOVATION CAT ACOUSTIC 145.00 

NOVATION 0-CAT DIRECT CONNECT . 155.00 

NOVATION AUTOCAT AUTO ANSWER 219 00 

UDS 103 LP DIRECT CONNECT 17500 

D C HAYES STACK Smart Modem (RS-232) , , 249 00 
LEXICON LX-11 109.00 



CP/M« SOFTWARE FOR MOD II 

MICROSOFT 

MICROSOFT BAS1C-80 299.00 

MICROSOFT BASIC COMPILER 319.00 

MICROSOFT FORTRAN-80 399.00 

COBOL 80 599,00 

MICRO PRO 

WORDSTAR 325^ 

MAILMERGE (REQUIRES WORDSTAR) IIOJX) 

SPELLSTAR [REQUIRES WORDSTAR) 199.00 

SUPERSORT 186.00 

DATASTAR 245.00 

PEACHTREE 

GENERAL LEDGER 595.00 

ACCT RECEIVABLE 595.00 

ACCT, PAYABLE 995.00 

PAYROLL 998.00 

INVENTORY 99S.O0 

PROPERTY MGMT 799.00 

CPA CLIENT WRITE-UP 799,00 

MAGiCWAND 299.00 

OTHER CP/M® SOFTWARE 

SPELLGUARD 239.00 

SUPERCALC 229.00 

COMMX TERMINAL SOFTWARE 79.00 

dBASEll 599.00 

PICKLES AND TROUT CP/M* MO0IITRS«) ..175.00 



SUPPLIES 

AVERY TABULABLES 

1,0003V. X 15/15 S-W 

3,000 3 V. X 15/16 14.98 

5.0003'/i X 15/16 19.96 

FAN FOLD PAPER (MC..F.O.B.S.P.) 

9Vt XII 181b while 3000 ct 29.00 

14 7fi X 11 18lt) white 3000 cl 39.00 

*^e9 



CORVUS 

TRS-80 MOD Ml 

ConKolio', CasefP.S.. Op*r*llng Syatem. A&T 

5 Megabytss 3245 00 

lOMegabylss 4HSX 

30M«gaDyt«s SS4S.O0 

MIRROR BACK-UP 728 00 



SPECIALS 

SPECIAL NO. 1 

TRS80 DISK AND OTHER MYSTERIES. BOX OF 
VERBATIM DISKS, PLASTIC LrBRARV CASE 44 50 

SPECIAL NO. 3 

NEWDOSflO 2.0, BOX OF VERBATIM DISKS.PLASTtC 
UBHARYCASE 14900 

SPECIAL NO. 4 

MICK)80FT BASIC COMPILER, BOX OF VERBATIM 
DISKS, PLASTIC LIBRARY CASE 190 00 

SPECIAL NO.S 

MICROSOFT BASIC DECOOEB AND OTHER 
MYSTERIES, BOX OF VERBATIM DISKS PLASTIC 
UBHARYCASE 4995 

DOUBLE DENSITY SPECIAL 

PERCOM OOUBLER H NEWDOS/80, BOX OF 
VERBATIM DISKS, PLASTIC LIBRARY CASE 279 00 

COMMUNICATION SPECIAL MOO I & III 

NOVATION MODEM. OMNITEHM TERMINAL 
SOFTWARE, RS 232 CABLE 

ACOUSTIC SPECIAL 239 00 

DIRECT CONNECT SPECIAL 2S9 00 

DISK LIBRARY SPECIAL 

PAGET DISKCAT CATALOGING PROGRAM, FLIP 
SORT (50 DISK CAPACrTY), 50 STICK-ON DISK 
LABELS 59.95 



TWO NEW 'OTHER MYSTERIES' 
BOOKS 

THE CUSTOM TR&«) 24 95 

MICROSOFT BASIC FASTER AND BETTER 24 95 



Alpha Byte is proud to feature the finest 
business software available for the TRS-80 
from Occupational Computing Co., Inc. 



TRS-80 GAMES 



TEMPLE OF APSH Al 34 95 

HELLFIRE WARRIOR 34 9S 

STARWARRIOR 34 96 

RESCUE AT RIGEL 24 96 

CRUSH, CRUMBLE & CHOMP 24 96 

INVADERS FROM SPACE 17 95 

PINBALL 1796 

STAR TREK 3 5 tfM 

MISSILE ATTACK tCJt 

STAR FIGHTER 24JS 

ZCHESSill MM 

ADVENTURE NO, 1 ,2 » 3 34.96 

ADVENTURE NO. 4.5 « 8 34 «5 

ADVENTURE NO 7.8 4 9 34 95 

DUEL-NOROIDS 1795 

STAHFLEET ORION ,2195 

INVASION ORION 21 95 

OLYMPIC DECATHLON 24 95 

ZORK 3495 

MONTY PLAYS MONOPOLY 3l 95 

SARGONH ; 3195 

BLACKJACK MASTER 27 95 

ROBOT ATTACK 1795 

GALAXY INVASION 1 7 95 

SUPERNOVA 17 95 

TUESDAY MORNING OUATERBACK 2fl 95 

LUNAHLANDER 1895 

THE MEAN CHECKER MACHINE 21 95 

GAMMON CMALLANGEfl 18 96 

SPACE ROCKS 18 95 

PIGSKIN 17 96 

20SSEO IN SPACE 18 95 

ARCADE*) 21 95 

COMBAT 18 95 

SPACE INTRUDERS , 17 95 

SILVER FLASH 17 95 

MORTON S FORK 26 95 

PROJECT OMEGA 2195 

CP/M IS i rBg>stere<l uaOeirwk of OigiUt Research 



OCC A/R WITH BILLING AND 
INVENTORY CONTROL 

One step posting prints an invoice, 
reduces inventory, posts to customer 
ledger and accumulates sales analysis. 
Can be set up as Open Item or Balance 
Forward system. 

Model I. Ml 750.00 

Model II 1495-00 

OCC PAYROLL 

Includes: Multiple Pay Freqencles, 
Salary or Hourly. Automatic Deductions 
(Federal. Stale. FrCA, Disability In- 
surance), Commissions. Bonuses. Tips. 
Complete Journal. Ctieck Writer, Chech 
Register. Quarterly 94IA and Yearly W-2 
Reports. 

Model I, III 350 00 

Model II 495.00 

OCC UNION REPORTING 

Features: Interfaces with OCC Payroll 
(Data entry is Irom employee time card). 
Flexible Local Set-up (Union Codes and 
Classifications), Computation and repor- 
ting of Various Funds (Vacations, Dues, 
Pensions, Health & Welfare, Industry, 
raining, Promotion, Contract Ad- 
ministration). 
Model II 495,00 

OCC ORDER ENTRY 

Features: Allows On-Line Entry and 
Maintenance of Customer Orders, Sup- 
ports Credit Memos, Standard & Non- 
standard Discounts and Total BacK- 
Order Control. Automatically Interfaces 
to OCC A/R, Billing & Inventory Control, 
Model II 995,00 




OCC MANUFACTURING 
INVENTORY CONTROL 

Features; Bill of Material 'Explosion" 
maintains inventories In up to 10 levels 
of subassemblies and/or components. 
Allocates and relieves raw materials 
based on input of production schedules 
and completions thru the bill of 
Materials Explosion Update and Prints 
Bill of Materials Cost Report. All or 
selected ranges of assemblies are 'Ex- 
ploded' into the lowest level com- 
ponents; quantities and unit prices are 
extended for each component to give a 
unit cost for the entire assembly. Prints 
Inventory Exception Report and Sug- 
gested Purchase Orders. Automatically 
interfaces to OCC A/R , Billing and In- 
ventory Control and OCC Order Entry 
Systems, 
Model II 995.00 



AH OCC Software is supplied with user 
oriented manuals that include easy user 
installation instructions, OCC Software 
is written in Radio Shack Basic and runs 
under TRSDOS, OCC Software uses 
Keyed Sequential Access Method 
(KSAM) File structure, Binary searches 
and fast Machine Language Sorts to In- 
sure the fastest possible execution, 
OCC's Exceptional Screen Control For- 
mat makes data entry as easy as filling 
out a form. Related OCC Software 
packages interface to form complete 
MENU DRIVEN Accounting systems. 

I( you have a serious business applica- 
tion then you should consider OCC Soft- 
ware. Call for a complete description of 
any of OCC's Business Packages. 



We built a reputation on our 
prices and your satisfaction. 

We guaiamee e^/er/ming «e seii lo' .10 days 11 anyin.ng 1% 
wrong )usi return me ilem and we 11 rnake il nght And cil 
cojise «e II oay me sh'PDing charges 

We acceoi Visa and Master Caro on aii oideis COO ordeis 
accepted up to S300 00 

Please add S2 00 fo* standato UPS snipping and nar^dlmQ 
on orders ur>def SO pounds delivered m ihe continental u S 
Call us tot stripping cliaigeson <tems mat weigti more than ^0 
pounds Foreign, f PO and APO orders please add 15% tor 
stiipping Calilornia residents add 6% sues tax 

trie prices quoleo are oni|( valid tor stock on tiaiw artd all 

prices are sutnect to charge without notice 



(213)706-0333 

31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 
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oonllnumd tram p»gm 18 

Here's how I recycle my ribbon. When 
the cartridge viewing window shows little 
ribbon left, It Is time to recycle. 

Renwve the belt drive from the car- 
tridge and pry up the cover. Seven frlctlon- 
flt pins hold the cartridge cover In place. 
Uft the transparent plastic disk from the 
empty supply reel. 

Locate the two pinch rollers. One has a 
heavy spring and one has a light spring. 
Note how and where the pinch rollers fit. 
Then, remove both to permit rewinding. 

To rewind, Insert a ball-point pen tip In a 
hub spoke of the supply reel and use as a 
cranK. Ten minutes of rewinding does It 
(Just think about the $8 as you rewind). 

Reassemble. Replace the pinch rollers; 
a paper-clip hook may help with the light 
spring. Take up the ribbon slack. Replace 
the transparent disk on the now-full sup- 
ply reel. Press the cartridge cover back on. 
Replace the cartridge drive belt. 



I next tape a label on the cartridge to 
make It easy to see whether an Installed 
cartridge Is fresh or recycled. 

Michael Meyers 
Montclair. NJ 

Second Cousins 

There Is an error (technical error, not a 
program bug) In my program "Family Re- 
lationships" published In the August 
Issue. Though my wife has used this pro- 
gram tor over two years, the particular er- 
ror never came up, but Colin Durston, 
Mount SInal, NY found It. 

In lines 1860 and 2040, the third GOTO 
should be 1660 Instead of 16B0. As It Is, 
the reletlonshlp between a fourth and 
third generation Is given as "Second 
Cousin Twice Removed" when It should 
be "Second Cousin Once Removed." In 
any event, they are distant cousins, and 



$i9A1D 
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Tabs SO that when a CHRS(g) Is sent, 
values In Increments of nine are sent. I 
wonder, therefore. If there Is any Model 
II user who knows a patch that would 
send pure CMR$(9)'s without any val- 
ues to the printer. Any help would be 
greatly appreciated. 

RoH RoethHabBrger 

34 Rue Daubin 

OH-1203 Geneva 

Switzerland 

Peripheral People 

Can anyone tell me what has hap- 
pened to The Peripheral People, P.O. 
Box 524, Mercer Island, WA 980407 
Early this year I purchased a Data Dub- 
ber from them. I returned It In April for 
repairs. Since then I have heard 
nothing from them although I have 
written several times and even sent 
one letter certified, return receipt re- 
quested. The return receipt was signed 
but I could not read it well enough to 
determine who signed It. Any Informa- 
tion would be appreciated. 

J. Paul Ward 
Route 2. Box 890 
Afton, VA 22920 



Freeing Memory 



in response to David M. McCord's 
letter {80 Aid, August 1981) to free up 
14, 831 bytes on the TRS-80 Color Com- 
puter (16K) try the following: 

POKE 25,8 
NEW 
CLEAR a 

This Information is courtesy of Con- 
nection '80 of Woodhaven, NY. 

Joel Hoffer 

251-14 58th Avenue 

LittJeNeck. NY 11362 



Bowling Scores 

Our company recently formed a 
bowling league Just for fun ... we don't 
know how long It will last, so we're not 
willing to spend a lot on It. Do any of 
your readers have some programs to 
compute bowling statistics on disk 
or tape? 

Dave McQIumphy 

4429 Paula Lane 

Red Bank. TN 37415 



there Isn't much harm In It, but I felt you 
should know about the error. At least 
there are people out there not only reading 
the magazine, but analyzing the pro- 
grams! Greall 

Silam Horwitz. FPSA, ARPS 
Lake Mary, FL 



Star Trek 4.0 

We enjoyed your August 'Games' issue 
very much. 

Star Trek 4.0 Is especially well done 
except for the title page. The new lines 
120 and 130 gave us a more acceptable 
title page. 

120 CLS A1| = ' ■:BU-'<t>'Y2»791 FOflll -1T0 
100:X2= HN[>(lD231:PRINToX2/.',:NEXTI1:PHINT 
0*r2:STAR TREK', PRINToiM,'>l<';:PHINT«370, 
■+ + +■, FORI1 ■1TO10:PRINTOY2.AlS;:Y2-Y2-66: 
PfllNTaY2,B1J;:F0RJ1 = 1TO200:NEXTJ1,l1:P«NTo 
938, INSTRUCTIONS? (Y/N)', 

130 AS - INKEYS.IFAS <E 'Y TMENQOSUB34eOEL.SEIFAt 
ON TMENIM 

Mike Salisbury 
Newport Beach. CA 



Basic XOR 



The designers of the TRS-80 Level II 
Basic were Ingenious. They made It very 
flexible. It Is suited for beginners and has 
features for us more advanced folks. The 
TRS-80 has three Boolean operators: 
AND, OR and NOT. The XOR operator, 
though not as popular. Is sometimes 
needed. Since Basic does not include this, 
I have written a formula using the com- 
mands that Basic does have to XOR any 
two numbers. Instead of: C = A XOR B 
UseiC = NOT(AANDB)ANDNOT(NOTA 
AND NOT B). 

Jim Mickey 
Clearlake, CA 

For. . .Next Loops 

The September 1961 column, "Educa- 
tion 80," by Earl Savage, contains some 
good advice on flowcharting, for educa- 
tors and non-educators alike. However, 
his flowchart of a For . . . Next loop is Inac- 
curate, at least for the TRS-80. His Fig. 2 
shows a flowchart for a For. . . Next loop 
where X varies from 1 to 10. According to 
this chart, X will have the value of 10 after 
coming out of the loop. In actuality, X will 
have a value of 11 since the For. . .Next 
loop lncrerT>ents first and then tests for X 
being out of range. A more accurate flow- 
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How to maximize 
your McxM III : 



You don't have to settle for 
standard equipment. Let MTI 
and Alpha Byte help you build 
the Model III you want. 




MTI FLOPPY DISK ADD-ON KITS 

Now you can upgrade your I6K level II Model III to 
a lull 48K Disk System the easy way with Mils 
Dout)le Density Disk Controller and your choice of 
Disk Onves You can choose 40 track. DouDle- 
Sided 40 track or Double-Sided 60 track Drives to 
supply your disk storage needs Forty Track 
Drives store I75K, Double-sided 40 Track drives 
store 350K Four Double-SideC 80 Track Drives 
provide up to 3 MEGABYTES Of On-Line storage 

INTERNAL DISK DRIVE KITS 

The first drive kit mciuds one Tandon Disk Drive. 
MTI Double Density Controller, Switching power 
supply. 32K ol RAM, all mounting hardware, 
cables and Detailed installation Instructions Ttie 
second internal drive kit includes a second drive 
and the necessary inslallalion hardware. 

40 IflACK DfliVE SvSIEM 
DniVE m 1 KIT 695 00 

DfllvENO 2 KIT 279 00 

40 TRACK DUAL HEAD SYSTEM 
DRIVE NO I "9 00 

DIIIVE NO 2 389 00 

SO TRACK DUAL HEAD SVSTEM 
DfllVE NO 1 929 00 

DRIVE NO 2 M9 U 



EXTERNAL DRIVE KITS 

Two external drives can be attached to any dual 
drive Model III Computer. 

40 TRACK EXTERNAL ORIVES 
DRIVE NO 3 379 00 

DRIVE NO 4 3M 00 

DUAL HEAD 40 TRACK EXTERNAL DRIVES 
DRIVE NO 3 499 00 

DRIVE NO 4 479 00 

DUAL HEAD SO TRACK EXTERftAL DRIVES 

DRIVE NO 3 679 00 

DRIVE NO 4 659 00 

nVE MEGABYTE EXTERNAL 

WINCHESTER HARD DRIVE 2795 00 

Add the Ultimate ir Fast High Capacity Disk 
Storage to any Modet ill Floppy Disk system 
Reliable Winchester technology provides enough 
storage tor the largest business tiles Winchester 
disk drives have greatly increased data transfer 
rates and that means taster program and tile 
loading This is a complete selt contained system 
that connects to a standard Model Ml Disk System 
m minutes without any modification to the com- 
puter. 

MODEL til DIAGNOSTIC PROGRAM 49.95 

A complete diagnostic program for the Mooel III. 
Tests RAM and ROM. video display and all disk 
drives Catch problems while they re small and 
be sure that your Model til is in perfect running 
condition. 




MOOEL til CP/M-80 NOW AVAILABLE! 849.00 
CP/M A SO Column Kit. 

Now you can run proven CP/M based software on 
your Model III. with standard 80 column display 
A simple internal modification will transform your 
Mode! Ill into a NEW computer and allow you to 
run CP/M the industry-standard operating system 
and assure you of a targe supply of fine software 
Includes CP/M 2 2 

MODEL III SPEED-UP MOD 149.00 

Now you can run your Model Hi at 4 MEGAHERTZ. 

that's almost double the standard speed This 
simpie-lo-inslail kit does require some soldering 

MODEL III DISK DRIVE CLEANING KIT 24.95 

Uses soft non-abrasive cleaning material and in- 
cludes a disk head excercising program to Insure 

thorough cleaning, 

DOSPLUS OPERATING SYSTEMS 
FOR THE MODEL III 

Solid BUG-FREE operating systems for the Model 
III. Supports different size drives on the same 
system and Basic Program Chaining with 
variables saved in memory 

40 TRACK . . .M.00 

BOTRACK . 119.M 

EXPANDED OOSPLUS 3 3 8 149.00 

Rud am Write 40 Vk* OtsKtnti on in BO Tncn Sytlfm 
HAROOiSKOOSKUS 299 W 

Suppons the MTI S MEG HARD DISK 



We built a reputation on our 
prices and your satisfaction. 

We guarariiee everyihsng we seii lot 30 days II anyimtig 
IS wrong, just return the item and we II make it right, 
And. ol course, we'll pay the shipping charges 

We accept Visa and Master Card on all orders COD 
accepted up to S300.00 

Please add S2 00 tor standard UPS shipping and 
nandling on orders under 50 pounds, delivered in the 
continenlal U S Call us lor shipping charges on items 
mat weigh more than 50 pounds Foreign, FPO and APO 

orders please add t5% tor shipping California res- 
idents add 6% sales lax 



(213)706-0333 

31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 
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Scripsit Patches 



The modification described in my ar- 
ticle "Patching Across" (flO Microcom- 
puting, September 1981) wiii work with 
DOS 1.1 and DOS 1.3, but it wili not 
work with DOS 1.2. Readers who need 
Scripsit on DOS 1.2 can write me for 
the additional patches needed with 
this operating system. 

Radio Shack has been changing the 
convention tor setting EOF in the di- 
rectory. My version of Scripsit sets the 
EOF character incorrectly in DOS 1.3. 
Luckily, Scripsit is still able to read 
such files, so no harm is done. For 
cosmetic reasons, it would be best to 
fix this problem. Change 7D47 from CD 
6E 7A to 3A B9 7C, change 7DCD from 
EF 5D to 6C 7A, and change 9A6C from 
00 00 3A B9 7C B7 28 01 05 C9 to E5 CD 
EF5D21 BD7C35 El 09. 

I recommend that all users, regard- 
less of DOS. make two more changes. 
Change 7260 from 21 FF 00 25 7E to 2A 
1 1 44 18 05 and change 8595 from 00 00 
to 2D 40. As a result, Scripsit will not 
overwrite programs protected in high 
memory and will return directly to DOS 
rather than rebooting when executing 
the command END. 

Richard Koch 

2740 Washington Street 

Eugene. OR 97405 



LINEINPUT Error 

In reference to my article "Take a 
Letter" which appeared in the August 
1981 issue: Thomas P. Winslow of 
Troutman, NC points out that the pro- 
gram is disk-oriented. Not having a 
disk, he encountered an L2 error on his 
Model 111 Level II system. 

The problem lies in the LINEINPUT 
statement. This statement will cause 
an error when execution is attempted 
on a non-disk machine. 

The only solution I could offer Mr. 
Winslow was to replace all LINEINPUT 
statements with the more familiar IN- 
PUT statement. The disadvantage is 
that any text lines containing delimiters 



such as commas will have to be en- 
closed using quotation marks. This 
will also prohibit the use of quotation 
marks in the actual text. Failure to 
enclose text with quotation marks 
when commas are used will be met 
with an Extra Ignored message and all 
after the initial comma will be lost. 

My thanks to Mr. Winslow for re- 
minding me to describe my particular 
system in future articles. 

Arthur T. Mullin, Jr. 

2395 Tyler 

Beaumor)t, TX 77703 



Mode Selection 

My article on the Epson Printer in 
the August issue was written for the 
Model I, Level II TRS-80. Since its 
publication, I have received several let- 
ters and phone calls on how to make 
the Mode Selection Program published 
in the article work with the Model 111. 

As many of your readers know the 
Model I utilizes a memory mapped I/O 
to operate a line printer through the ex- 
pansion interface at address 14312 
(37E8H). The Model III doesn't use 
memory mapped I/O for the printer in- 
terface. Instead it uses one of the 256 
ports to operate a line printer, in par- 
ticular port 251 (OFBH). In order to run 
the Mode Seiection Program in the 
Model III. aii the POKE 14312 com- 
mands should be changed to OUT 251. 
As an example line 30390 in the Mode 
Seiection program wouid read as 
follows: 

FOR MODEL 1 30390 POKE 14312 15 
FOR MODEL III 30390 OUT 251.15 

It should be noted that the Modei III still 
uses address 14312 to provide printer 
status. 

If all the POKE 14312. XX statements 
are changed to OUT 251 ,XX statements, 
the program will work fine in a Modei III. 

One other note, somewhere in the re- 
view cycle, the text of the article and the 
program listings got confused. The arti- 
cle states that the examples in Fig. 1 
were made with Program Listing 1. This 
is incorrect. The examples were run 
from Program Listing 2. The Mode Se- 



lection Program is referred to In the text 
as Program Listing 2, and it Is really Pro- 
gram Listing 1. 

A. P. (Tony) Gitt 
11260 Overland §10-B 
Culver City, CA 90230 



Statistics Corrections 

My article "Vital Statistics" (August 
1981). has a few errors in the figures. 
On page 197, column 1 should read: 



nX, 

1 = 1 
GM = ^ a-11,111 T- lYs'- iTsiBs 



^v 20576.1 =11.9768° 



^ 160(100 - 1 =0.124662 
4.. 



GM- 



^ 1 08-1. Iini'l. 125-1. 1B519 

On page 198. column 1 should read: 



On page 200, column 1 should read: 



1 i«,-xt' 
1 = 1 



C. Brian Honess 
22 Shaftesbury Lane 
Columbia. SC 29209 



Up and Running 



I enjoyed Lt. Harreil's excellent arti- 
cle and programming presented in the 
July issue of 50. Thanks to that article 
my Tiny Pascal is up and running on 
disk. 

I found two minor bugs when run- 
ning with my 48K system and thought 
other users might be interested in the 
solutions I used. 

The Basic routine. Program Listing 
3. defines AD as an integer which 
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WHY 

TALKING 

ROBOT 

ATTACK 




ALL games: 

t6KLevel2. Mod 1 * Mod 3Cassetie (15 95 

32k Level 2. Mod 1 * Mod 3 Diskelle S19 95 

10% diBCOuni lor 2 games. 15% (or 3 or more 

\Games may be played with or without joystick. 



IS THE ALPHA JOYSTICK 
SUCH A SUCCESS ? 

A Sofwate support like ihis : 

TALKING 
ROBOT ATTACK 

INCREDIBLE! This amazing game actually TALKS 
withoul a speech synlhesizer. Ihf ough Ihe cassette 
AUXplug 

You are armed with )ust a tianc] held laser in a 
remote section of ttie space slalion you encounler 
armed robots, some march towards you, some wait 
around corners Watch out, the walls are electrified 
Zap as many robots as you dare belore escaping 
into a new section where more fot)ots await you 
The struggle continues. With Joystick action and 




SCARFMAN 



m. 



SUPER NOVA* 

Asleioios tioBi ominous iy i'Su^O 'fe 
sciBWi vou fnusi Oesifoy me asieiwds 
MloTR they Oesiroy you* iBig asiefoiOs 
Drsak inio Utile ones i Vour ship wtli 
respono to mrust 'otaie nypetsoace 
ana '"« Waieh out tor tful saucei witfi 
the laser* As leviewied m May 198I Byte 
Magazine 



"» 


' *a 


n 




'u 


« • 




VOICE OUTPUT, this game will amaze you 






SCARFMAN 

THE LATEST ARCADE CRAZE now runs on your 

TRS-60 

Its eat or be eaten You control Scarfman around 

the maze, gobbing up everything in your path You 

attempt to eat it all belore Ihe monsters devour you 

Ditficuity increases as game progresses Excellent 

high speed machine language action game From 

The Comsoft Group. With sound. 

CAUTION: Played with the Alpha Joystick, Scarlman 

may become addictive 



GAUXY INVASION 



The souno o( Ifie fcianon •% catnng you' 
invaMrs have Deen spoTieO waipmg 
towa'd Earlh Vou snili ngni and leli as 
you 'lie you' lasers A lew tweak tptm 
at'on ana fly slratght at you' Vou PWe 
VI,:,' ^nge' o" ihe lire Dulton knowing 
trot ■IIS shot musi connect' Witn sounfl 
■tieUs' 



AHACK FORC^ 



As »ou' snLp appears on me Doiiom of 
the ma^e e>gm alien ships appear on ine 
lop. all traveling Oireaiy ai you' Vou 
move iQwaroihem ana lire missiles Bui 
tne more aliens you destroy ihe laslei 
the remaining ones become It you gel 
too good ytiu musi endure the Flag 
snip WilhsouneeHKls' 




COSMIC FIGHTER'' METEOR MISSION 11* 



'our snip comei oui oi nypeispace 
under a convoy oi aliens Vou aesi'oy 
every one Bui anoiner set appears 
These seem more mieiiigenl Vou 
eliminate Ihem too Vour tuei suDP'y is 
diminishing Vou must destroy I wo more 
seis Deiore you can aoch Tne space 
station IS MM on your scanner Wnn 
sound I 



As you luti" OdX'i uh fju' new 

astronauts cry oul loi le&cue Vou must 
maneuver thfougli me asteroids & 
meteors (Can you gel Hack lo Ihe space 
station'') Fire lasers to destroy ihe 
asieroias DuI watch oul there could be 
an anen FLAGSHIP lurking includes | 
sound eltects' 



THE ALPHA joystick: 
REAL ARCADE ACTION 



ONLY 
.$39.95 



■ Features the famous ATARI JOYSTICK 
BWorks with any Level II or disk system Model i 
QPiugs directly into KB or E/l (next to printer port) 
HCompatible with any other TRS-80 accessories 
□Saves your keyboard 

■ Fun 10 experiment in BASIC Simply use A = INP(0) 
to read the joystick 

■Fully assembled, ready to plug m and use 

Price includes Atari Joystick + Alpha Interface + 
instructions + demo program The Alpha Joystick 
is backed by an unconditional money back 
guarantee If you are not delighted with it. return it 
within 14 days tor a prompt and courteous refund 




Toll Free 
Order Line 

(800) 
221-0916 



>D[) 1 1 SO n» DROER FOR SHIPPIKG AND HIMDHHG 

4lL ORDERS Shipped first ClASS MUll 

WE HCCEPIVISt MtSIERCHARGf CHECKS MO 

COO ADDS2IKIE«TH* 

DUANIITT DISCOUNTS AVAHtlLE 

H 1 RESIDENTS >DD SALES T«X 




ALPHA Products 



*^2i0 



85-71 79th Street Woodhaven NY 11421 



(212) 296 5916 



^INPUT 



fO DEBUg 



continued fmm page 26 

causes an Overflow in 11 error when 
you are saving a long program. 

The Basic routine, Program Listing 
2, is reserving more memory than a 
system running NEWDOS 80 has to of- 
fer when a full systems disk is loaded. I 
redimensioned A$ in line 2 to 220 lines 
and so far have not overrun memory. I 
might also add that CMD PAS32K sent 
my system into never-never land but 
CMD's = PAS32K' works swell. I sus- 
pect it has something to do with the re- 
locations invoked by NEWDOS under 
the CMD function. 

The correct version of the program 
appears below: 



1 POKE &H40B1,&HEF POKE «H40B2,«H73. 
CLEAR 500:CLS. OEFINT B Z 

2 PRINT TAB<16|"" TINY ■ PASCAL " FILE 
SAVER" 

3 PRINT 

4 LINE INPUTENTER FILESPEC FOR PASCAL 
FILE: -.FI 

5 IFF$ = — THEN4 

6 ON ERROR GOTO 16 

7 OPEN 0".1.FJ0N 6RROnGOTO0 

8 AD = aH73F0 

g As = — 

ID J = PEEK(AOV IF J = 255 THEN 15 

11 AD = AD + 1: IF AO = 3276eTHEN AD= AD 

12 IF J = 13 THEN 14 

13 AS = AS + CHR$(J):GOTO 10 

14 PRINT«1.A$ PRINT AI: GOTO 9 

15 PRINT#1.CHRJ(2551,CHRS(255) CLOSE 
POKE&H40B1.4HFF;POKE4H40B2.4HBF 
CLEAR50:END 

16 CMD'E". RESUME 4 

Lynn Ludwig 

37 Church Street 

Alburtis. PA 18011 

Incomplete Listing 

I'm not sure how we did it after the 
careful scrutinizing of my article by 
myself and the staff of 80 Microcom- 
puting. The last eight lines were left off 
my "Video Space Ship Game" (August 
1981 issue). They are included below: 



4460 E = E + 1 

4470 GOSUB 3800 

4472 'BLANKS ' 0AW 

4480 POKE V,32:POKE Y- 1.32:POKE Y-2,32 

4490 T = 

4499 RETURN 

10000 IF J>31 THEN J =0 

10010 RESUME NEXT 



I hope that the readers of 80 will for- 
give our oversight. 

Michael A. Dutfin 

1507 East Avenue 

Berwyn, Illinois 60402 

Bubble Sort 

The program listing for a bubble sort 
on page 313, Listing 5 (August 1981, 
80 Microcomputing) contains a seri- 
ous error in logic. This sort will not 
work on 11 or more items. To make it 
work properly, the variable EE (swap 
flag) must be moved outside the P 
loop. Line 1210 becomes 1210 EE = : 
FOR P=l TO N-Dand Line 1230 be- 
comes 1230 J = P. 

This sort is now serving my needs 
nicely. 

John McGugan 

Sunshine Golf Inc. 

13335 S.W. 77th Ave 

Miami. FL 33158 



Lifespan Is Longer 

In my program "Lifespan," which 
appears on page 252 of the September 
1981 issue of 80 Microcomputing, the 
last two lines have been omitted. 

These should be added; 

1610 GOTO 40 

1620 'You are very fortunate to Still t>e living!': 
RETURN 

Joseph Wailand 

1343 Millersport Highway 

Williamsville, NY 14221 



Cartoon Fix 



Sorry to inform you that line 900 in 
my TRS-80 Cartoon (September 1981, 
page 320), is wrong. The last statement 
in that line should be a 'RETURN', 
rather than 'GOTO 30'. 



Darren DeVigili 
Wilkes-Barre. PA 



continued from page 24 

chart would be as follows: 

I input 



X = l 



^ 


.NO 


,r 




X> 10 


LPRINT X 1 




"L 


\ ? / 


1 


\y^ 


1 


V V 4 ! 


1 l/C 





Also in the September issue, on page 48 
("80 Applications"), the captions tor Pho- 
tos 6 and 7 are reversed. Photo 6 should be 
labeled "Transistors" and Photo 7, 
"Diodes." 

Marie Matsen 

Microcomputer Lab Coordinator 

Lane Community College 

Eugene, OR 

Hard to Read? 

I must report that I find David Busch's 
"Kitchen Table Software" column, very 
hard to read. 

The reason for the difficulty Is that I 
wear glasses, and several times during 
reading the column, t laugh until I cry, my 
glasses steam, my nose runs, and I have 
to stop to grab for a tissue. The Sep- 
tember column was a four tissue column. 

I am still laughing about MEMOLY 
SIZE? And the POKE which either prints a 
capital "A" or clears 4K bytes of memory. 

Ralph Nottingham 
Deerfield Beach, FL 

Bulletin Board 

Please Inform your readers about a free 
Computer Bulletin Board in Jacksonville. 
FL. The name of it is the SEB BBS and is 
supported by SEB Computer. The hours 
are: Sun-Wed 6pm-8am, and Thu-Sat 
9pm-8am. The access number is 904-743- 
7050 and the sysop Is Sam Bateh. 

Sam Bateh 
SEB Computers 
Jacksonville, FL 



Oops! 



This is in regard to the article "Rename" 
(page 317, August 1981). The author gives 
a rather complicated method of renaming 
disks for NEWDOS owners. 

The article could be replaced by: 
PR0T:1 NAME = OOPS 
That is the command in NEWDOS to 
rename the disk on drive one to "Oops." 



William J. RIchrath 
Elmhurst, IL 
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THE ALPHA 
I/O SYSTEM 

a complete failure? 

THE INSIDE STORY 



in cus'om analog and digiiai circuii oe&ion ittt (jecision was lo aitgrnoi lo <tev«ioD t nne o< 
stawUra inltriaee MiOwaie to» the emeigmg mtctocompuieis ai in« iimt (i9"i we naO ro 
oecNte wfiich oi ma ne* macrimes couio oecome tie inousrry stanaajo ol tfie low cost 
micros 

Dtso'le a lew aggravating Oul minor deficiencies me TRS 80 seemea lofuve tne Tiost 
cUrtce dI success and ■■ nad the Desi price /perlotniance laiio Also wiiN some imagmaiion 
ineir large sales organnalnn couio Mcorr^e me largesi seruice nelwar<i m inn wona a reassu' 
ing rnrougni lor me rr^ny novices m iiiis new liwa 

II became clear mat tne ros sg could be used iwith our men nypomeiicai system) lo uXve 
problems in many tieiOS iiKt't compulers weie nol yet used mosliy because Ol Itwir nigh cost 

Ine IDEA was simple' ALPHA PRODUCT wOuid supply the missing link between the IRS 
80 and the outside world' (mote atiout this outside worid ' later) 

Early Survival 

OANGERI't HadiD-bhacii entered the same rriarkei we ptODaDiy would nol naue Survived bul 
the etpeclalion was llul mey would be too busy oeveloplrtg then basic line (drives prinieis 
rDOdeffi elc ) inaniistoour morespecialwedproducis we would nol be competing wilh Ihem 
BAD START' We Degan with a lailure Our lirst prodt'Cl was supposed lo De a simple low cost 
general purpose device II wou'O a<iow me TRS-SO lo accept inputs olhei tlun the keyboard 
Many kinds of eiiernai devices <the Outside world meniioned belo'e) iike pnoioceiis 
sensors mermosiais. swiicnes. contacts etc couid be connected easily in addition there 
were two relays to control ion ct oti| eiiernai loads such as moiors <amps appliances 
Twatars, etc etc In other words ii would tl\o* itK compute' to interact or interlace witri 
eilernai devices We called n the iNTERFACER 7 Wriat a mistake' it sounded too much like 
' expansion interlace Many enthusiaslic IRS SO users called ihinking that our INTER 
FACER 2 was a low cost Eipansion Inter'ace lat tSS mat would have been a real bargain' i 
We waniBd to change ihe conlusmg name Ttial meant lepnniing ine manual ctiartging ihe ad. 
scrapping the tiyets discarding the siik screened cases Welt IKTEHFACER 7 ' it wouU 
J lay 

THUBLEi We aiSO lOuna that the maionty of IRS-80 users were AFHAIO Ol Ihe hardware Tbey 
could be very comlortatMe with tancy programming but triougni you had lo oe a computsi 
specialist or lechnicaiiy mcnneo to put the IMERFACER 2 to work in Uuin some iMAGIhA 
HON and a SCREWDfliVER is all you really need Anyone ttM lo wne a swiicri could use this 
device 

WMSEI There was also tne te« ol plugging a torngn device into tne precious computer 
This notion has all but disappeared as there are now so many quality piooucis aesigrieo tor the 
IRS 80 1l>at plugging m a non Radio Snack device has become common 

Ou' ad '" C'HiiveComouiinq |80 Microcomputing iint nni yei eiisli hardly paid lor itseit 




Wb nao d deciS'On ro -naie Were we w'ong or |usl loo early' Our tirsl INTERFACE*! ? was sold 
to someone who wantea lo and succeeded iri conlroiiing his lancy model ra<i'oad wiin his 
TfiS-BO Inleresting, Dul *hst "-aoe us st.ck wiin Itw concept wdS that some o' our INTER 
FACERS began Ending use in applications wiiti tascinaimg possibilities Space is lacking lo 
describe mem but me rriosi eaciting was the successlui use at itte sysiem in assisting a handi 
capped young Doy We were pleased lo hear ol such a meanmgiui application 



Today 



Th'oe years Uler as you can see m our aos The iNTERf ACER 1 1% Hive and well Tne 
price went up a bit and oespne the muoduction oi me more powerful iNTERFACER BO me 
sales have been steady 

Inen came the least understood product' me ANALOG BO Ihis S139 nicely designed 
module is an Analog to Digital convener wim S input channels Used wim your IRS 80 <t 
provides a powerlui data acquisition system Ims largon simpiy means mat you can 
monitor measure ano record 8 independam varying voltages Vfy lew people reaii/ed its reat 
power Such a sysiem would nave cost over ten thousand dona rs lusi a lew years ago 

The possibilities in scieniitic ana engineering envtronmems are enoiess Tn>i system 
could replace chart reco'ders digital data recorde<s orogranvriable calculators data anaiyiers 
and many other specialized ano eipensive pieces Oi equipment furthermore up to 8 ANAIOC 
SO s could be used simultaneously lor a total ot 64 channels Oi anaiog input' They Simply plug 
into the TRS SO using out I senes of DuseiienderslEXPANOAeuSi 



The idea was simple. We would supply the 
missing link between the TRS-80 and the 
"outside world" 



Our nut product was to be a second generation 'nput 'Output intertace with more 
Itexibiiily man tne INTERFACER 7 Careim dwgn and relmemeni yieWed me iNTEFlf ACER SO 
tne moil powerlui real work) interlace on the market today it nas 8 inputs, eacn oplicaiiy 
isolaied and 8 outputs exh with a relay contaci The INTERFACER SO is luiiy compatible wim 
Ou' ANALOG 60 allowing mese to be used together in Ofder to create systems thai control 
Bilernai devices based on sensed mpul under control o' me TRS SO 
A FMLUflE! in spite ot out attensive Mvenismg, very tew are awire at the einience ot me 
powerful ALPHAi/0 SYSTEM 

The Facts Are: 

The ALPHA SvSUM/IRS SO combinalwn iwms an increditily vwsaMe and powertui tool lot 

acquisition; processing/control 

in spile ol lis ri>oderale cost, the system is sophisticated and reliable 

The entire system can be easily prog rammea in BASIC uSing iNPlXiand QUI X.Y commarids 

The modular approacn and our EXi'AltOABUS alUw tor mstant expansion as requirements 

demand 

The lollowing pages contain more mlormalion about me devices rrenlionefl here We mute 
you In callo' write to discuss yOu' particular application 

Device descriptions; NEXT PAGE ^ 



TIMEDATE 80 



^ 




Neat. Compdcl D«tigrf 
3 Years Banerv Life 



Slips Inside E/l 
(V Opliori Shown) 



Real Time Without 
ExpanskKi Interface 



•Complete self coniained true real time cioc" /calendar, TiMEOATE BO cor»iinues to keep 

accurate ii'iie and date when tne computer is turned oil or eipetiences i power tailure 

•TIMtOATE 10 only needs to be sei once and il s two replaceable AAA baitenes mot 

included) Keep liMEDAIE SO running in encess ol 3 years Cosily Ni Cad Datienes ana 

charging circuits are eliminated 

•Tne instant power is applied lo the IfiSSO IIMEDATE 80 ptovides MO/OATE/yft. DAY 

OtWEEK HR MiN sec and AM/PMinlormaiion with quartz accuracy 

■TIHEDATE 80 replaces me computer s mlernai clock Eitremely useful loi automatic 

Operation ot remote systems with no operaior m attendance it me power laiis and men is 



WHY LOSE PRECIOUS TIME ? 



restored only TiMEOATE 80 will update the system with currsni TIME and DATE intormMion. 

an impossibility with me computer s iniemai dock 

•TIHEDATE M >s quarli crystal based with INTELLIGENT CALENDAR including provisions 

lor leap year' TiME display rnay Qe Dy '-7 hour AM'PM or by 24 nout miliary and EiuOpean 

lormat 

•TIHEDATE H plugs directly into Ihe rear ol ttie TRS-BO keyboard and gives me IiMES 

lunction even wimoui an Eipansion interlace For those wiin a d'Sk system it plugs into me 

leti side pane) ol the Eipansnn Intertace An optional V connector can provide lor lurthcr 

eipansion 

•TIHEDATE lO'i small sue keeps the computet labie uncluttered n you nave an E>pansion 

interlace. TIMEOATE 80 iiieraiiy DISAPPEARS ' by slipping into the empty soace in the 

bottom on he interlace 

• Two sets ol software on cassette come with TiMEOATE SO- TiMESEI ano TiMES 

TiMESEI ' IS a step Dy step set ol simple instructions lor setting TIMEOATE 80 TIMES' 
IS a sei or poke routines which patch DOS and Level ii TiMEt to rud TIMEDATE 80 and is 
easily incorporated inio any user sollware HMEt wiii always prmi the lime and dale 
when LiSTIhG a program— great tor keeping Irack ol revisions' 

•Other valuaCM uses lor IiMEDATE 80 are accurate dale and time mtormalion tor business 
reports like payroll records tmancial reports etc or to various KO devices requiring l« 
hour cioc> input such as laboratory msirumeniation and lo communication systems 
needing Login/ log Out dataibuiielin boarosi 

•TIHEDATE 10. luiiy assempied and tested. 90 day warranty compieie with init'uctKins 
and soltware on cassette S95 00 v option addSt?00 



NEW: Computer to Computer ordering :(212) 441-3755 (24 hr data line) 



CALL 



(212) 296 5916 




ALPHA Products • " = 



85-71 79th Street, Woodhaven. NY 11421 



AUi) V i\l "in OHOtR FOR ^niF'PING 'NO HANbUNG 

ALi ORDFRSShippfd First Dass Man 

wi ACCEPT visa MasKRCHaRi,) cntLn;. m ii 
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5!7news 

^edited by John P. Mello Jr. 



Tandy Picks Arcnet 

Radio Shack and Datapoint join in networl<ing venture 

I arge, powerrul, personal computer 
^networks, impossible until now, may 
provide more bang for the buck than a 



minicomputer soon— at least to users of 
the Tandy Corporation's Model II. 

The Fort Worth, TX firm has announced 
It will use Arcnet— a system of protocols 
and software developed by Datapoint— to 
link Model lis and future Radio Shack 
computers into large scale systems. 

Tandy President John Roach said in a 
statement his firm chose Arcnet for its 
low cost, high speed, simple installation, 
proven reliability and future compatibility. 

Jon Shirley, vice president of computer 
merchandising for Radio Shack, added: 
"In concept and operation, Arcnet is 
similar to Ethernet, but unlike Ethernet, 
Arcnet is based on a proven, reliable 
technique with over four years of field 
operation. 

However, Larry Spellhaug, manager of 
marketing services for Xerox— which, 
with Digital Equipment Corporation and 
Intel, developed Ethernet— said the sys- 
tem has six years of experience behind it. 
Me added the corporations involved are 
confident there is a demand for their sys- 
tem, Hewlett-Packard Co. and Nixdorf 
Computer Co. have pledged to use Ether- 
net in their networking communications. 

One business observer maintained the 
use of Arcnet by another company is con- 
sidered a strategic move by Datapoint in 
competing with Ethernet. 

Shirley added, "Today, adding one com- 
puter to an Ethernet system would equal 
five times the cost of the same addition to 
Arcnet." 

According to Roach, Arcnet is built 
from four inexpensive pieces of hardware: 
an interface card, coaxial cable, and two 
types of junction boxes. The Interface 
card— produced by Texas Peripherals, a 
Joint venture of Tandy and Datapoint 
—costs about $400 and plugs into an ex- 
isting slot in the computer. Thirty feet of 
RG-62 coaxial cable costs $30. A junction 
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Growing with Arcnet. Using a fioppy disk-based computer system requires a sizable 
quantity of dislts to change programs and store data. By adding a hard disif, a single 
Model II can perform the operations you need without numerous disks. But as a 
business grows, an operator will spend more and more time entering data into the solo 
unit. Today, another Model II could be added, but the two machines would be unable to 
share the hard disk and printer. By adding the Arcnet interface card converts one com- 
puter to a file processor and the others to application processors. Then your operations 
can be performed on the application processors which share the hard disk file and 
printer. You have doubled your processing ability at a significantly lower cost than add- 
ing another TRS-60 system and without reprogramming. 



box for a four computer network costs 
less than $200; for larger systems, $2,000. 
"Clearly," Roach observed, "this in- 
dicates Tandy's commitment to high 
speed, low cost local networking." 

Tandy said In a statement several Model 
lis combined by Arcnet would provide more 
computing power than is possible with a 
comparably priced minicomputer. 

The capacity of a Model II network 
could be hiked, the company noted, by us- 
ing Tandy's bisynchronous communica- 
tions software package to hook the net- 
work into some main frame computers 
like IBM and DEC. 

Model lis In a network could ac- 
cess common data bases— accounting, 
word processing, library— and share 
peripherals. 

Shirley said the Arcnet development 
was prompted by requests from the firm's 
large corporate clients. He added the Arc- 
net scheme allows those clients to re- 
place their dumb terminals with smart 
Model lis. 

First delivery of Arcnet, Tandy stated, is 
forecast for the second quarter of 1982. ■ 



Tandy denies 
report on TRS-88 

andy Corporation has vehmently de- 
nied a report it plans to unveil a new 
computer— the TRS-88— before Christmas. 

"That Is totally and completely untrue," 
declared Jon Shirley, vice president of 
merchandising for computer products. 
"Everything about It [the report] Is 
false. There Is not a statement In It 
vaguely true." 

Although when announcing its tie-in 
with Arcnet (See related story on this 
page), Tandy noted "multiple TR&60 Model 
lis and future TRS-60 computers" could 
be linked by Arcnet networks, Shirley 
said no new computers would be released 
in 1981. 

Computer Business News reported 
Septemtwr 14 In a column called "Page 
Two Report:" 

"Industry sources say Radio Shack's 
TRS-88 is due out sometime before Christ- 
mas. The machine is slated to use the In- 
tel Corp. 8068 chip IBM also selected for 
Its Personal Computer." ■ 
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IMOVA/ MODEL I AND MODEL III ! 



Now Model III users can t«ke advantaoe of the ALPHA I/O system too. Our new 
MOD III/I BUS CONVERTER allows most port based Model I accessories (such as 
our ANALDG-80, INTERFACER 2 and INTERFACER-80) to connect to the Model III 
bus. MOD in /I BUS CONVERTER, complete with all connectors, only »39.95. 
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Toe line in Europe or else! 

Companies breaking law face jail terms and fines 



ail terms and heavy fines await com- 
puter companies that fall to toe the 
line tn European countries, some 33 com- 
puter professionals were told at a seminar 
on International product safety standards 
held In Wakefield, MA by R & B Enter- 
prises of Plymouth Meeting, PA. 

One seminar member said his com- 
pany's agent In Switzerland was jailed for 
three days and fined $5,000 for falling to 
label equipment on four occasions. 

The penalties foreign nations levy on 
agents can make them very cautious, 
seminar leader Arnold Miliar added. The 
product safety engineer noted his com- 
pany's agent in Britain once received 
notice of a new product for the British 
market and promptly sent corporate head- 
quarters a six-foot Telex containing pro- 
posed modifications which would assure 
the firm's compliance with local law and 
thus save its agent from the slammer. 

Millar, who has tested military and com- 
mercial data processing equipment for 23 
years, said complying with European 
standards can be costly. During one year, 
he revealed, his firm budgeted $120,CXX) 
for tests and fees related to marketing six 
models of machines In the United States, 
Canada and Europe. 

He admitted, however, "This Is budget 
Information and for money purposes it Is 
Inflated." 

European authorities frown on manu- 
facturers who fall to accompany their ma- 
chines before testers. "If you don't ac- 
company your equipment," he observed, 
"they don't think you're very interested in 
getting it passed. You can have a hell of a 
time getting it approved." 

Another problem with Europe, he said, 
is every country has different stan- 
dards—even those with ostensibly uni- 
form standards like the Scandinavian 
countries. 

Millar, who Is with the U. S.-based 
Research Development Division of tnter- 
national Computers, Ltd., gave the profes- 
sionals tips on expediting the tests of 
their machines by European inspectors. 

When an inspector tests radiation emis- 
sions from a machine's cathode ray tube, 
he noted, the measuring device should 
register to .2 mlltlroentgens per hour. 
European countries have had the .5 milll- 
roentgens standard for some time, he ex- 
plained, so approving the CRT to .2 can 
provide a hedge against future rule 




changes. 

One seminar member lightened up an 
otherwise form-oriented forum by asking 
Millar to explain "standard test finger." 

The seminar leader said the finger was 
a metal rod shaped like a finger. Testers 
use It to determine if a finger could poke 
the machine in hazardous places. "Let's 
be scientific, right?" he quipped. The 
finger cost $700.B 

Major computer 
architect calls it 
quits at Tandy 

major microcomputer architect has 
bolted from the Tandy Corporation. 
Steven W. Leininger, 29, said he left Tandy 
"primarily" for creative reasons. "The 
main reason is to strike out on my own," 
he added. 

The Arlington, TX resident said he has 
started a consulting firm and Is concen- 
trating on computer hardware develop- 
ment. Manufacturing hardware "may be 
down the road," he observed. If he falls to 
find a firm interested In his ideas. 

Leininger was the architect of the Fort 
Worth, TX, firm's Models I, II and III micro- 
computers and Its Color Computer. He 
came to Tandy five years ago from Nation- 
al Semiconductor, Santa Clara, CA.B 



Barry Passen 
starts s'ware 
store and club 

^'ou've heard of the Book of the Month 
Club and the Record of the Month 
Club, right? Now meet Software of the 
Month, the cerebral offspring of Barry J. 
Passen, 39, a former customer services 
marketing manager for Digital Equipment 
Corp. in Merrimack, NH. 

According to the Boston Globe, under 
Passen's plan a member's first software 
purchase— anything from a $29.95 com- 
puter game to a $700 business manage- 
ment program for dentists— Is at 33 per- 
cent off and during the first membership 
year, a person must buy two more pack- 
ages at 10 percent to 30 percent off. 

Unlike Its book and record counter- 
parts, however, members can try out this 
club's offerings at Passen's Microcon 
Software Center, which he opened last 
month In Watertown, MA. 

Passen told the Globe he Intends to 
start up similar shops in New York, Phila- 
delphia, Chicago and Atlanta within the 
next 18 months and eventually to fran- 
chise up to 100 stores.B 
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Survey reveals users' wants 



CBS— A TT ready major test 

Info giants to 
break ground 
in home info 
nnarketplace 

TThe American Telephone & Telegraph 
Co. and CBS Inc. are close to agree- 
ment on a joint venture bringing the two 
firms together for the first time in a major 
test of home computer information tech- 
nology, it was reported by the Washinton 
Post. 

The Posr said the venture would be the 
most recent and perhaps most significant 
lest of two-way home information systems. 

The venture also could represent a ma- 
jor turning point In AT&T's efforts to test 
home information retrieval systems, a pro- 
gram that ultimately could include types 
of advertising and shopping programs 
brought into the home by the Bell System. 

Harry E. Smith, CBS's vice president for 
technology, told 80 Microcomputing the 
Post story was "essentially correct." 

"We have been negotiating with CBS 
and with other prospective vendors," add- 
ed Pickard Wagner, a spoftesperson for 
AT&T in Washington, D.C. 

Using unnamed sources, the Post re- 
ported the two companies are likely to 
test their joint program in New Jersey. 
Other sites being considered Include juris- 
dictions served by AT&T in California and 
New York. 

The proposed system would bring CBS' 
news and publishing resources into the 
home via AT&T's telephone network. With 
assets of $125 billion, AT&T is considered 
the world's largest company. With assets 
of $2 billion, CBS is the nation's 94th- 
largest industrial corporation and one of 
its biggest communications concerns. 
AT&T would bring to the venture the 
capacity to carry information, through an 
existing network, to video screens in more 
than 80 percent of the nation's homes. 

In addition to controlling a vast world- 
wide news-gathering network through its 
broadcast holdings, CBS owns a variety of 
"consumer" magazines, such as Wo- 
man's Day and Mechanix Illustrated, part 
of a corporate unit consisting of 60 news- 
stand magazines and six book lines. The 
company also publishes a variety of text- 
books. All this information could t>e part 
of the two firm's system, ■ 



■ Jlore information aimed at business 
users is being offered by a Virginia 
computer data service in light of a survey 
It conducted last spring, according to 
Michael J. Rawi, manager of public rela- 
tions at The Source. 

He explained Source Telecomputing 
Corporation began pumping new busi- 
ness information into its system last 
month in response to a survey of 7,700 of 
its 10,000 users revealing 40 percent of 
them subscribed to the service for busi- 
ness or work reasons. 

According to a statement released by 
the firm— subsidiary of Reader's Digest 
Association Inc.— the most popular elec- 
tronic communication and information 
services for business professionals are re- 
search, electronic mail, business plan- 
ning and forecasting, news and financial 
market monitoring, personal portfolio 
maintenance and home education. 

Rawi explained the broad information 
needs of business professionals induce 
them to access electronic library services 
more than other users. 

In the press release from the McClean, 
VA firm, Vice President A. Martin Clark 
observed: 

"When computers were made easily ac- 
cessible to the individual in the mid-1970s, 
persons employed in the computer field 
were the first to use them, and they 
treated them as a hobby. 

"Now we are seeing a rapid spread of 
practical interest in the benefits of elec- 
tronic, computer-based services among 



business professionals." 

An indication of that, he noted, is The 
Source study— conducted by Staples in- 
formation Inc. of Houston, TX. It showed 
only 27 percent of the service's subscrib- 
ers belong to computer clubs. A year ago, 
he added, 44 percent of the subscribers 
said they belonged to clubs. 

A spokesman for CompuServe, a data 
service in Columbus. OH said that com- 
pany does not know how many of its 
13.000 users access its system for busi- 
ness purposes. That is difficult to deter- 
mine, he explained, because the line be- 
tween business and home use is blurred. ■ 

CompuServe in Canada 

anadian microcomputer enthusiasts 
can now tap into the CompuServe in- 
formation service. Kits to access the Co- 
lumbus, OH. firm's information are sold at 
Radio Shack stores in Canada and Data- 
pac telecommunications network distrib- 
utes the service, 

CompuServe offers the latest news 
from major newspapers and the Associ- 
ated Press, corporate stock and commod- 
ities trading information, home banking, 
electronic mail and real time communica- 
tions, computer games, family informa- 
tion and computing power for program- 
ming activities. 

The service, an H&R Block Co., charges 
$5 an hour for access to its information on 
weekday evenings, all day weekends and 
holidays. Canadian subscribers pay an 
additional $12.50 an hour conveyance sur- 
charge charged by Datapac.H 
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indicted 

Brothers and company 
charged with robbing 
$3.5 million to $7 
million in computers 

-. rraignmenta in connection with the 
/Atheft of $3.5 million to $7 million 
worth of computers have been handed 
down In Massachusetts. 

The arraignments of two men and a cor- 
poration resulted from a six-month inves- 
tigation by Attorney Gererai Francis X. 
Bellotti, Massachusetts state police and 
First Security Services Corp. of Boston, a 
private firm which investigates white col- 
lar crime. 

Arraigned and charged with conspir- 
acy, larceny and receiving stolen property 
were Arthur S. Greenberg of Gerogetown. 
MA, and his brother, Alan T. Greenberg of 
Peabody, MA, both principals in the Com- 
puter Corral in Peabody. 

The case involves computers allegedly 
stolen from Nixdorf Corp. in Waltham, 
MA, and stored in the Computer Corral, a 
retail computer store. 

In a report published in the Boston 
Globe prior to the indictments, an un- 
named employee of the neighboring store 
said "quite a few trailer loads" of what ap- 
peared to be computer hardware were re- 
moved from the Computer Corral by Inves- 
tigators. A spokesperson for Bellotti told 
80 Microcomputing "hundreds of pieces 
of equipment" were recovered by probers. 

When Inspected by the Globe, the door 
to the Peabody store was locked. A sign In 
the window said "closed for Inventory" 
and a pair of handcuffs hung from the 
door handle inside the store. ■ 





Bellotth Nabs computer crooks 



Love spiced by micro 

^ computer spiced the love life of a ste- 
nographer In the Quebec legislature 
when she accldently went on public rec- 
ord complaining her la vie amoureuse 
was stale. 

During a break In a legislative commit- 
tee hearing, the woman input a letter 
into the legislature's Pro-Plus computer 
system grousing about her love life to 
a friend. 

While printing a neat, clean copy of the 
letter to send to her confidante, she accl- 
dently sent it Into the system where it be- 
came part of the day's public record and 
was distributed to all members of the leg- 
islature, their aides and reporters. 

According to United Press Internation- 
al, the woman, believed to be in her mid- 
20s, was unaware of the error until report- 
ers started calling her. She refused to talk 
with them and hired a lawyer who threat- 
ened to sue anyone who published the 
woman's name. 

No disciplinary action is planned 
against the stenographer, 80 Microcom 
puling was told by the legislature's direc- 
tor of computer services. He said, "We 
think she's been punished enough. "■ 

Cure for micro hunger? 

LJ| ungry for microcomputer informa- 
tion? A recent announcement by 
CompuServe might satisfy your appetite. 

The Columbus, OH, computer data ser- 
vice now includes Micro Advisor, a clear- 
inghouse for a wide variety of microcom- 
puting information. 

The new service offers information on 
equipment use and selection, peripherals 
and software, computer clubs, industry 
magazines and publications, and develop- 
ments in the microcomputer industry.H 



Quality Percom products are available 
from the following authorized Percom 
retailers If a retailer is not listed for your 
area, call Percom toll free at 1-800-527- 

1222 for the address of a nearby retailer. 
or to order directly from Percom. 
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BYTFShtCtf'MILWAUKFF Gieendeld (414)2817004 

FINAMORFS Manhtwid (715) 384-161(1 

FOREIGN DEALERS 
AUSTRALIA 

DICK SMITH F[ FCTRONICS PO B<n:i21 North T^de NSW 2 113 

CANADA 
VALERIOTE AND ASSOC Guelph Oxarw (51118247041 

DVRFl FCTRONICS Surrey BC (6(Vll 576 1045 

MEXICO 
CIBFRMATIC SA Me«o (9051592 3433 

COMRHADORAS V ASFSORAMIENTO 

R«iPar>ucol4 Me«o5[)F 
DOMINICAN REPUBLIC 
RADIOSHACK San(o DoriHngo (80115651121 




Disk Storage: It's No Place to Compromise. 



A dependable disk system 
means everything to the high- 
performance operation of your 
computer. At Percom. we know 
this. And we do something 
about it. 

For example, the connectors 
on our TFD drive systems are 
gold plated. 

Why? Because solder-plated 
contacts oxidize, forming an in- 
sidious insulation that can 
cause erratic operation. And 
then total failure. 

Gold-plated connectors are 
just one way we make better 
drive systems than the competi- 
tion. 

Now #1 for the Model III 

Quality Percom TFD drives provide more 
features, cost less Add-on drives start at 
only $439.00. Complete First-Dnve Sys 
terns start at only $749 95 Features 
"Flippy" Capability - Record your 



To order products, or for tfie name of your 
authorised Percom rplailer, call toll free 
1-800-527-1222 




PERCOM DATA COMPANY, INC. 

11220PAGFMIU RH DALLAS TX 75P43 
1214) 340 7081 

"tt.nlem.irk lA Pi-rrnw I'.iM rr>mp,inv hi. 



programs and data on either side of a dis- 
kette Greater Storage Capacity 

Store 180 Kbytes — fomnatted on one 
side of a 40-track TFD drive Store over 
twice as much on a TFD 80-track drive. 
Think Megabytes — Your TFD dnve 
controller will handle up to four drives 
You can access almost 1.5 million bytes 
of on-line program and data files Either 
Add-in or Add-On — Your TFD First 
Drive System can be either internal 
(add-in) or external (add on) In either 
case, you get a complete system in 
eluding the disk controller, drive, power 
supplies and disk-operating software. 
BASIC-Language DOS included on 
diskette with each First Drive System is 
Percom's OS-80/II!'" This easy-to-use 
disk operating system loads into 7 Kbytes 
of RAM and then frees the drive for other 
use With OS-80" programs, you can 
have full, read write interchangeability 
between Model I and Model 111 diskettes. 
Or Model 111 TRSDOS* TFD 40 
track drives work with Tandy's Model III 
TRSDOS. without modification For 80- 
track operation. TRSDOS can be easily 
modified with diskette patches supplied. 

Still #1 for the Model I 

Besides greater storage capacities, more 
quality control measures and lower pri- 
ces, all Percom Model I drives are rated 
for double-density operation. 

Plug a DOUBLFR " in your Expansion 
Interface and enjoy the same double- 
density disk storge capacity as Model 111 
owners Included with each DOUBLER is 
a TRSDOS compatible double-density 
disk operating system. DOUBLEZAP 
programs are available for upgrading oth 
er popular DOSs for DOUBLER opera- 



tion. And our double-density version of 
05-80'- costs just $49 9.^) 

Of course you don't have to upgrade 
your Model 1 for double density opera 
tion to use Percom disk drives. But its 
nice to know you can. 

Percom TFD dnves for the TRS 80* 
Model I arc available in 40 , 77- and 80- 
track versions, in 1 , 2 and 3-drive con 
figurations Pnres start at $.399.00. 

System requitements: Mcxiel 111 IFD dnves work 
with a lb Kbylp system (mini and Mudfl 111 BASIC 
Thi' initial dnve must be a first dnyc susiem An op 
tinniil itilercnnnechng rahlp is available lor expand 
ing with extfrnal dnwi #3 and #4 Model 1 TFD 
dnves work with a lb Kbyip system (mm) equipped 
with an Kxpansmn Interface. Level I! BASIC and 
DOS soltw.Mre. and an interconnprling cable Two 
and (our dnvf interconnecting cables are available 
Irtim Percom 



Yes , . . I'd like to know more about 
tliR best for my TRS-80 computer. 
Send me free literature about quality 
Percom products. 
1 I Model I n Model III 

S^fKl to 

PERCOM DATA COMPANY. Inc.. 8 C 
1 1220 Pa9fm.ll Rd Dallas. TX 75243 



clly 



sute 



/ip 



phone number 
MAIL TODAVI 



.■l.■lr■■.1l^l-l|l 10 p.. 



ndl<i CiiiTiiwni.' 
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EDUCATION 530 



by Earl R. Savage %^\^ 



"Computers will not solve 
the problems of instructior) . . . " 



fntire school districts are marching 
into the computer age. Actually many 
are funning as fast as financial limitations 
will permit to get Into the business of malt- 
ing every student (and teacher) computer 
literate. 

Not all school systems, however, view 
computers so positively. Some students, 
parents and administrators are dragging 
their schools almost against their wills in- 
to computer consciousness. Other sys- 
tems steadfastly ignore the computer re- 
volution. Such systems progress slowly 
it at all. 

Computers will not determine whether 
a school Is good or bad. Computers will 
not solve the problems of instruction, 
schools, students, parents, or a society 
such as ours. 

Where does your school or school dis- 
trict stand vis-a-vis computers? Is prog- 
ress being made, and if so, at what rate? 
What are the impediments to satisfactory 
progress? (Remember the greatest im- 
pediment is not always money.) 

If you are a student, teacher, adminis- 
trator, parent or an interested citizen, 
make it your business to find the answers 
to these and similar questions. Offer your 
support, encouragement or Influence, as 
needed, to those responsible for the cur- 
rent status. As one who is knowledgeable 
about computers, you can help. Lets hear 
it for an adult Computer Boosters' club 
along side of the Athletic Boosters' club. 

Isn't Life Ironic 

I have observed recently a school dis- 
trict with at least oneTRS-80 in each of its 
schools. They even have a fairly good se- 
lection of software. Unfortunately, the 
personnel familiar with the computers 
have moved on to greener pastures leav- 
ing the machines to do little more than 
collect dust. 

Another district strained its resources 
to acquire a single TRS-80 to be used for 
instructional purposes. An impossible 
number of teachers want to use that lone 
computer, when within 75 miles there Is a 
government agency with literally hun- 
dreds of computers, large and small. 

For the want of $3,000 there are 



countless hours wasted by school person- 
nel who struggle to: 

• manually keep journals and ac- 
counts books and write vender books; 

• use a calculator to figure each em- 
ployee's pay. then manually transfer the 
results to records and again to pay checks; 

• laboriously type and retype reports, 
papers and other documents through one, 
two or a dozen revisions; 

• type the same letter over and over to 
different addresses; 

• figure and type monthly and quarter- 
ly financial reports; 

• manually schedule students into 
classes and complete a schedule form tor 
each one; 

• keep cafeteria financial, commodity 
and lunch records and complete reports 
ot same; 

• make pupil accounting, pupil records, 
report cards, personnel records, inven- 
tories, library lists, transportation records 
and local/state/federal reports, reports 
and more reports. 

The list goes on. 

One cannot help but wonder It It was 
this difficult to sell the bosses typewriters 
so their secretaries could discard their 
quill pens. Well, It's a good fight and I see 
indications that the tide is turning— slowly. 



After Sailing The Idea, 
Select The Computef 

From time to time, I am asked for advice 
In the selection of a school (or other) com- 
puter. Here is the list of my words of 
wisdom laid on those who ask and even 
those who don't. 

Terminals vs. Micros 

Surprisingly, there is a strong undercur- 
rent of support tor the installation ot ter- 
minals hooked to a big computer— their 
own or someone else's. Usually, the two 
fundamental reasons for this support are 
finances and computing capacity. Any re- 
buttal must include both of these points. 

Financially, the terminal proponents 
don't have a prayer. First, add up the hard- 
ware costs: the terminals, time-share 
equipment (depending on the system), the 



computer Itself (or the cost of using some- 
one else's) and the leased phone lines. 

Next, add in the Installation costs and 
don't forget the supplementary and alter- 
nate locations. 

Finally, throw In the very high cost of 
software or the higher cost of pro- 
gramming software. The end result is that 
a microcomputer costs look good in 
comparison. 

The answer to computing capacity is 
just as simple but harder to relay because 
those who control the purse-strings are 
almost always technologically illiterate. 
Nevertheless, explain as best you can that 
the air defenses of the nation need not be 
controlled through your TRS-80. Teaching 
students requires far less computing cap- 
acity—whatever that Is, exactly. In lay- 
man's terms, one-fourth of a 48K machine 
can hold enough to tax the brightest stu- 
dent through a long class period. 

After you have the terminal proponents 
on the ropes, give them a tew more 
punches: 

• When the "big" computer breaks 
down (sure they do!), so do all the termi- 
nals and you are out of business for the 
duration. When a micro breaks down, it's 
one down and 19 still going — or you just 
haul out a spare one. 

• Micros require absolutely no installa- 
tion. A table and power are all that's re- 
quired to put them into operation. Not on- 
ly does this affect the cost but It means 
that micros are just as portable as type- 
writers. One or a dozen can betaken to the 
science, math, business or language arts 
classroom whenever instructionalty 
desirable. 

• Micro software Is available for 
almost every subject field at every grade 
level, pre-school through postgraduate. It 
is being produced by hundreds of sources 
ranging from one-man outfits to some ot 
the largest producers ot textual and A-V 
Instructional materials. 

• Micro software is much less costly 
than that for larger computers. Competi- 
tion among the many producers assures 
that tact. 

Well, that's enough. Who was it 
again that suggested the installation 
ot terminalsIB 
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ADVENTURE tias gone GOLD! 

AND WE WANT YOU TO CELEBRATE WITH US.* 

The 12 Scott Adams' Adventures are presented in our Limited Gold Edition. Each tape and disk is in- 
dividually numbered, and guaranteed until July 10th. 2001. Each package contains a certificate of 
authenticity, a registration card and an autographed, (rather interesting) photo of the author. 
The 12 Adventures normally retail for $239.40 individually on tape and $159.80 lor 4 triple-pack 6\sWs. 

The Limited Gold Edition is yours . , . forever 



m 






... tor $100.00 tape or disk, value lor value. 
To Order: The Limited Gold Edition is available 
in very limited quantity, Uom interested Soft- 
ware Retailers Ask your local dealer If he does 
j)Q(^havgThe Limited Gold Edition Then call 
2l-57a^HK^|fornia 

will direct you to a dealer who do^ 
Limited Gold Edition. Supply Is Limited! 
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The Limited 
Gold Edition 
Is available in 
the following 
^different 
{^configuratio 
t .• Apple 2 Dis. 



.Mi ml 



package 
• Atan Tap.^ 
-' Atari Disk 
' TRS-80 Tape 

100.00 Each 



••". 








In Kflejpin^ with the spini of Adventure. 
1 000.00 in Gold Coins Is hidden within 
i Limited Gold Edition. i;i> waiting lor you. 



The Limited Gold Edition tfom Adventure International 
is distriDuted excluftivoly by; fHYnVcn « ciyal 



8295 SO. LA CIENEGA SLVD • INGLEWOOD, CA 90301 



5^ACCOiJNn|NT 



by Michael Tannenbaum C.P.A. 



It has often been said that a computer 
tostallation really begins when the tech- 
nicians leave. Although technicians rarely 
Install TRS-80's, this observation is still 
true with a vengeance. The euphoria of 
owning a computer fades, and disillu- 
sionment often sets In when the TRS-80 
does not meet the new owner's high 
expectations. 

To avoid these post-installation blues, 
plan before you Install the computer. Per- 
sonal computers are highly dependent on 
the environment In which they will be 
used. This requires a thorough under- 
standing of the tasks to be automated, the 
personnel who will operate the device and 
the physical location of the equipment. 
Unfortunately, little thought is given to 
these factors until the equipment has 
been delivered. 

We accountants can help our clients 
avoid unpleasant installation experi- 
ences. Our help should begin as soon as a 
computer installation is under consid- 
eration. Almost without exception, clients 
are led to expect too much of the micro- 
computer. Experience has shown us that 
the microcomputer can do general ledger, 
accounts payable, billing and receivables 
and word processing but it cannot do ail 
these tasks at the same time. In addition, 
all models of the TRS-80 are single user 
devices. 

Even if the micro is not a TRS-80, 
microcomputers are slow by current data 
processing standards. Speed is not a 
problem as long as the process is 
restricted by the speed of an operator 
entering data. However, when many re- 
ports must be printed or a large amount of 
data shuffled the slow speed of the com- 
puter becomes troublesome. Unfortunate- 
ly this fact is rarely obvious when the 
device is demonstrated before delivery. 
Most demonstration programs are run 
with limited size sample data files. When 
the files acquire normal amounts of data, 
processing slows. 

If your business decides to acquire a 
microcomputer we can use our knowl- 
edge of the client and our hands-on experi- 
ence on the TRS-80 to help select limited 
applications for automation. Of course, 
we must satisfy ourselves that the config- 
uration on order can process the transac- 



tion volumes of the applications selected. 
Undercapacity Is a frequent problem in a 
new microcomputer installation. 

Computer Placement 

Once your business has selected a tar- 
get application and defined its capacity 
requirements, we must discuss a proper 
environment for the computer. This Is 
rarely a simple task. A small business 
micro such as the Model II has noisy fans 
in both the main and the expansion units. 
In addition, the Daisy Wheel II is quite a 
noise generator. All this noise in a previ- 
ously quiet office can be quite distressing. 

The obvious solution, putting the com- 
puter and operator In a separate room, 
may not be a viable alternative. If the 
room is small, the temperature qulcltly be- 
comes uncomfortable. The computer and 
related peripherals dissipate a good 
amount of heat. Although the computer 
usually handles the heat t>etter than the 
operator, it is advisable to plan for ade- 
quate ventilation (natural or air 
conditioning). 

For a desk top computer, the Model li 
requires a surprisingly substantial 
amount of space. If you do not order the 
system desk, you must find space for the 
disk expansion unit. You must also allo- 
cate space for the printer, printer table 
and paper storage. Gable restrictions limit 
placement variations for these compo- 
nents. Thoughtless placement can ad- 
versely affect the operation of the com- 
puter and its related peripherals. 

The Model II is particularly sensitive In 
this regard. Because of Underwriters 
Laboratory (UL) requirements the expan- 
sion interface has a separate on-off 
switch. For some reason it is placed 
where It can be easily flipped off by acci- 
dent while the computer is in operation. 
Should this occur, system programs and 
files on disk in both the expansion inter- 
face and the main computer could be lost. 
Thts unfortunate occurence happens fre- 
quently if the expansion unit is in a well 
traveled area. 

Once you have found an appropriate lo- 
cation, you must obtain a reliable source 
of electric power. Unlike the Model I, most 
business micros have some Internal filter- 
ing. Despite this. It Is good practice to 



"The hardest part 
of mstalfatior) is 
findmg ar) operator.** 



place the computer on as clean a line as 
possible. Put a warning note on the circuit 
breaker protecting the computer's electri- 
cal line. Hopefully this will prevent the 
breaker from being set to an off position 
inadvertently, crashing the program 
running. 

Despite the physical problems associ- 
ated with Installing the micro, the hardest 
part of an installation Is finding an opera- 
tor. The average small office has a variety 
of clerical and secretarial skills. Unfortu- 
nately, none of these skills are directly 
transferable to the computer. In fact, 
some of the most skilled employees will 
resent and avoid the computer because 
they suspect the new machine will cost 
them their Jobs or their skills. 

Management often inadvertently en- 
courages this attitude. Prior to installa- 
tion, some managers make comments 
about the great changes to be made. Em- 
ployees often interpret these comments 
as criticism of their efforts. This reserve 
and apprehension must be dispelled as 
quickly as possible If the installation is to 
be a success. 

In this process, the accountant as an 
outsider can be quite helpful. As a familiar 
presence, the accountant is rarely per- 
ceived as threatening by the staff. They 
know that as soon as the work Is complet- 
ed the accountant will leave. Another ma- 
jor advantage Is that the accountant is 
outside the pecking order of the office 
staff. As a result, any choice of a can- 
didate for data processing operator by the 
accountant will be rarely viewed as politi- 
cal In nature. 

Installation QuMes 

Once the installation of the new com- 
puter system has been depollticlzed, the 
system can become a functional part of 
the office. Typically this process includes 
several phases: 

• Debunking computer myths. 

• Establishing the manual procedures 
for acquisition of the computer data, 
storage of disk files and distribution of 
printouts. 

• Installing and testing the target 
system. 

• Infecting the balanceofthe staff with 
"micro-philla." 
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SANTA'S GONE SOFT 



TRS-M- BUSINESS AND APPLICATIONS 

ORDER MO. PAOGRAM NAME PAICE 

OStflHD Clim«l« Comp (Dislil 24.96 

0287B Eleclronlc B'e»atx)»ra(Tip«) «.» 

025anD F((y)llOulch(Diskl 49.95 

oiesn L»ooi nap*! !*9s 

THS-W* UTILITIES 

OR0€RNO PROORAWNAME PRICE 

0248R CompfMi'OnOllliiy PBcmTaoel '996 

(MMR Th« DiM^MTiW*' iTapo) 9 95 

O'SORO DiB« Eauof (CHili) 39 9S 

0139nD Dis* Scope (Oiskl '9 9S 

0231flD OLDISlD.slc) 1^96 

0328R Dynamic D«ytce 0<ivefs (Tapfl) 19 95 

0t99fiCl Dynamic Device Otive's (Disk) 2*95 

0250R ifviTape] ?** 

0350RD Irv IDIWI » 9* 

OOSan Pioflrammei s Conve'toi (Tapel 9 95 

0245H ptogtsmme's Pfimef (Taoei 995 

0133H Henum/C©mpie»»(Tape) '4 95 

02WR TLDIS(Tapai '*95 

S003R Uii'B Mon (Tapel 2« 96 

TRS-M' EDUCATION 

ORDER MO. PBOORAI* MAME PRtCE 

0136R B«8tif«''»'''J"""lT"P*l *** 

Oi37n Everyoay Rui»ian (Tape) 995 

0071RO Geog'apny EipiOfer US*)D>»kl 49 95 

M12RD Russian OiSk (Disk) 24 9S 

Oia/R SufveyO'»*pp'eni.ce(Tap«( 9 95 

0214RD Te»chef»*>oe|Oisii| 38-95 

0099R Typinfl TeacMr (Tape) 1!95 



TBS-aO- GAMES. SIMULATIONS AND ENTERTAINMENT 



ORDER NO. PROGRAM NAME 

X1TR »" F'loni Simuialton (Tape! 

OlOeR Airmail Pi>ol (Tapei 

0240R Ai.en Aitac" Fcce {Tapel 

02i3fiO The All Sla'S IDisKl 

OOStR Ball Turtel Gunne' |Tap«) 

0141 R Baliiea'Ound (Tapel 

0223« Cosmic Pai'oi (Tape) 

0224RD Cosmic Pal'ol (Disk) 

0J3?R Danoe' In O'B't (Tape) 

5006R Dtagonguest (Tape) 

500?RO Dfagonqueal (Dishi Model I 

5010R3D O'aaonQuesI lOiskl Model m 

OZlBR D' Chips ITapei 

0171B Fligtii PamiTapel 

02O5RO Tl>e Flying CircLis (D<ski 

0219R House of 30 Gables (Tape) 

0159R Jat Fighief Pnoi (Tapei 

()37BRO Mallet Rave'si iDlsk) 

01 UB Nighi FliannTapei 

0023B Oil Tycoon (Tape) 

01 20R Reflect Pong (Tapoi 

(X)43R Santa P«'»na 4 Fiumaccio (Tap*| 

0332R Soace Snutiie ITapei 

03t2R Swamp Wai iTapel 

5012R Temple Of Itie Sun JTaP*) 

501 1RD Temple of Ihe Sun (Disk) Model I 

TRS-M* HOME AND PERSONAL 
ORDER NO. PROGRAM NAME 

Ooa4R i>«usic Master (Tape) 

ai51RD OSL Manager (D<ak| 



Instant Software 



PRICE 
996 

996 
995 
34 95 
995 
99S 
14 95 
1996 
14.K 
1595 
2195 
2195 
996 
14 95 
39 95 
9 95 
14 95 
2995 
996 
995 
1495 
9.95 
14.95 
14.96 
1099 
2995 



PRICE 
995 
19 95 



^532 



APPLE* * EDUCATIONAL 

ORDER NO PROQRAMNAME 

0339A0 Capilalijation (Disk) 

0283*0 Rjss-an Disk (Oitli) 

APPLE" GAMES. SIMULATIONS ft ENTERTA! 

ORDER MO PROGRAM NAME 

0148* Ai( Flighl S.mulalion (Tape) 

OieiAD Apple Fun iDiSki 

0254AD D( Chips (Dis") 

XISA Golf (Tape) 

X25* Mimic iTapel 

OOMA Oil Tycoon (Tapel 

0163AO Paddle Fun IDisVl 

OOeOA Saha'a Wa'nocs (Tape) 

0174A SaniaParavia 8 f iumBccio(Tapei 

0229AD Sarla Paravia & FiijmacCiO(Disk| 

01&3A SkybombeiS II iTapai 

0271AO SkybombeiS II iDlS*) 



PRICE 
34 95 
24 95 

NMENT 

PRICE 
995 
19 95 

1495 
9 96 
9 95 
9 95 

19 95 
996 
995 

1995 
995 

19 96 



APPLE- * HOME AND PERSONAL 
ORDER NO. PROGRAM NAME PRICE 

0235AO Solar Energy lor the Home (Disk) 34 95 

0242AO Astrology iD.sfc) 19 95 

PRICES SUBJECT TO CHANGE WITHOUT NOTICE 

TO ORDER: 

See your local Instant Software dealer 

or call toll-free 1-800-258-5473 Dept. A-65 

In New Hampshire 1-603-924-7296 Dept. A-65 

Mon - Fri 8-O0 am - 4 30 pm E.S T 
Incluae 2.50 (of Shipping & Handling, 



Peterborouoh, N.H. 03458 USA 



A division of Wayne Green Inc. 



•THS-80 IS a tradefrark ol Radio Srtacli a division ol Tandy Corporation 
• 'APPLE IS a uadomark ol Apple Computei Inc 



^(^ACCOUNIANT 



• Monitoring the clients installation ot 
the second application. 

Although most installation guides start 
with the third phase, we have found that 
the first two phases are usually required. 
It is surprising how much misinformation 
the average person has acquired on the 
subject of computers. By far the most 



functioning, restore the system and ap- 
plication program disks by repeating the 
Format and Backup lesson. 

Phase two, the establishment of pro- 
cedures to control the flow of data and 
storage of disk files, depends largely on 
its application. Word processing may not 
require controls over the flow of data, but 



"By far the most prevalent 

myth is that 
computers are intelligent/' 



prevalent myth is that computers are in- 
telligent. It is therefore quite distressing 
when the computer literally follows even 
the dumbest instruction. 

Phase one starts when the computer is 
delivered. The accountant should assem- 
ble the client's staff and present a demon- 
stration ot the computer. Following the 
demonstration, the candidate previously 
designated by management should be in- 
structed in front of the other staff mem- 
bers in the proper turn-on protocol. The 
balance of the staff should be advised 
that the candidate is now considered as 
the key employee to handle computer op- 
erations. U any processing is desired, It 
will be the key employee's responsibility 
to turn the computer oft and on. 

After the other staff members have 
returned to their tasks, the accountant 
should instruct the candidate in such 
machine utilities as Format and Backup- 
Have blank disks on hand for this lesson. 
During thts session make copies of the 
operating system and several application 
program;; To be on the safe side, make 
duplicate:^ to tr.ke back to your office. Do 
not attempt to progress beyond Format 
and Backup during the first session. 

When you leave, expect the candidate, 
their friends and management to try out 
the new computer. Chances are that they 
will destroy the sample system disks 
which you helped prepare during the first 
session. They might even destroy the 
main system disks which were the source 
for the backup. "Vou will probably be glad 
you made safety copies to take with you 
at the end of the first session. 

When you return, the candidate will be 
somewhat sadder, but a lot wiser atxiut 
the limitations of floppy disk computers. 
Hopefully, the myth of the infallible com- 
puter will be debunked. After you have 
established that the equipment is still 



It will require controls over disk storage 
and file management. On the other hand, 
if the application replaces data. Intensive 
manual processing procedures such as 
billing, new controls on data handling and 
balancing must be designed. 

If the application requires historical 
data, design controls for the data conver- 
sion portion of next phase during phase 
two. This requires that management de- 
cide which portion of the historical data 
base to convert. To Illustrate the problems 
Involved, consider automation of a gener- 
al ledger. If the client expects to see com- 
parative financials on a monthly and year- 
to-date basis, the prior year's monthly 
balances must be obtained and entered 
during system initialization. If a compari- 
son to budget is required, budget data 
must also be entered at this time. If the 
data source does not have the required 
detail, the Information must be developed. 
Needless to say, this could require a ma- 
jor effort. 

Data conversion Is usually controlled 
by dividing the material to be entered into 
small batches, each with their own control 
totals. It is unreasonable to expect a new, 
untrained operator to enter an enormous 
amount of information without making 
many errors. Small batch control totals 
help localize errors for quick correc- 
tion. The techniques designed for file con- 
version can be adapted to normal pro- 
cessing once the file conversion has been 
completed. 

Fine tune the computer environment 
during phase two. Adjust little Irritations 
such as desk height, equipment place- 
ment, noise and heat. If these are inconve- 
nient during phase two they will become 
major problems during phase three. 

By the end of phase two, the accoun- 
tant should have formed an opinion as to 
the suitability of the computer operator 



candidate for the task at hand. If the in- 
dividual selected cannot master com- 
puter usage, it is dangerous to continue. A 
new candidate should be selected and 
portions of phases one and two repeated. 
In the event that management Is the com- 
puter operator. It is the accountant's duty 
to point out frankly the dangers of conti- 
nuing. Hopefully, the client can be con- 
vinced to consider another application or 
hire a more suitable computer operator. 

For illustrative puri^oses. It Is helpful to 
divide micro applications into two groups: 
applications which directly replace 
manual processing procedures, such as 
general ledger and billing; and applica- 
tions that have no precise manual analog, 
such as word processing and VisiCatc. 
The problems associated with direct 
replacement applications are most severe 
during phase three. Run these applica- 
tions in parallel with their manual 
equivalents to verify the accuracy of the 
data processed and the validity of the 
reports generated. 

Parallel processing Is expensive and 
difficult to achieve if the automated 
system does not exactly resemble the 
manual system It replaces. Therefore it Is 
often disregarded. Should this be the 
case, make every effort to prove the ac- 
curacy of the new system by installing in- 
dependent data controls. For best opera- 
tion, locate these outside the system and 
balance them to Internal system controls 
at frequent Intervals. 

Phase three should last until a com- 
plete cycle of the target system has been 
completed successfully. This can be as 
short as a day or as long as a year. To 
hasten the process shorten the cycle with 
backup data. With this technique, a week 
could be two days. A month could be two 
weeks and a year could be two months. 
The only limitation of this method Is the 
time required to develop proof totals verify- 
ing successful completion of each cycle. 

Phase four can proceed concurrently 
with the other phases. As the system In- 
stallation progresses, nwre employees will 
regard the micro as useful and non-threat- 
ening. They should be encouraged. A 
favorable impression of the micro Installa- 
tion will expedite phase five, the Installa- 
tion of other applications. Achievement of 
phase five and client micro proficiency is 
the ultimate goal. 

An open question Is, "Should the Ac- 
countant provide software development 
support to his client?" We have found 
that packaged software does not always 
meet a client's precise needs. Possible 
solutions will be the subject of a future 
column.! 
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CMMANUEL e GARCIA. iR 
& ASSOCIAftS 

303 N WABASH 

CHICAGO. ILLINOIS 60601 

PHONt '313i 782'»7f.0 



NOW IN ITS THIRD YEAR OF 
SPECIALIZING IN PRODUCTS 
RELATED TO THE TRS-80* 

• Dealer of quality software and hardware— 
we sell only the best, proven items. 

• Sponsor of CHICATRUG— monthly learn- 
ing sessions for TRS-80 users. 

• Publisher of "CHICATRUG News," month- 
ly publication for TRS-80 users. 

■ ■ Send for sample issue ■ ■ 

• Author of ■■Pensionmaker," the revolution- 
ary defined benefit pension system run- 
ning on the TRS-80 Model I where other 
pension actuaries are using mainframes. 

• Repair facilities {90-day warranty on new 
equipment and 30 days on used). 

See us in Chicago. 

E B Q. & Associates IS NOT ait>li«ie(i with Tandy Coipoiation or lUdio sriack 
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Will you SCARF your way to 
victory? 

Can you avoid the speedy MONSTERS that 
guard the maze? 

Answers to these questions await the brave, who 
dare to enter the maze where the monsters live. 
SCARFMAN is a new arcade game for the TRS-80' 
by the author of MISSILE ATTACK. Written in 
machine language. SCARFMAN features quality 
GRAPHICS. SOUND, REAL TIME MONSTERS and 
hours of ENJOYMENT. Nine progressive skill 
levels make the game more difficult as you get 
better. SCARFMAN is compatible with Alpha 
Product's joystick. 
Do you have what it takes to reach skill level 9? 

ORDER NOW! 



The Cornsoft Group «ft' 

6008 N. Keystone Ave., Indianapolis, IN 46220 (317) 257-3227 
Model I & Ml tape — 16.95 Model t disk — 20.95 Model III disk — 20.95 

Prices include shipping and handling 
Checks, Money Orders. VISA and MASTER CARD accepted. 

{ TRS-BO IS • Tandy Coipoialion Iradamaikl 
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News From 

KITCHEN TABIE SOFTWARE, INC. 



by David Busch 



1 1 T'^T'^M 







l^ itchen Table Inc. (KTI)— America's 

leading fictitious supplier of space 
age computer products has launched a 
national computer network called 
Hollerith 'Asynchronous Realtime Ex- 
ecutive Network (Harenet), named after 
the anonymous founder of KTI, Scott 
Nolan Hollerith, 

Harenet works with almost any micro 
with an RS-232C interface and 300 baud 
modem. However, some early models of 
KTI's TLS-8E computer can't be tied to the 
network due to an oversight. The Sri 
Lankan designers of the micro thought 
KTI specified a cereal instead of serial 
interface. 

Harenet was introduced to the industry 
at a press conference attended by one 
reporter. I suspect this was a case of 
"once burned, twice shy." At the last KTI 
press conference, several journalists suf- 
fered radiation burns when a TLS-8E color 
monitor converted itself into an X-ray 
machine without warning. 

On hand to introduce Harenet was a KTI 
spokesperson who asked to remain anon- 
ymous. (It was KTI's president, the reclu- 
sive Hollerith.) 

The host computer for Harenet was a 
massive bank of 100 TLS-8E Model II com- 
puters tied to more than 600 telephone 
lines. I feel this alternative to a costly 
IBM main frame is a stroke of genius, al- 
though it operates on the 240 volt 50 cycle 
current used in some European countries 
and only 160 volt 60 cycle is used in the 
United States, 



However, the KTI spokesperson (you 
know who) pointed out the cost of 100 
Model lis is about 50 percent of one IBM 
370/158— even when you include the cost 
of running an extension cord to France to 
obtain 240 volt 50 cycle power- 
Tying Into Harenet is simple. Load 
a dumb terminal, intelligent terminal 
or other communication to match your 
10. connect the modem to the phone sys- 
tem, call Western Union and ask for 
Operator 80. 

When the operator connects you to 
Harenet, one of the following messages 
will appear: All Ports Busy, Host Not 
Available, Host Down, Circuits Busy, 
Dropped by Host System, or Try Again In 
Five Minutes, You can safely ignore these. 
The KTI spokesperson explained the sig- 
nals are camouflage designed to fool high 
school kids attempting to obtain Illegal 
access to the system. Legitimate users 
can proceed by typing "Bug Off!" and 
their access code. 

"Harenet is cheaper- 
even including 
the extension cord 
to France. " 

Currently, KTI charges $5 per hour of 
hook-up time billed in Increments of a mi- 
crosecond. Solvent users can chargetheir 
payments on their credit cards. Others 
can pay by the hour by slipping quarters 
into a slot on the front of the TLS-8E, A 
uniformed attendant stops by once a 
month to retrieve the accrued payments. 

Harenet offers many programs to 
users. My first Choice was CB Simula- 
tor, Computerdom has always attracted 
lots of riff-raff originally involved with 
amateur radio. (It you don't tielieve me, 
take a look at two popular magazines: 73 
Magazine and 80 Microcomputing. See 
the connection?) 

Just as CB radio provided an audience 
for dummies too dimwitted to copy code 
at five words per nriinute, Harenet's CB 
simulator brings computerists a similar 
outlet. This should be very popular among 
persons barred from the airwaves be- 



cause they lacked the Intelligence to fill 
out the Federal Communication Commis- 
sion's free license application. 

To run CB Simulator, enter your Hare- 
net user ID number and password and 
type R.CB. The CRT clears, then is com- 
pletely filled with requests from other 
users for the correct time. 

In flipping through the CB Simulator's 
channels, I found several dominated by 10 
year-old kids and found myself wondering 
what sort of person pays $5 an hour to use 
a $2,000 computer as the world's most ex- 
pensive CB set. 

Another note on the simulator: Users 
with early TLS-SEs (the ones with gener- 
ous radio frequency output) can bypass 
Harenet and still use the CB program. 
Download CB/CMD from Harenet and run 
it. Any personal computer owner or televi- 
sion viewer within three miles will receive 
your transmissions with no difficulty. 

A handy item Is the Harenet's national 
bulletin board, BULLBOARD. As soon as 
KTI implements a way to retrieve these 
notes, this feature has all the makings of a 
first-class electronic mail system. 

FEEDBACK allows KTI to tell Harenet 
users what the company thinks of them. 

A variety of games are available to 
Harenet users. There Is a fine computer 
version of Bocce Ball and a game called 
High Stakes Hangman where if the com- 
puter wins, It destroys the directories on 
your disks. 

I also liked Time-Share Simulator, 
which simulates a session with a large 
time-sharing computer. The user can sim- 
ulate performing tasks on the big Harenet 
system. It's quite realistic. In fact. KTI 
charges the user an additional $5 an hour 
to play this game. 

Harenet also offers a number of utility 
programs like a very good text editor 
called Binary File Generator (BILGE) and 
EXPLAIN/CMD, which provides logical ex- 
cuses for more than 300 hazardous do- 
mestic situations. 

Many more features of Harenet can be 
found in a handy guide to the system titled 
"Handy Guide on How to Use Harenet." 
This tome is available directly from KTI for 
$27,95 or on the "Manager's Special" 
table at your local computer store at a 
slightly lower price.! 
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Just 55 hours ago, 5.3 million pounds of thrust from two solid fuel boosters sent the 
Space Shuttle Columbia into orbit Now. on-board computers performing 325.000 
separate operations every second will help guide the Columbia safely and gracefully 
home to Earth. 

Instant Software's SPACE SHUTTLE puts you in the command pilot's chair of America's 
first reusable space vehicle. And, until commercial spaceflight becomes a reality, this is 
the closest you'll get to the Ultimate Flight. 



0332R-A11 Model I & III Level II 16K $14.95* 

Instant Software 
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PETERBOROUGH, N.H. 03458 
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THE EXCLUSIVE ORACIE 



by Dennis Kitsz 



Q: A minor Assembly-language problem— I think. Shown is a 
short Basic program to determine how many divisors (2 to given 
integer - 1) divide evenly into a given dividend. 

10DEFINT IN: K = 

20 INPUT DIVIDEND (UNDER 327B8)":N 

X FOfl I ^ 2 TO N - 1 IF N/1 = INT(N/1) THEN K . K + 1 

*ONEXTI CLS PRINT "K=-,K GOTO 10 

From this Basic program I developed the Assembly-language 
coding. The divide algorithm comes from Bill Barden's book 
TRS-80 Assembly Language Programming, page 143. 

The Assembly language works with integers 100 (64), 555 
(022B), 999 (03E7), 1000 (03E8), 3000 (0BB8), but not with 2000 
(0700), nor 4000, 5000, 6000, 10000. 

I have been told that a rounding off error might affect results. 
In the listing the dividend is loaded into HL and the answer is 
held in C. 

Dan Beiemecidi 
Jamestown. CA 95327 



A: Dan, I have modified your code to run from Level II Basic pro- 
gram level (with a USR call), commented the lines, and added the 
mnemonics. Otherwise, it functions the same as the program 
you sent me in hex notation. Furthermore, I've put the original 
Basic program back-to back with this one to test it. Readers who 
want to test the routines are reminded not to input a value greater 
than 32767 (which will result in an OV ERROR) or less than 3 
(which will hang up the machine-language routine). 

What results did I receive? Matching ones. Why? Dan didn't 
tell me if his Basic program produced correct results, nor what 
the incorrect results were, but hand calculation showed that 
some of the results he claimed to be wrong were reported 
correctly. 

Readers may wonder why this question was included if there 
was no problem with the program. First ol all, it's an interesting 
program; but more important, it points up a problem most pro- 
grammers face. When something isn't working, you have to look 
in the right place. Dan Beiemecidi concluded his original pro- 
gram with JP 4380H. I dont know what the program at 4380H was 
supposed to do, but I suspect the problem lay with transferring or 
displaying the results. The machine language program shown 
here could be optimized for time and memory space, but it 
does work. 



II POKE 1«526,* : POKE liS27,74 t REN FOR DISK DerUSRI-fcH4Aai 
31 INPUT 'VU-UE TO CHECK FOR DIVISORS* iX i REM GET A DIVIDEND 
Jl Y - USBIX) ! REM FOR DISK t • USRilX)i OSR ROUTINE SETS 1 
»9 PRINT 'HUMBER OF DIVISORS 1S*;Y i HEM PRINT VALUE RET'D 
S« PRINT *HOH RUNNING BASIC PROGRAM ... PLEASE STAND SV* 
i§ OEFIHT 1-N ! K-« 1 REM ELIMINATE ROODINC ERRORS IH BASIC 
7» N ■ X I REM USE SAMF "^LUE OF X AS USED IH BASIC ROOTIKE 
SI FOR I . 2 TO N-l I ' a ■ IWT(H/I) THEN K - K ♦ 1 

91 NEXT I ! PRINT'NUMB F DIVISORS IS'jK : GOTO 21 

Program Listing 1. 



'The protected software dilemma 

is becoming more 

ar)d more common.'* 





1 SETUP 


DIVIDEND, DIVISOR, COUNTER, AHD SAVE DIVIDEND 




C07F8A 


CALL 


■A7FH 


1 HL BA8 DIVIDEND VALUE 


<AI] 


E! 


PUSH 


HL 


1 READY TO TRANSFER DIV'D 




DDEl 


FOP 


IX 


J TRANSPBR TO INDEX REG. 




11I2II 


LD 


DE,III2 


1 1ST IMTBGBR DIVISOR 


4AI9 


■ Ell 


LO 


C,ll 


) SET coovrn to ibro 




I ACCOHPLISB Division SV 


SUCCESSIVI SDBTRACTION 


4AIB 


B7 


OR 


A 


1 RBSBT CMUtX FLAC (SBC) 


4AIC 


CD%2 


SBC 


HL,DE 


t 1ST SOCCtSSIVB SDBT'H. 


4AIE 


FA144A 


JP 


N,4A14 


1 DONE It ■BCATIVB RK6ULT 


4A11 


C3IB4A 


JP 


4A0B 


I BL5B SUBTUWrr AGAIN 


4A14 


19 


ADD 


HL.DE 


1 ADO. U8T0IIB POSITIVE 




1 TEST 


IF EVEN 


DIVISION tRBSULT 11 lUCTLV lERO) j 


4A1S 


lEIfl 


LD 


A, II 


( BET ACCUNULATOR TO lERO 


4A17 


34 


ADD 


A,H 


1 TEST DIVIDIVD BIC8 8VTB 


4 All 


C2I24A 


JP 


NI,4A22 


t IP MOT ■■RO, THBM GO 


4A1B 


lEII 


LD 


A, 11 


I ELSE RBBTORB A TO IBRD 


4A1D 


15 


ADD 


A,L 


I GET DIVIDEND LOW BYTE 


4UB 


C2224A 


JP 


Nt,4A22 


r IF MOT ZERO, TBEN GO 




t INCREMENT COCMTER OKLV 


IF EXACTLY lERO RESULT 


4A21 


■C 


INC 


C 


1 INCREMENT COUNTER 




t RESTORE ORICINAL DIVIDEND, TEST IF PROCESS IS 




I COMPLETE (DIVISOR-DIVIDEND), REPEAT IF NOT DONE 




DDES 


PUSH 


II 


) READY TO TRANSPBR BACK 




El 


POP 


BL 


1 ORIS. VALUE AGAIN IN HL 


4A1S 


13 


INC 


DB 


( GBT NBXT DIVISOR READY 


4A26 


B7 


OR 


A 


1 RESET CAItRY flMi (SBC) 




EPS2 


SBC 


HL,DE 


t AMD BKIN SDBTRACTIDH 


4A1) 


CA324A 


JP 


1,4A3 2 


1 JDKP ODT ir HOT lERO 


4A2C 


DDES 


PUSH 


IX 


( READY TO TRANSFER BACK 


4A2e 


ei 


POP 


HL 


t ORIGINAL VALUE IS BACK 


uir 


C»b4a 


JP 


4AiB 


( DO IT ALL AGAIN 




f TRANSFER COUtTTER TO BL 


RETURN TO BASIC WITH RESULT 


4A3I 


1(11 


LD 


B.ai 


i SET HIGB XPBR BYTE TO 1 


4AJ4 


CS 


PUSH 


BC 


; LOH BYTE HAS TBE ANSWER 


4A3& 


El 


POP 


HL 


( TRANSFER TO BL FOR RET. 


4A36 


C19AIA 


JP 


•A»AH 


1 BACK TO BASIC H/ RESULT 






Program Listing 2. 



O: My problem is protected tapes, such as the Subiogic FS-1 
Flight Simulator program, which take control over from the 
ROM and then load and execute the main program. My desire 
is to load these things on my Exatron Stringy-Floppy. I am using 
an RSM-2 monitor to look at the machine language, but it's about 
impossible to tell where the execution point is. I don't know 
enough about machine language to decipher the preloaders, 
either. They might work after I load the machine code from my 
Stringy if I knew the execution point. Do you know where I could 
find some info about the System loading routines? Also, how is it 
that with some programs, if I hit the Reset button the computer 
locks up somewhere and can't be reset to Basic or anything? My 
Electric Pencil does this, and others. Is this a hardware problem 
or a software quirk? I thought Reset was supposed to reset 
everything and return to the Basic prompt, but it doesn't always 
work, is there some vector in RAM (reserved RAM) that gets 
changed by the programs? 

Michael A. Czutiajewski 
APO New Yorif 

A: The protected software dilemma is becoming more and 
more common. Software companies are undecided: Some offer 
totally unprotected software and encourage backup copying, 
whereas others lock their software and throw away the key. Sub- 
logic's loader, however, can be broken. First of all you will need to 
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THC EXCIUSIVE ORacie 



write a Model I leader reader 



XORA 


; DRIVE ZERO 


CALL 0212H 


; DRIVE ON 


CALL02geH 


; FIND LEADER 


LD HL,7A00H 


; STORE AREA 


LOOP CALL0235H 


. READ A BYTE 


LDIHM^ 


; STORE BYTE 


INCHL 


; INC STORAGE 


JPLOOP 


; ENDLESS LOOP 



Put an AM radio next to the computer so you can hear when the 
pause in data occurs. That's the end of the loader. Reset the com- 
puter, and use your monitor to examine locations 7A00 and for- 
ward. Print out a copy, and start taking It apart; all the informa- 
tion is there. Here's a hint: The FS-1 program Itself Is stored on 
tape with an ever-changing offset value being added to each 
byte. Also, the delay from preloader to program Is important— so 
Important that the program won't even load If your recorder runs 
more than atx>ut five percent fast. 

The short routine above will help you crack most tape-based 
preloaders so that you can get them on your Stringy-Floppy. 
You'll still have to do some machine- language footwork, but at 
least you'll have a leader you can disassemble. For detailed Infor- 
mation on the System loading routines, refer to my article 
"Through the Ins and Outs of Tape" In The Alternate Source, 1 :6 
(now sold as a bound issue Including the six Issues of Volume 1). 

Q: Many days back I Installed the upper/lowercase mod 
published in the March 1980 issue of 60 Mlcrocomputtng. Every- 
thing went fine, even though I have those high-rise a's. But then 
along comes Scripsit, and It does not work. Scrlpsit is really the 
only time I have use for lowercase. You mentioned writing to the 
original authors for a modification update, so this t did— twice. 
But alas I have heard nothing. Perhaps other readers have had 
the same luck. Could you furnish the necessary changes that will 
allow upper/lowercase with Scrlpsit? 

Peter Ashley 
Portland, ME 

A: Okay, Peter, get out the soldering iron. You'll need just one 
2102 memory chip (Radio Shack sells them, part #276-2501), and 
a few bits of wire. Read from the top left on the chip, down, and 
around, and find pins 11 and 12. Bend these upward. Piggyback 
the chip on Z45, 46, 47, 46, 61, 62 or 63— any one of these will do. 
All the pins except 11 and 12 will be soldered to the chip twiow. 
Do it very carefully, because there are lots of tiny circuit traces 
running around that area. If you've done the March 1980 mod, 
you probably already have one of these memory chips soldered 
In place. 

Next turn to Z25 on board the computer. It contains four OR 
gates, the last of which Is not used. Remove as much solder as 
you can from pins 11, 12 and 13 (use solder wicking braid. Radio 
Shack #64-2090). Take an Exacto knife and cut pins 12 and 13 free 
from each other and from the ground lead which connects to pin 7. 

Find the circuit trace running from Z60 pin 4 to Z30 pin 13. It's 
tricky to locate, so use an ohmmeter If you need to. Cut It. (Make 
sure It's not the one that goes from Z60 pin to Z27 pin 13.) Again, 
you probably have done this it you've made any earlier lower- 
case mod. 

Connect: Z60 pin 5 to Z25 pin 13, Z30 pin 13 to Z25 pin 12, Z25 
pin 11 to the new memory chip pin 11, and Z60 pin 4 to the new 
nrwmory chip in pin 12. The nnodlflcatlon Is complete and switch- 
less; It should work with Scripsit, Electric Pencil or most any 
other lowercase driver routine. 

Q: I've owned a Bally Arcade Honw Computer for approximate- 
ly four years now, and one week ago I purchased a TRS-80 Model 
I Level I from a friend. A little under two years ago, I tx>ught eight 



4116s to expand my Bally, but learned the Basic with that 
machine ignored anything above 4K, which brings me to the first 
question. 

I've never seen an article on putting In your own 16K chips. Can 
you either tell me how to, or where I can write to find out, without 
buying more 4116s (at the time I paid $10 per IC1). 

I don't like Level I Basic and want to have Level II. The problem 
Is, I can't see paying Radio Shack to install It when I can quite 
easily. So where can I purchase Level II ROMs? I've read an arti- 
cle where a man built his own computer using Radio Shack 
ROMs but Ixjught them from an outside source. 

I recall reading about a keybounce problem from time to time. 
But I keep whatever articles I think I'll need and throw away the 
rest— never planning to buy an 60. How do I hardwire in a de- 
bounce circuit? 

P.S. How could I put In Level II while keeping Level I? 

Alvin C. Pruitt 
Pasadena 

A: Welcome to the TRS-80, Alvin. Just when I think there aren't 
any more beginners on the Model I, a passel of letters comes in 
the malltMX. So here goes. 

Upgrading to 16K and Level II at the same time Is easy. Your 
Level II ROM set might come In several versions. The "old" set 
from Radio Shack used an outboard circuit card and a connector 
cable; the newer set contains only two ICs which fit right Into the 
sockets. As far as I know. Radio Shack Is the only source for a 
complete, compatible chip set. There is a three-chip set built Into 
the PMC-dO, but Personal Micro Computers sells these only as a 
replacement part, and without the satellite board necessary for 
the TRS-80. LNW Research also offers Level II Basic, but as a six- 
chip set using 2716 erasable memories. Likewise, It Is not im- 
mediately compatible with the TRS-80's Innards. (Readers who 
know of other legal sources can forward Information to me, and 
I'll send It along to Alvin.) 

Now let's get started. Find Z3 and Z71 , which are shorting bars 
(shunts) used for selecting ROM and RAM memory. You'll need a 
new set of these, a pair of eight-position DIP switches, or if you 
just can't wait you can use ordinary staples Inserted In the 
sockets. Tape them down so they don't fall out and short out 
other circuits. 

Your new Z71 should read (from the top): shorted, broken, 
shorted, broken, shorted, broken, broken, broken. All eight bars 
of your new Z3 for the three-chip ROM set should be shorted 
across; for the two-chip ROM set, break the topmost bar. 

Now remove the 4K RAMs; these are socketed and numbered 
Z14-Z20. Save them In aluminum foil and give them to a friend. 
Lift the new 41 16 RAMs by the ends and insert them in the sock- 
ets in the same direction as the ones removed. Press carefully 
but firmly until they are in place, making sure no leads squeeze 
underneath or out the sides of the sockets. The 16K RAM 
upgrade is finished. 

To Insert the two-chip ROM set, merely remove the Level I 
ROMs from their sockets {Z33 and Z34), and replace them with 
the new ones, ROM A in socket Z33 and ROM B in socket Z34. For 
the three-chip satellite board, remove the Level I ROMs, plug In 
the cable to either socket Z33 or Z34 (with the cable arrow to the 
top left), and fasten the satellite board down with double- 
face tape. 

Four (or six) wires remain from the satellite board. The yellow 
wire goes to A1 1 (Z51 pin 6 or Z37 pin 6), the red wire to A12 (Z51 
pln10orZ21 pin 13), the orange wire to A13(Z21 pin 3), the green 
wire to ROM* (Z74 pin 9). The white and black wires (which you 
may or may not have) go to power: white to + 5V at any IC (say, 
Z25 pin 14) and black to ground pin 7 of the same IC. The Level II 
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Even if you have one of the other versions on the market, 
you'll still consider this program a MUST for your collection. 
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SPACE INTRUDERS is for the 

TRS 6U MODEL 1 & 3 TAPE 16K 010-01 16 $19.95 

TRS 80 MODEL 1 & 3 DISK 32K 012^1 16 $20 95 

TO ORDER SEE YOUR LOCAL DEALER. IF HE DOES NOT 
HAVE THE PROGRAM YOU WANT THEN CALL: 

TOLL FREE MIOO-327-7172 (Orders Only) OR WRITE US. 
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upgrade is complete. Power on should be MEMORY SIZE? or 
MEM SIZE?, and after pressing Enter, a PRINT MEM will reveal 
15572 (three-chip set) or 15570 {two-chip set). 

Because there were more than 30 "standard" Model I TRS-80's 
made or updated, if you upgrade in two steps, or if you have an 
"A" board (si Ik- screened 1700069A), you'll need more help. Refer 
to the TRS-80 Technical Reference Manual {Ca\. #26-2103) and to 
my book, The Custom TRS-80. To add Level I and II, turn to "Appli- 
cations," 80 Microcomputing, September 1980. 

Finally, unless you are hardware-mad, don't think atiout a 
hardwired fix for keyboard debounce. The options are a software 
debounce routine such as Radio Shack's KBFIX, or purchase of 
the Hall-effect keyboard upgrade (the "ALPS" keyboard) sold by 
Radio Shack. You can keep it very clean, too, lifting the keycaps 
and cleaning with compressed air on a regular basis. 

Q: Help me! Something is wrong with my Mod I, and nobody 
can tell me what It is. I have a 16K keyboard with the Programma 
60 Graf ix txiard installed, a 32K expansion interface, one 40-track 
Vista V-80 disk drive, an Epson MX-80 printer, RS-232 card and 
modem, a voice synthesizer and a Vox-Box. The cable between 
my keyboard and expansion interface was homemade and is two 
feet long. (I thought I might as well tell you everything— just in 
case). These are my problems: 

• Frequent crashing, mostly Basic programs. I have almost no 
problem with machine-language programs, except getting them 
to load, as I will explain. 

• False Syntax, Undefined Line Number and Next Without For 
errors are very popular. Listing the offending line number will 



AMAZING PROGBAM SPEEDS UP BASIC 

Your tim* is ▼oluobl*. so why wast* it on slow-running 
BASIC progrcans? PROFSOFTs TASTER" wlU analyse thoM 
programs whilm thmy run. th*n show you a slmpl* changs 
(usually on* naw lin*} that can r*duc« run-tim«s by up to 50 % . 

Accounting systems, iinancial modsls. engineering and 
scientiiic programs all run faster; so do games. Large, complex 
programs improve the most, and 'TASTER" is easy to use. 

THIS ISN'T A COMPILER! Your BASIC programs remain read- 
able and can be changed later on. While your programs run. 
"FASTER" counts how often each "Torioble" is used, then shows 
you the correct sequence for these variables. Aherwards, the 
computer finds them sooner, so yo\ir programs run foster. 

Does it really work? Yesl Personal Computing said so in their 
May, 1981 issue (p. 116): we've received many letters from custo- 
mers who've gotten 20-50% improvements; and we will make 
you this offer: 

Order "FASTER" now. Try it on your bread-and-butter pro- 
groms. If you don't get an overall run-time reduction of at least 
20% , return it within 30 days for a prompt and cheerful refund. 

'TASTER" costs only $29.95 ond runs on TRS-80 Models I and 
in,16-48K. tope or disk. . 

CALL MOW TOLL-FREE FOS OBDEBS OMLT: 

(800) 824-7888, Op«r. 422 

Calif: (800) 852-7777, Opsr. 422 

AUika/Hawall: (800) 824-7919, Opar. 422 

For technical iniormation. write or call um directly: 
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P.B. 839 / No. Hollywood. Ca. 91603 / (213) 764-3131 

Clwck. M/C. VISA ok. Add 12. X loi COD. E% tain Ian in CaltlotDla. and 15.00 lor 
«hipm*n( ouulda North Ainvrica, 



mostly reveal a perfectly good line, but every so often the line will 
be screwed up. 

• Ttiings worsen drastically when a device such as the voice 
synttiesizer or Vox-Box are hooked up and on, although the prob- 
lems are not eliminated when these are removed. A Basic pro- 
gram will run for no longer than 10 seconds without crashing. 

• Here's another sequence: 

A. Power up. MEM == 48338, correct. 

B. Execute DOS, run a program, Reset with Break. 
MEM -15627. 

C. Reset again. MEM =15879. 

D. Reset again. MEM = 16224. 

E. Reset again. MEM = 15424. 

F. Reset again, MEM = 18687. 

G. Reset again. Only -HIS L2 BA" appears, and the initial- 
ization doesn't finish. 

• I can still PEEK and POKE into the memory it says I don't 
have. If I were to try to execute a program in DOS that loads into 
the top 32K after one of the unnatural memory sizes, I would get a 
Tried to Load Read Only Memory DOS error. What does the pro- 
gram loader do that POKE or LD doesn't? The only way I can 
regain control over the computer is by a power-down. 

I've done all the testing I could, and I've run memory 
tests— and this is what happened. I ran one test and all memory 
was fine. I ran it again and found a bad byte in my top 16K. I ran 
the test again and found another bad byte before the old one. 
When the test ran over the byte with the old error it checked out 
fine. I then removed my top 16K hoping that I would have 16K less 
memory with no problems. I was wrong— everything was 
the same. 

I have three different types of RAMs, 400 nS, 200 nS, and 150 
nS. I have been told that this causes no problems at the normal 
TRS-80 clock speed. Before my problems started I was using my 
system for months without any difficulties. I have also cleaned 
my contacts. 

To me this sounds like a memory problem, but I'm convinced 
that it's not the memory itself but something controlling it, I have 
the new models of the keyboard and the expansion interface. 
Could it be a problem with the bus in the expansion interface that 
makes the whole system susceptible to noise? 

Micfiael Robin 
New York City 



A: You've got the universal weary system blues. With a fully ex- 
panded Model I, problems are almost inevitable. I've not had a 
chance to look inside the Vox-Box, but the mailbox has been 
filled with letters telling me that problems started when the Vox- 
Box was attached. But there are other things. The Programma 
board increases the noise inside the keyboard unit dramatically, 
and its method of attaching (pressure fitting on top of existing 
ICs) is suspect. If you're in love with the Programma board, then 
lightly solder its connections in place; otherwise, take the 
headers off one by one and clean them thoroughly with contact 
cleaner, or remove the board entirely. That will get you started 
toward eliminating those program crashes. 

Next, shorten the cable to the expansion box. This cable is a 
distinct source of electronic noise to start with, and the cable 
provided with the TRS-80 is shielded to help cut down that noise. 
It you must have a long cable, contact a supplier of Belden cable 
and invest in the shielded type, or at the very least obtain 
Spectra-Twist communication style multiconduclor cable (sold 
by such surplus outlets as BNF Enterprises and Poly Paks). 

The Vox-Box would probably work better connected directly to 
the keyboard unit. Exatron and Alpha Products both sell cables 
with several connectors; place one of these between your cable 
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and the expansion interface, and connect the Vox-Box there. 

The above suggestions take care of potentiai system noise 
first. But your analysis of the symptoms Is probably correct: The 
memory crashing problems are llkeiy related to insufficient ac- 
cess time to the memories themselves. This has very little to do 
with the memory speed and a lot to do with total propagation 
time along the length of the system. When your DOS discovers 
any block of memory which does not report back the same infor- 
mation it was just given, It assumes that it is trying to load a pro- 
gram into ROM; hence the message you received. POKE/PEEK 
programs seem to work because you probably haven't encoun- 
tered the random memory select problems the fast, constant 
DOS writing process does. And most machine-language pro- 
grams will work if they don't depend heavily on writing to high 
memory; reading is lots easier. 

Since Basic keeps its operating parameters (the "Basic 
stack") in high memory, it is constantly writing into it information 
about the line being processed, error conditions, subroutine 
returns, and For. . .Next loops. Any change while the program Is 
running will look like an error to Basic, and so perfectly good 
lines will be presented as incorrect. 

There is a solution that has worked In virtually every case. The 
change is something I've published before, but is such a iifesaver 
I'll mention It again. Open the keyboard unit and find 269. Locate 
the circuit trace running from pin 5 (it runs back underneath Z69). 
Cut that trace. Jumper pins 10 and 12 of Z69 with a short piece of 
wire. That modification will advance the memory select circuitry 
enough to take care of aging memory or buffer circuits and make 
that memory reliable again. 

Q: My computer hangs up during disk access. I use LDOS. I 
tried Shift/Break to restart the drive, but it doesn't work, i also 
contacted the manufacturer and they said I must have a problem 
with my system. Help! 

Over 20 Readers 
Everywhere, U.S.A. 

A: Shift/Break is supposed to work, but there is a partial hard- 
ware solution. The disk drives are held in an "on" condition by a 
capacitor which can suffer from aging, especially in the earlier 
expansion interfaces. Replacing this capacitor with a larger 
value will not only overcome the aging, but also keep the disk 
drive on longer and avoid the "silent death" problem that 
Shift/Break was meant to overcome, but doesn't always seem to. 

In the expansion interface, find C48 (C62 in the newer expan- 
sion boxes and C12 in the LNW expansion). This is currently a 
33mF electrolytic capacitor. Obtain a 47 or 68 mF, 16-volt, bead 
tantalum electrolytic capacitor. These are expensive (respective- 
ly $3.73 and $4.72 each from Digi-Key, Hiway 32 South, P.O. Box 
877, Thief River Falls, MN 56701 —part numbers P2042 or P2043), 
but will wear well in the system. Note the polarity of the capacitor 
already in the expansion box and insert the new capacitor in the 
same direction. Your problems should be solved. 



D«sp«rate? Address your questions about TRS-80 Model I 
(Including LNW-80, Its System Expansion, and PMC-80), and 
TRS-80 Color Computer to D«nnls KItsz, Roxbury, Vermont 
05669. By th« way, I cannot usually answer questions atxKit 
specific commercial software or hardware unless It comas 
under the category of "standard" (e.g., Electric Pencil, 
NEW DOS, Ed itorf Assembler, Stringy- Floppy, etc.) Please con- 
tact the manufacturers.H 



Programs and 
Books For Beginners 

Everything you need to know to get started 
programming your own computer. Nine brand-new 
books, each jam-packed with easy-to-understMMl Info 
for beginners, laymen, novices, general consumers 
who want to know how to make a computer work for 
them. Good for advanced novices and programmers 
too. These handy manuals, guides and program 
sourcebooks are crammed with hundreds of tips, 
tricks, secrets, insights, shortcuts and techniques, 
plus hundreds of tested, ready-to-run programs. 

Color & Pocket 

TRS-80 Color Computer. TRS-BO Pocket Computer. 
Sharp PC-1211 Pocket Computer. Three of the most- 
popular computers for beginners. Among our 9 freshly- 
written books are scores of programs, tips, tricks and 
learn-by-dolng instructions for beginners. 

BASIC- language 

BASIC Made Easy, easiest way yet to learn the 
worlds most popular computer language, 
140 pages. S8.95 

Universal BASIC Coding Form, programming 
worksheets maKe writing software a breeze, 
40-sheet pad $2.95 

Pocket Computer 

so Programs In BASIC tor the Home, Sctiool & Of- 
fice— 2nd Edition, useful pluginand-run software. 
for ihe PocKet Computer, 96 pages. $9.95 

50 MORE Programs In BASIC for the Home, School & 
Office, sourcebook of tested ready-to-run software, 
'or the Pocket Computer, 96 pages $9.95 

101 Pocket Computer Programming Tips & Tricks, 
secrets, shortcuts, techniques from a master pro- 
grammer, 128 pages $7.95 
Murder In The Mansion and Other Computer Adven- 
tures— 2nd Edition, murder mystery, space, 
adventures, loads o( (un, 2d programs. 
96 pages $6.96 
Pocket Computer Programming Made Easy, new fast- 
and-easy way to make the worlds smallest computer 
work for you, 1 40 pages $8.95 
Pocket-BASIC Coding Form, programming 
worksheets make writing pocket computer software 
easy and fun. 40-sheet pad. $2.95 

Color Computer 

101 Color Computer Programming Tips & Tricks, 

learn-by-dolng instructions, techniques, shortcuts, 
insights, 12 Spages $7.95 

55 Color Computer Programs (or the Home, School & 
Office, practical ready-to-run software with graphics, 
96 pages. $9.95 

55 MORE Color Computer Programs tor the Home, 
School & Office, sourcebook of useful plug-in-and- 
run software with graphics, 96 pages $9.95 

Order direct from this ad. Send check or money order. 
Include $1 shipping for each item ordered. Or write 
for our free catalog. Mail orders to: 

ARCsoft Publishers 

Post Office Box 132 L 
Woodsboro, Maryland 21798 

telephone (301) 663-4444 
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Tired of typing in ail 
your programs? 

Save time 
and money! 





LOAD 80 



ALL THE 

MAJOR PROGRAM 
LISTINGS FROM 
80 MICROCOMPUTING 
ON CASSETTE 

EACH MONTH 

$9.95 

plus S1 00 ea. postage & handling 



SAVE HOURS OF 
TYPING & AGGRAVATION 



"Frankly, after hundreds ot hours of frustration, I 
seldom ever try to keyboard a published program 
Inevitably, I mess it up when I keyboard it. Who needs the 
aggravation? 
"This is w/hy I started a new series of cassettes called 
LOAD-60. Each cassette will have program dumps of the 
listings in an issue of 80 Microcomputing. These listings 
are direct from the authors and tested by the 80 
Microcomputing staff. All but the very short program 
listings will be on the LOAD-80 cassettes. Thus, you will be 
able to save hours ot inputting programs and even more of 
debugging your keyboard errors " 



Wayne Green 

Publisnai 80 Microcomputing 




The LOAD-80 cassette is simply the program listings 
that appear in the articles in 80 Microcomputing. It was 
created to save you the time involved in typing the listings 
yourself Successful loading of the programs depends on 
reading the documentation in the articles. If you have your 
current magazine at hand when you load the cassette, you 
should have no difficulty, if you still have problems, please 
return the tape for replacement. 

LOAD-60 began with the April 1981 Issue. To order back 
issues, look for the back issue advertisement in this 
magazine or ask your local dealer. 

To order LOAD-60. fill in the attached card and we will 
send you your LOAD-80 cassette for the major programs in 
this issue. If the card is missing, fill in the coupon below (a 
photocopy is acceptable) and mail to: LOAD-80, 80 Pine 
Street, Peterborough. NH 03458. 



■ YES, I want December LOAD-80 

I D Check/Money Order ($9.95 plus $1 .00 ea. p&h)[:j MasterCard Lj VISA □ Am. Ex. 

I Name: 

I Address:__ 

I City: ^^— -State:. 

I Signature: Card # 

I 



12M1 



Zip:. 



_Exp.Date: 



LOAD-80 IS manufactured by Instant Soi|*afe. a Oivision ot WAVNE GREEN INC , 80 Pine Slreal PelefDotojQM, NM 0J458 Tnere >s no warranty 
expressed o' implied mat LOAD 90 miIi do flnytnmfl other than save you typ.ntj 



SOFT BITS 

a basic/assembly column 



by Roger Fuller 



This column is dedicated to those who 
have read the books but still can- 
not write assembly or machine language 
programs 

Before I got a TRS-80 my only contact 
with a computer was in my college Fortran 
class. I bought my computer to individu- 
alize a math class for low ability students. 
Since there was Itttle software in this area 
I was forced to write some myself. But 
somehow the initial thrust was diverted 
from teaching with to teaching about 
computers, I slowly replaced my remedial 
classes with computer math classes. 
Here I applied the skills developed in 
teaching the low ability student to teach- 
ing the beginning computer programmer. 

At first I tried the classical methods 
with which I was taught. They did not work 
as well as i wished so i tried other tech- 
niques, I settled on a combination of inter- 
active lecture-demonstration and labora- 
tory assignment. My approach was to 
develop problem solving skills by leach- 
ing Basic programming as a craft rather 
than as a language. This is much slower 
but gives the student a firm foundation in 
■'right thinking," f found no cases of foun- 
dation collapse as sometimes occur when 
a student just stores knowledge with no 
skill in using it. 

i teach a machine language class for 
the Dallas TRS-80 Users Group. Over the 
years the many people in it have given me 
a great deal of insight in the problems of 
learning machine and assembly program- 
ming. The most common refrain has been, 
"I have read all the books but I still can't 
do anything." The reason is lack of "right 
thinking" and proper equipment. In this 
column I will attempt to correct these 
problems. 

If you already know Basic you may have 
problems learning assembly and machine 
language. Trying to relate assembly and 
machine language to Basic causes confu- 
sion. Compounding this problem is the 
distinction between machine language 
and assembly language. The crushing 
blow is the absence of an equivalent to 
the command mode in Basic. 

To understand complex Ideas you must 
reduce them to simple ideas or compare 
them to known concepts and principles. 



This holds true even for a genius The 
following analogies could be a Rosetta 
Stone for you: 

• Basic keywords are to a Basic pro- 
gram what machine language instruction 
bytes are to a block of memory. 

• Basic line numbers are to a Basic 
program what memory addresses are to a 
machine language program. 

These analogies are imperfect. But you 
must understand the above to achieve 
"right thinking." 'V'ou can conclude from 
the above that a machine language pro- 
gram is a block of memory and machine 
language is memory byte oriented. To 
drive home this point, let's investigate the 
TRS-80's memory. Although we know our 



"This is slower 
but provides 
a firm foundation. 



programs are stored in memory, not every- 
one is sure of where or how, Basic's PEEK 
function lets you examine memory con- 
tents. Type this into your computer and 
run it: 

10 ADDRESS = 

20 PRINT PEEK (ADDRESS) 

What did you see on the screen? That 
number represents the contents of the 
first memory location. Let us improve on 
the program to examine the first 10 ad- 
dresses. 

10 FOR ADDRESS = to 10 
20 PRINT PEEK (ADDRESS). 

30 Next 

How many numbers are displayed on 
the screen? We used a loop to count from 
through 10, for a total of eleven. Always 
be careful in determining counts tiecause 
a mistake can be disastrous. 

Notice that this program displays only 
numbers on the screen. Use the next pro- 
gram to make a more thorough investiga- 
tion. What conclusions can you draw from 
what you saw? I am most Interested in the 



lowest and highest numbers you found- 
Are these the only possible values for 
lowest and highest? Why were there no 
big numbers or negative ones? 

■0 ADDRESSED 

20 BYTE - PEEK lADDRESSI 

30 LCV. = BVTE 

4C HIGH = BYTE 

5C FOR ADDRESS- i to 12288 

60 BYTE = PEEK (ADDRESS! 

70 IF BYTE<LOW THEN LOW ^ BYTE 

80 If BYTE>HlGH THEN HIGH = 6YTE 

90 PRINT BYTE, 

100 NEXT ADDRESS PRINT 

110 PRINT 'LOW = " LOW 

120 PRINT ■HIGH = ■ HIGH 

The answers He in the very nature of the 
TRS-BO's RAM chips. We use numbers 
easily, but haveyouevery stopped to think 
what they truly are? A number is an idea 
we understand best when counting. But 
just as a picture of a person is not the per- 
son, a symbol for a number Is not the num- 
ber itself. We know both the Roman nu- 
meral V and the Arabic numeral 5 repre- 
sent the numtjer five, and so the numerals 
on the screen represent only the contents 
of the appropriate memory location. If 
numbers represent only the contents of a 
memory location, just what are the con- 
tents? They are patterns of electrical 
charges. 

Numbers are an easy way of describing 
these patterns. These numbers are why 
your computer is called a digital comput- 
er. But the patterns are made up of 
charges. To diagram these patterns we 
need only two symbols: a symbol for 
charge present and a symbol for charge 
not present. By tradition the symbols 
chosen for this job are 1 and respectively. 

Let's use some paper and pencil to 
make a short experiment. Write all the 
possible combinations of four 1's and O's. 
{You should find sixteen different arrange- 
ments.) Now, suppose you had five boxes 
instead of four. Is there a way of determin- 
ing the correct number of patterns without 
trial and error? There is. Consider that the 
fifth box could contain a followed by the 
sixteen arrangements in the other four, or 
a 1 followed by sixteen arrangements In 
the other four. This makes 32 possible ar- 
rangements of 1's and O's In five boxes. 
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Six boxes would produce a 1 with 32 
arrangements and a with 32 arrange- 
ments or a total of 64 arrangements. What 
would be the number of arrangements In 
eight boxes? 

The resulting number of arrangements 
in eight boxes almost matches the high- 
est number you found by PEEKIng into the 
memory addresses of your machine. Can 
you explain the difference? Remembers? 
If we count the lowest numt>er found and 
all the others, the total is a perfect match. 

But which of those 256 patterns 
matches which of those 256 numbers? 
The eight boxes in your experiment match 
the eight bits in a byte. "Bit" is a word 
coined from the first letter of "binary" and 
the last two letters of "digit." "Byte" 
describes eight bits just as dozen de- 
scribes 12 of something. Each of those 
boxes in your experiment could represent 
a bit's position in a byte. We could put the 
boxes in order by numbering them. But 
should we number left to right or right 
to left? 

If the first digit of a number is 3, can you 
pronounce the number without knowing 
the other digits? No, since the number 
could be "three something" or "thirty 
something." We must examine a number 
from right to left in order to read it. This 
Idea provides us with the location to begin 
numbering bits. But shall we start with 
one or with zero? This question is funda- 
mental to any counting done with a 
computer. 

Let's discover whether we start count- 
ing with a zero or one. Place a few coins 
before you. Now count them. Easy, isn't 
it? Remove all except the last coin and 
then do your counting. Now remove the 
last coin and count. You could count the 
coins even when none remained. That is 
t>ecause you started counting at zero, not 
one. The boxes, therefore, shall be num- 
bered right to left starting at zero. 



16 8 

Fig. 2. 



Look at the diagram in Fig. 1 and burn it 

into your mind's eye. How many boxes are 
there? Don't forget box 0. You should have 
answered 'eight." With the boxes num- 
bered correctly, we could place ones and 
zeroes in them to make 256 different 
patterns. 

A confusing practice in the computer 
field is calling bit positions bits. Which is 
meant is not always clear to the inexper- 
ienced. This problem is compounded by 
the close relationship of bit (binary digit) 
and bit position. Draw a byte box (eight bit 
positions) and number each position, and 
we will clear things up a bit. 

Look at the byte box you have drawn 
and tell how many bits (binary digits) are 
in it. The answer, of course, is none 
because you must actually write a 1 or a 
to have a digit in each position. So in your 
byte box you could have 1 , or nothing in 
each bit position. A RAM chip is a collec- 
tion of electronic byte boxes in which 
each bit location is either charged or not 
charged with voltage. Since each location 
is either charged or not charged (repre- 



sented by 1 or 0) it is not possible to repre- 
sent nothing in a bit location. For this rea- 
son, bit and bit position are inseparable 
when discussing a computer's memory. A 
bit then can describe a binary digit (value 
1 or 0) or a particular position in a byte 
such as bit 7 or both. 

Still unanswered is which of those 256 
bit patterns represent which of those 256 
numbers. This requires a short review of 
our decimal numeration system. Numera- 
tion refers to how we use numerals to 
represent numbers. Numerals are sym- 
bols whereas numbers are ideas universal 
in concept and abstract in essence. Dif- 
ferent numerals (the Roman numeral V 
and the Arabic numeral 5) can represent 
the same number. 

The decimal numeration system uses 
our familiar numerals through 9 to repre- 
sent the numbers zero through nine. 
Numbers larger than nine may be repre- 
sented by the ingenious place value de- 
vice. Each position in a decimal numerat- 
ed number is a power of ten. For this 
reason the decimal system is called a 
base ten system. The first place is the 
units place, or 10 to the power. The sec- 
ond place is the tens place, or 10 to the 
first power, and so on. 

By placing the correct numeral in the 
correct position, we can represent any 
number. The binary or base 2 system uses 
the same concept of place value. 

Another byte box labeled with the 
powers of 2 and their values is shown in 
Fig, 2. As you can see, each bit (binary 
digit) can stand for the value of the ap- 
propriate power of 2. If all eight bits were 
zeroes, the total valueof the byte would be 
zero. If all bits except bit seven were 
zeroes, the value would be 128. If all bits 
except bit were zeroes, the value would 
be 1. What would the value of the byte be if 
all bits were ones? This answers the 







00100 


ORG 


40SDK 




405D 


2A164e 


00110 SWITCH 


LD 


HL,(4016H] 


J GET KEYBORD DRIVER 
I ADDRESS 


4160 


Cl:)4B6D4e 


00120 


LD 


BC,{KEYCHK+1] 


;LOAD KEYCHK ADDRESS 


4064 


ED43I640 


00130 


LD 


(4016H) ,BC 


: EXCHANGE 


406 8 


226040 


B014B 


LO 


(REYCHK+1) rHL 


; EXCHANGE 


406B 


C9 


00150 
00160 ; 


RET 




; RETURN TO BASIC 


406C 


C3 


0017B KEYCHK 


DEFB 


BCDB 


jFIRST BYTE OP CALL 


4060 


6C4B 


00160 


DEFH 


KEYCHK 


; ADDRESS OF CALL 


40er 


FE2B 


00190 


CP 


' • 


.-PRINTABLE ASCII? 


4071 


D0 


00200 


BET 


NC 


lIP so RETURN 


4072 


FE0D 


00210 


CP 


13 


jCARRAIGE RETURN 


4074 


C8 


00220 


RET 


Z 


;IF SO RETURN 


407 5 


FE0e 


0B2B0 


CP 


6 


;BACK ARROW? 


4077 


C8 


0B240 


RET 


Z 


;IP SO RETURN 


4076 


PE01 


S025B 


CP 


1 


1 BREAK KET7 


4I7A 


C8 


ceifec 


RET 


z 


J IF SO RETURN 


407B 


AF 


0B270 


XOR 


A 


.•NULLIFY KEYSTROKE 


407C 


C9 


00260 


RET 




fRESUNE KEYSCAN 


eeee 




00290 


END 






00000 TOTAL ERRORS 














Program 


Listing 





52 • 80 Microcomputing. December1981 



"which pattern matches which number" 
mystery. I suggest you construct a chart 
showing the bit patterns and decimal 
values of numbers through 15. 

The above exercise is but a nibble on 
the next idea. Four bits are a nibble. Two 
nibbles make a byte, so we can represent 
our byte box as two nibble boxes. This 
new system is based on nibbles and has 
some new numerals or digits added to the 
usual through 9. Recall that a nibble (four 
bits) can represent the decimal numbers 
through 15, or a total of 16 numbers. We 
need more numerals or symtxils for the 
extra six numbers in this system. The 
decimal number 10 is two numerals long 
and uses place value. We cannot use one 
place value system inside of another 
place value system. We will use the first 
six letters of the alphabet: A,B,C,0,E,F- 

This new system of six more than our 
normal ten digits is called hexadecimal. It 
is a base 16, or nibble-based numeration 
system. Remember, numbers will be the 
same whether represented in binary, deci- 
mal or hexadecimal notation. For example: 

BINARY DECIMAL HEXADECIMAL 
1011 = 11 = B 

I have labeled each column to Identify 
which number system I used, but there are 
other ways to designate which base a nu- 
meration system uses. One way is to write 
the base as a subscript after the numt>er: 
1011,= 1„ = B,.. We shall use one- 
letter suffixes such as: 10118 = 11= OBH 

EqutpfTMnt 

I highly recommend the following 
equipment: TASMON from the Alternate 
Source and Microsoft Basic Decoded & 
Other Mysteries by IJG Computer Ser- 
vices I expect everyone who is serious 
about learning machine and assembly 
language to have them or their equiva- 
lents. This concludes the first installment 
of "right thinking." In future columns I will 
expand on these and other concepts. 

The Listing is a short program of the 
type this column will be presenting. If you 
have written a machine code routine of 80 
or less bytes I encourage you to submit it 
to me care of this magazine. Please en- 
close a signed release making it public do- 
main software with no restrictions, for I 
will not knowingly publish anyone's copy- 
righted code. 

The code works in Level II or Model 111 
Basic whether DOS or not. The purpose is 
to disable those keys which will mess 
up your Input statements, such as the 
Clear key and shifted back arrow Gall- 
ing this subroutine enables or disables 
the keys ■ 
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I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappwares 
EXTENDED BASIC 
is spent 
inserting 
my diskette." 

scon ADAMS PKS OF ADVENJUBE INU 



Reduce your programmifig time significantly with Snappware's EXTENDED 
BASIC. The program is written entirely in machine language for super fast 
execution and is fully integrated into the TRSDOS" BASIC interpreter, re- 
quiring no user memory. Here are just some of the ways EXTENDED 
BASIC can make your programming task easier: 

• Quick way to recover BASIC program following a New, System 
or Accidental re-boot. 

• Single character abbreviations for the most frequently used 
commands. 

• Six single key stroke commands to list the first, last, previous, 
next or current program line. Even edit current line. 

• A powerful cross-reference facility with output to display 
and/or printer. 

• Ability to trace a variable through the code. 

• Determine easily if a vanable is in use, 

• Permits programmer to display and/or print the value of any or all 
program variables, 

• Identifies the variable type for all variables. 

• Lists each element of any array separately, 

• Program line renumbering facilities allowing for specification of ' 
an upper limit of the block of lines to be renumbered, relocation 

of renumbered blocks of code and duplication of blocks of code. 

• Cross reference facility for key words and character strings including 
global replacement of key works, 

• Compresses your BASIC program to an absolute minimum by remov- 
ing extraneous information. 

• Merge lines 

• Deletes statements that could not be executed. 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 
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MODEL II . 
MODEL III 



$200.00 
.$125.00 
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Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CAU 
COLLECT: (513)891-4496 
3719Mantell 
Cinti., Ohio 45236 



80 Microcomputing. December 1961 • 53 



j?9 APPLICATIONS 



by Dennis Kitsz 



'Amaze your friends 

with your talent 

for obscurity." 



jolly merry 
hollyberry 
jolly berry 
belly merry 
holly heppy 
jolly Molly 
marry Jerry 
merryHarry 
hoppyBarry 
heppy Jarry 
boppy heppy 
berry jorry 
jorryiolly 
moppyielly 
Mollymerry 
Jerryjolty 
bellyboppy 



merry holly 

happy jolly 

jollyjelly 

/eltybelly 

lorry hoppy 

holly moppy 

Barrymerry 

Jarry happy 

happyboppy 

boppyjolly 

iollymerry 

merrymerry 

merrymerry 

merryChris 

ammerryasa 

Chrismerry 

asMERRYCHR 

YSANTHEMUM 



"The Computer's First Christmas Card," 
by Edwin Morgan. From Since Feeling is 
First, James Mecklenburger and Garry 
Simmons, eds. New York; Scott Foresman 
& Co.. 1971. Reprinted by permission. 

What? You forgot to order your per- 
sonalized greeting cards for the 
holidays? And it's already December, and 
the Postal Service is clamoring for you to 
mail them right now! Well, you've got a 
computer. And chances are, you've been 
lool<ing for the opportunity to tell your oc- 
casional friends, distant relatives, and 
former classmates about it. right? So 
here's your chance, , .the Holiday Junk 
Mail Poetry Generating System — 
HJMPGS! It writes poems just like 
HJMPGS is pronounced. 

Flexible vocabulary can expand to over 
2,000 words on a 48K system. Virtually 
every poem is unique, and the program fol- 
lows such minimal rules of syntax that it 
sounds poetic even if it means absolutely 
nothing. Amaze your friends with your 
talent for obscurity. And if you thought 
Interlude was entertaining, include an 
"adult" vocabulary — your TRS-80 will em- 
barrass you with its frank but disinter- 
ested results. 

Originally this program was called 
"Rando's Poetic License" and was run in 
reduced form on a 4K Level II machine. It 
was included as part of a multimedia,' 
dance presentation called Festive Occa- 



Program Listing. Rando's Poetic License 

1 9 CLS : REH t*************************************************** 

2B REM * RANDO'S POETIC LICENSE was first presented in a 

30 REM • different form at the Washington Project for the 

40 REH * Arts, Washington, D.C. , in late October, 1978. 

5B REM * It was part of a multimedia/dance performance with 

60 REM * David Gunn, Dennis Kitsz, and Michele Pecora. 

70 REM **************************************************** 

80 REM 

90 DIMKS(50) ,L?(50) ,H5(80) ,N5(6B) ,OSi60) ,Q$(40J ,R5(40) rUS(40) 

100 X-1 ! REM * The ARTICLE group is read into memory below: 

110 READKS{X) iIFKSlX) -■KKKKKK'THEN12BELSEX=X-H :GOTO110 

120 Kl»X-liX»l : REM • The ADJECTIVE group is read into memory: 

130 READLSU) :IFLS(X)=."LLLLLL"THEN140ELSEX=X+l!GOTO130 

140 Ll»X-liX-l : REM * The NOON group is read into memory: 

150 READHS(X) !lFMS(X)»"MHMMHM"THEN160ELSEX=X-t-l:GOTO150 

160 M1«X-1:X-1 : REM * The ADVERB group is read into memory: 

170 READNS{X) :IFNS{X)-"NNNNNN'THEN180ELSEX=X+1:GOTO170 

180 N1«X-1:X=1 ! REM * The VERB group is read into memory: 

190 READOS(X) :IPO${X)="OOOOOO"THEN200ELSEX=X-t-l:GOTO190 

200 01»X-1:X-1 : REM * The CONJUNCTION group is read to memory: 

210 READQSfX) :IFQS(X)-"QQQQQQ"THEN220ELSEX-X-fl:GOTO210 

220 Q1-X-1:X=1 : REH • The PREPOSITION group is read to memory: 

230 READRSIX) : IFRS (X) ="RRBRRR"THEN240ELSEX=X+1 :GOTO230 

240 R1=X-1:X«1 : REM • The EJACULATION group is read to memory: 

250 READUS(X) : IFU$ (X) -"UUUUUU"THEN26BELSEX-X+1 !GOTO250 

260 Ul-X-1 : REM • Start-up message display and variable setup 

270 CLSiPRINTCHRS(23) : PRINT: PRINT: PRINT: PRINT: PRINT: PRINT: 

PRINT'RANDO'S POETIC LICENSE" :PRINT: PRINT"BY' : PRINT: PRINT 

"DENNIS BATHORY KITSZ" 
280 FORAA-1TO1000!NEXT:CLS: J«1:Z-1:LL=6:PRINTCHRS!23) :GOTO1150 
290 Q-RND(8) :ONOGOTO300, 350 ,440 ,620 ,700 ,870 ,920,970 
300 K-RND(Kl) :PRINT" "KS (K) ; : GOSUB1180 :GOTO340 : REM ARTICLES 
310 REM *** ARTICLE LIST BEGINS HERE. ENDKEY = KKKKKK **• 
320 DATAits rthe rwhich,my ,that,the ,this ,the rWhat rariiny,some ,a 
33 DATAKKKKXK 

340 BB-RND(3) :ONBBGOTO350,350,440 : REM Adjective/noun select 
350 L-RND(Ll) iPRINT" "LS { L) ; !GOSUB1180 :GOTO440 : REM ADJECTIVES 
360 REM **• ADJECTIVE LIST BEGINS HERE. ENDKEY = LLLLLL ••• 
370 DATAmerry, joyous, happy, freezing, bright, Cheerful, peaceful 
380 DATAmerry, jolly , snappy, crystal clear , snowy, white , musical 
390 DAT Asmi ling, laughing, squealing , loving , lively, sweet ,nif ty 
400 DATAfine, warm, thrilling, grand, special , enlightened , fulsome 
410 DATAdre amy, overwhelming, inspiring, beautiful, remarkable 
420 DATAecsatz, shiny (Sparkling, inebriated, dreamy 
430 DATALLLLLL 

440 M=RND(Ml) :PRINT" "HSCM) ; :GOSUB1180 :GOTO560 : REM NOUNS 
450 REH *** NOUN LIST BEGINS HERE. ENDKEY = HHHMMM *** 
460 DATASanta, snow, Chr istmas , holiday, cheer , gift, song, new year 
470 DAT Alove, Saint Nick, reindeer , chimney , tree, punch, happiness 
480 DATAChcistnas, day , Santa Claus,family, toy , carol, paradise 
490 DATArosebud, evergreen, decoration, light, star , winter, cold 
500 DATAwarmth ,magic ,box ,memory, fireplace ,dayr home ,Grandma 
510 DATAYuletide, choir , Eskimo, Jack Frost, red nose , nipping, rum 
520 DATAhot toddy , chestnut , elves , north pole, whiskers , whisky 
530 DATAsugarplum,5chmaltzinas , snowball , snowman, stocking, present 
540 DATAwreath,candy,pumpkin,dinner , happiness ,midnight ,log 
550 DATAHHHHHH 

560 Z-Z-t-l: IFZ=6GOTO1120 : REH Check if time for suspsn. points 
570 B»RND(50) :IFB>20ANDB<47GOTO1020 : REH Punctuation eval. 
580 IFB>47ANDJ=2PRINT". " : J=l : GOTO970 : REH Time for period? 
590 IPB>47ANDJ-1GOTO6B0 : REH Sentence syntax branching sub. 

Program Lislmg continues 
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sions for Dance, performed by composer 
David Gunn, dancer Micheie Pecora and 
myself at the Washington (D.C.I Project for 
the Arts. In 1978 the TRS-80 was a relative 
newcomer, and its use together with 
dance, live and recorded instrumental 
sound, live whispered and amplified 
speech, and audience participation 
caused comment and confusion The au- 
dience was called upon to select the 
vocabulary and to respond to video 
screens and loudspeakers scattered 
through the seats during the performance. 
Audience sound was ted back through an 
amplification system, mixed with instru- 
mental and electronic sound, and mated 
with the poetry generated from the audi- 
ence's vocabulary ^eritered during in- 
termission). 

The HJMPGS version of Rando is syn- 
tactically the same as the original, adopt- 
ing a linear approach to sentence con- 
struction (start somewhere, get at least a 
noun and verb, and add some punctua- 
tion}. Otherwise, HJMPGS is much faster, 
allows for easier vocabulary expansion, 
and syntax refinements eliminate some 
linguistic incongruities. The results, more- 
over, are entertaining and often hysteri- 
cally funny. 

The Listing presents the complete 
HJMPGS with a screen display. By modi 
tying Print statements to LPRINT state- 
ments, your computer printer can produce 
endless heaps of junk poetry 

About HJMPGS 

The construction of the poetry program 
is (airly simple. The vocabulary is ar- 
ranged by parts of speech; arrays are pre- 
pared, and the words are read into memo- 
ry (lines 90-260). After a sign-on message, 
the program goes to work. 

The initial part of speech is chosen at 
line 290, and the sentence is constructed 
linearly from there. Articles proceed to ad- 
jectives or nouns, tilted toward adjectives. 
Adjectives go to nouns (though a line may 
be added with a random bias that pro- 
ceeds mostly toward nouns, but allows an 
occasional double adjective). Nouns 
check for suspension points (added after 
every sixth noun in a single sentence). A 
punctuation evaluation follows (lines 530- 
540), and the program allows branching to 
verbs or other parts of speech. 

Adverbs check tor verbs before pro- 
ceeding (line 710), then transitive and in- 
transitive verbs are selected (line 720). or 
none at all (line 810). Conjunctions can be 
entered from several locations, as can 
prepositions. Ejaculations occur at sen- 
tence start, or occasionally mside a sen- 
tence. You can select a variety ot punctua- 
tion depending on whether a verb ap- 
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I BOUGHT IT 

"My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BUILT IN 
FUNCTIONS is 
spent inserting 
my diskette." 

SCOTT ADAMS PRES OF ADVENTURE INTL 



Snappware's EXTENDED BUILT IN FUNCTIONS is a collection of much 
needed additions to the TRSDOS* BASIC interpreter which greatly ex- 
tends Its convenience and utility. The following features become part of 
your BASIC language and provide the enhancements without requiring 
any additional memory. The most important component of EXTENDED 
BUILT IN FUNCTIONS is an in-memory sort routine, guaranteed to be the 
fastest general purpose in-memory sort on the market Along with this 
you also receive other EXTENDED BUILT IN FUNCTIONS Here is a 
sampling: 

SRT— Sorts one or more arrays into a specified sequence 
FMT Arranges data into a string variable as with PRINT USING 
PDAT/UDAT»— Permits user to do arithmetic on dates. 
PK$/UPK$— Compresses strings to save disk space. 
ETIMS— Shows the difference between two times. 
CLEAR— Specifies the number of file blocks to be allocated when 
you specify high memory and string space. 
DELETE— Allows you to dynamically remove portions of a BASIC 
program. 

In addition to these, there are functions unique to Model II and to Mode! 

III. The exclusives to Model II are long error messages and PEEK/POKE, 

The exclusives to Model III are: 

SWAP— Supports exchange of variables with a single statement. 

HEX$— Converts numbers to hexadecimal strings, 

RESTORE — Allows you to set READ pointer to location of choice. 

If you consider your programming time to be worth money, call us and let 

us show you how to get more of it, 

MODEL II $100.00 

MODEL III $ 75.00 
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Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 
3719Mantell 
Cintl.. Ohio 45236 
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Program continued 

600 GOTO710 : REM Further syntax branching refinement (really?) 
610 C"RND{3) :ONCGOTO710,870,920 : REM Conj/Prep, or branch 
620 N-RND{N1) iPRINT" "NS (N) ; : GOSUB1180 :GOTO710 : REM ADVERBS 
630 REM *** ADVERB LIST BEGINS HERE. ENDKEY - NNNNNN *** 
640 DA TA joyfully, cheerfully, happily, again,pleaBantly, icily 
650 DATAonce more, 8ongfully,wonclrously, magically ,bluBteringly 
660 DATAiiiu8ically,Bpiffily, quick, lovingly, joyfully, warmly 
670 DATAinspi rationally, hastily, lazily, oddly, slowly, nicely 
680 DATAeven, now, then, when, how, ever , never , where, he re ,why 
690 DATANNNNNN 

700 G>2 : REM Set question mark flag on initial sentence verb 
710 IFJ-lTBEN720ELSE30fl : REM Syntax branching refinement #2 
720 J-2!0»RND(01) :IFO"16THEN810ELSEIFO<16THENPRINT" "0$(0)): 

GOSUB1180:GOTO810:ELSEIFO>16THENPRINT' ■0S{0) ; iGOSUBllBB: 

GOTO290 
730 REM *•* VERB list begins here. Line above must be changed 
740 REM if the list of treuisitive verbs is to be increased 

750 REM to greater than 15. Note the blank value in 0S(16) 

760 REM which must be adjusted. Intransitives follow the 

770 REM blank 0S(16) value. ENDKEY - 000000 *** 

7 80 DATAcelebr a tes, goes, ruminates, thinks, savors, expresses 
7 90 DATA&ings , whistles , vanishes , approaches, considers , enjoys 
B00 DA TAsnows, relaxes, celebrates , 

810 E-RND(3) :ONEGOTO620,870,920 : REM Transitive branching 
620 DATAbecomes , cuddles, unwraps, gives , covers , overwhelms, holds 
830 DATAre tains, beckons, nourishe8,squanders,give8, elicits, fends 
840 DATAmourns, concocts, croons, gropes, contemplates, tang rams 
850 DATAceases ,is begone, speaks, oozes 
860 DATAOOOOOO 

870 Q-RHD(Ql) JPRINT- "QSCQ) ; iGOSUBll80 :GOTO910 : REM CONJUNCTS. 
880 RH< *•* CONJUNCTION LIST BEGINS HERE. ENDKEY - QQQQQQ **• 
890 DATAand ,or , but , because, si nee 
900 DATAQQQQQQ 

910 F-RND(3) !ONPGOTO300,71O,9?fl i REM Post-COn junction branch 
920 R-RND(Rl) :PRINT" "RS (R) j i GOSUB1180 !GOTO300 i REM PREPOS'NS 
930 REM *** PREPOSITION LIST BEGINS HERE. ENDKEY -= RHRRRR *** 
940 DATAto,for , with, by, during, over , at, under , from, through, off 
950 DATAon,except , of , since, to, about, at, for 
960 DATARRRRRR 

970 J-1jU«RND(U1) :PRINT" "US (U) ; :GOSUB11B0 :GOTO290 : REM EJAC ' S 
980 REM **• EJACULATION LIST BEGINS HERE. ENDKEY - UUDUUU *** 
990 DATAEurekal ,tfhooplel I ,Phooeyl , Rats 1 1 ,Yecchl ,NoI ,YeBl I , 
1000 DATA' Aah,', Hal , Zounds I ,Wowl , Oh I, See I , 'So,', Hack 1 
1010 DATAUUUUUU 

1020 IFJ-2THEN1030ELSE1050 : REM Punctuate if verb present only 
1030 IFG-2THENll00ELSE104e : REM Random question mark select 
1040 W-RND(e) :ONWGOTO1070, 1080, 1090, 1100, 1110, 1130, 1140, 1140 
1050 GOTO710 : REM Return to syntax branching start select 
1060 REM *** PUNCTUATION LIST BEGINS HERE (NON-DATA LIST) *•* 
1070 PRINT". "; iJ-liLI-l:GOTO1160 : REM Reset punctuation flag 
1080 PRINT", ■; :GOTO290 : REM Return to main syntax branching 
1090 PRINT"! 'j jJ-liLI*l:GOTO1160 : REM Reset punctuation flag 
1100 PRINT"? ";:J«l:G-l:LI-liGOTO1160 : REM Reset punct'n flag 
1110 PRINT"; ■)iGOTO290 : REM Return to main syntax branching 
1120 Z-1:PRINT". . . ■SGOTO290 : REM Return to main branching 
1130 PRINT" — ':GOTO290 i REM Return to main syntax branching 
1140 LI-1 :PRINT".":PRINT:PRINTi990, '****" ;iFORX-lTO200fl:NEXT 
1150 RANDOM :CLS! PRINT' ( »" ;Mj ')': PRINT : REM Show poem number 
1160 S-RND(50} !lFS>23THENPRINT:PRINT : REM Opening spacing 
1170 FORX-1TO500!NEXT:GOTO290 : REM Delay and start the poem 
11 80 LI-LI+1:IFLI>LLTHENPRINT! PRINT' "; :LI-1 

1190 RE'nJRN : REM Subroutine deteralnes words/line (set LL>4<8) 



pears, and if it appears before a noun 

(question mark mode). 

Various delays, carriage returns, and so 
on give a free-verse look to the results. 
Completion of tfie poem is determined 
randomly (a poem can be a single word or 
several dozen lines). The process repeats 
after a short delay. 

Give your friends some real junk mail 



for the holidays— the original kind they'll 
feel too bad to throw away. 

Building Projects 

The holidays are the traditional time to 
construct projects we have put off for 
months. From time to time readers have 
asked me to provide printed circuit boards 
for the projects in this column; unfortu- 



nately, I can't gauge actual response to a 
project before it appears in print. More 
than 70 readers asked for a printed circuit 
board for f\flay's micro front panel; after 
the board was ready, only 12 actually pur- 
chased it. This isn't a complaint; instead, 
I'll try to publish printed circuit layouts so 
readers can roll their own. 

Creating a PC layout is sometimes 
tedious but with the right materials it can 
proceed smoothly and provide some sat- 
isfaction—as well as a professional look- 
ing finished product- Like having your own 
darkroom, creating PC boards is a way of 
personalizing and optimizing your TRS-80 
system. 

The following pages descrit>e the steps 
and suggest the magnitude of any printed 
circuit board project. Construction details 
are supplied along with the materials you 
will need and a short list of suppliers. 



There are many reasons tor making 
a double-sided board: to avoid using 
dozens of jumpers, to alleviate crowd- 
ing of traces and widely spaced parts, 
to reduce board size, and to reduce 
system noise. For an experimenter, the 
reasons are mostly the same. Most 
commercial circuits today are de- 
signed by computer or hand drawn and 
digitized. A computer then optimizes 
the design to eliminate wasted layout 
space, and keeps things very regular. 

Hand -designing a double- sided 
board requires patience, a healthy 
memory, and a good eye for design. It 
may require a half-dozen sketches to 
produce a compact layout of parts and 
short traces. You start with the ar- 
rangement of parts: Place integrated 
circuits which are connected together 
as near as possible to each other. ICs 
should be parallel and regularly ar- 
ranged. Address and data lines, which 
are normally run in parallel groups, 
should be given the shortest overall 
path throughout the circuit. Power 
lines should run on opposite sides of 
the taard if possible, and use thick cir- 
cuit traces. 

So far it is much like designing a 
single-sided txjard. The real advantage 
to two sides is that you are more likely 
to achieve these goals. Draw the cir- 
cuit in two colors (red and blue), with 
each color representing a side. Run the 
parallel traces together. Where lines 
must cross, try putting them entirely 
on the opposite side of the board. Let 
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continues from page 56 

lines cross trom side to side only at in- 
legraled circuits or oiner parts. When 
airr.cst ail ttie traces are drawn in. 
some will stiil cross others. Run the 
line as far as possible on one side, then 
switch to the other. Al that point, draw 
ir a through-ho'e," In commercial 
boards these would be plated through, 
but here they are drilled through and 
wires soldered to connect them. 

When you complete the board 
sketch you can begin the actual layout. 
Use layout tracing paper with 1/10-inch 
grid, or acetate sheets over grid paper. 
Put the patterns in place, run all the 
traces on one side and then complete 
the other side. Look for close spacing 
or physically difficult runs (such as 
through-holes under ICs), Make every- 
thing as clear as possible You can 
now have negatives made and prcxluce 
a board using double-sided, sensi- 
tized, copper-clad board-H 



"Hand-designing. . . 
requires patience, 
a healthy memory, 

and a good eye. . . ' 



Parts Mounting and Testing 

It's almost time to mount parts on the 
board Heat the soldering iron. Shine a 
strong light through the board. Use a mag- 
nifying lens to look tor hairline cracks 
along the copper traces— always a possi- 
bility when creating a board from a hand- 
taped layout. Look especially at the point 
where the PC patterns connect to taped 
designs. If you find any cracks, take a 
piece of wire-wrap or other thin wire, bend 
it into an "L" shape, and solder the foot of 
the L across the crack. Clip off the remain- 
der when the solder coots. 

With single-sided boards, parts inser- 
tion is simple. "Form " each part by tend- 
ing the leads so they slip easily through 
the holes you have drilled. With small 
parts (resistors, capacitors, dicxles), push 
the parts as far as they will go, bend the 
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I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
AUTOMAP and 
AUTOFILE is 
spent inserting 
my diskette." 

SCOTT ADAMS - PFIES OF ADVENTURE INTL. 



When working with direct files or creating a formatted screen, Autofile 
and Automap are indispensible aids. 

Autofile is designed to automate for the BASIC programmer the task of 
moving data elements to and from a direct file. Previously, this was a 
time consuming chore because the FIELDed variables may not be directly 
referenced by user logic. The FIELD statement was eliminated, thereby 
relieving you of the guessing game as to where the FIELDed variable is. 
In addition, the LSET and the CVx functions are performed automatically 
The software, when installed, becomes part of your BASIC interpreter 
providing the enhancements without additional memory 

Automap is designed to automate for the BASIC programmer the task of 
presenting information on the video display and accepting information 
from the keyboard operator The software consists of two main compo- 
nents: the OFF-LINE COfvlPONENT used to describe to the system the 
screen formats and the ON-LINE COMPONENT from within your BASIC 
program to initialize a screen, send data to the video display and receive 
data from the keyboard operator This facility when installed, becomes 
part of your BASIC interpreter. 

Both products complement one another and, if used in conjunction, can 
save a significant amount of programming time. 

If you consider your programming time to be worth money call us and let 
us show you how to get more of it. 



AutomapMODEL H 

MODEL 111 

Autofile MODEL II 

MODEL III 



$100.00 

$ 75.00 

$ 75.00 

$ 60.00 
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Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (5131891-4496 
3719 Mantell 
Cinti., Ohio 45236 
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leads sharply where they protrude 
through the board. Clip most of the ex- 
cess, but leave about 1/16-Inch. Put inte- 
grated circuits and sockets on the board 
next, insert them fully, and bend two leads 
on opposite diagonal corners so the 
socket stays in place. Transistors go in 
place last, but get soldered first. Allow 
them to rise about 1/4 to 1/2-inch off the 
board and solder the leads from below. 

Now solder the small parts in place, and 
then the sockets. Finally, solder the ICs. 
To keep things cool, I solder all the pin 1's 



Photo 1. If you are designing your own 
board from a schematic, you will need 
some graphic arts supplies. The basic ma- 
terials tor starting the layout process in- 
clude colored pencils, tracing paper, a 
straightedge and an eraser for sketching 
the route of circuit board traces. Expect to 
spend the greatest portion of time doing 
this preparation: make lead paths as short 
as possible. Prepare a double-sided board 
if you have to. but design in wire "jumpers" 
to avoid doing a double-sided board as a 
first project. Use two different colors for 
the upper and lower circuit traces. You'll 
also need supplies for the final artwork: 
layout tapes and printed circuit patterns. 
These patterns are holes, pads, integrated 
circuit patterns, edge connector strips, 
and other conveniences sold on plastic 
sheets- A drafting pen (Rapidograph. 
Mars hAicrograph or similar) and ink are 
essential for touch-up work, as well as for 
lettering pin numbers, guides, and other 
information on the board. 



Photo 2. The actual layout process 
demands great care. The IC patterns, re- 
sistor and capacitor positions, edge con- 
nectors, etc.. must all be put in place so 
that the real parts actually fit when you 
are done. Since the layout is done with 
patterns that are twice actual size, looks 
can be deceiving, so measure your parts. 
You'll also need sheets on which to do the 
layouts, such as tracing paper; I do them 
on frosted acetate. Although this is ex- 
pensive, it IS easy to make changes, and 
you'll only need two sheets at most for 
each project. Circuit traces are put in 
place using lithographer's tape, mylar de- 
sign tapes, or black crepe tape. The crepe 
is the most flexible, allowing circuit traces 
to curve smoothly, but the litho tape is 
best for areas where the traces will be very 
dense. In this photo a razor blade cuts the 
tapes, but you can use a scalpel or Exacto 
knife. Keep in mind whether you are laying 
out the top or the bottom of the circuit, 
especially if you are working up a double- 
sided board. 



"If any IC gets 

too hot to hold, 

take a break." 



first, then all pin 3's. pin 5*s and so on. and 

let the whole thing cool. Then I do all the 
even numbered pins. If any IC gets too hot 
to hold, take a break. 

Double-sided boards are another ques- 
tion. Commercial boards are done with 
"plated-through" holes, where the hole 
makes an electrical connection between 
the top and bottom of the board. With 
homemade boards, all parts will have to 
be soldered on the top and on the bottom 
of the board. If you use sockets, this is 
very difficult unless you take wire-wrap 
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sockets and let them rise atxjut 1/8-inch 
off the top of the board so your soldering 
iron will reach the pins underneath. Where 
circuit board traces lead from one side of 
the board to the other, insert bits of \«ire in 
the holes to make that connection. 

Where to Get Materials 

Yojr local stationery or graphic arts 
shop slocks tracing paper (Herculene is 
excellent) or frosted acetate, drafting 
pens and ink (not India ink), and often car- 
ries templates for laying out boards or cir- 
cuit diagrams. Vou can purchase stan- 
dard lithographer's tapes in various widths 
from about 1/64-inch to 1/4-inch at any 
print shop as well as well-stocked graphic 
arts shops, i nese are sometimes called 
ruby tapes or blockout tapes. PC patterns 
are also available in larger stores- 
Graphics tapes, PC patterns, blades, 
etc.. are sold by Chartpak (their catalog 
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Photo 3. The finished layout can be a very 
pretty design, something which will give 
you satisfaction. However, that satisfac- 
tion may get m the way of an important 
process— proofreading. Every trace must 
go where it's supposed to: so get a friend 
to read aloud and check off each wire in 
the schematic Listen and verify that every 
connection is made on the circuit pattern. 
Record any corrections, making them all 
when the proofreading is finished. Then 
proofread again. // my emphasis is not 
enough, then experience indeed will be 
the better teacher. When all the parts have 
been soldered irrevocably in place, the 
power turned on. and the circuit self-de- 
structs. . . then the importance of proof- 
reading will be clear. If you have chosen 
the shortest possible paths throughout 
the circuit, proofreading will be easier, 
and the circuit might even work the first 
time. 
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I BOUGHT IT 

"My biggest loss 
of programming 
time using 
Snappware's 
COLLEGE EDUCATED 
GARBAGE COLLECTOR 
is spent inserting 
my diskette." 

SCOTT ADAMS - PffES OF ADVENTURE INTL 



The Snappware College Educated Garbage Collector (SNAPP-VI) is an 
intelligent processing function which greatly improves performance of 
typical BASIC applications And here's why, 
Microsoft uses a variable length string' in the BASIC interpreter Each 
time the string is assigned a new value, it is relocated in a string pool. 
Periodically the string pool must be reorganized and condensed into a 
single contiguous area. Performing this string space reclamation is time 
consuming and inefficient because this approach evaluates and collects 
each string individually. The time required is roughly proportional to the 
square of the number of active strings in the resident program. During 
reclamation the system seems to lock-up' and does not respond to 
the operator until the process is completed 

This time consuming approach requires a better solution, Snappware has 
developed a solution which takes advantage of the auxiliary memory 
available. SNAPP-VI requires only four bytes per active string as a work 
area. When free storage space is available, our system temporarily bor- 
rows, uses and returns the space to the free storage pool w+ien com- 
pleted. If storage is not available, our system will temporarily transfer out 
to disk enough of the BASIC program to make r&om for our work area and 
return the 'paged out' information to its correct location when completed 
Benchmarked times show, in some situations, SNAPP-VI performs one 
hundred times as fast as the Microsoft approach 
If you consider your programming time to be worth money call us and let 
us show you how to get more of it. 



MODEL II .. 
MODEL III . . 



•TRSDOS"* Tandy Corporation 



1 ■■. ■-■.■ 



''■"". ':? "•^1 4=:!! '■^'»''' :'!' '=■''■ 'li I:.t ^W-kt. S:'-^ ^•"" 






c" !iiihiii!H~nir§iiir'jii ji II §i^'i!!iS3!« In:::: 

istsy. » {J]"! jijj"'' •;;''' -"::::::''§i*'iJi!!P^-||.... 



...$100.00 
. . .$ 75.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 
3719Mantell ^ 
Cinti., Ohio 45236 y 
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Photo 4, At this point your double-size 
layout is complete Take it to your local 
newspaper or print shop (the former usu- 
ally IS cheaper), and have a negative 
made. Specify "50% film negative, emul- 
sion down " You'll receive a negative tike 
the one in this photo for between two and 
five dollars. However, it probably won't be 
ready to use as is. Shine a soft light 
through it and examine it for pinholes and 
scratches. If you can get some lithograph- 
er's opaquing. use it to cover these spots. 
Otherwise, drafting ink or bits of litho tape 
will do. Next search all the traces for 
cracks — black lines running through them 
where the copy camera interpreted razor 
blade cuts as white lines. Use a tine 
needle to scrape the emulsion {dull) side 
of the negative, removing the black crack 
lines. The negative is now ready to use If 
you use a layout from a magazine, it will 
probably be the correct size already, but it 
may be either positive or negative: make 
sure your print shop knows you want them 
to make a film negative (clear traces on an 
opaque background). 



says "look in the Yellow Pages under 
Drafting Supplies") or Bishop Graphics 
(5388 Sterling Center Drive, P O. Box 5007. 
Westlake Village, CA 91359). The Bishop 
catalog includes excellent recommenda- 
tions and instructions on PC layouts. Get 
the catalog for an idea ot what's involved 
in putting your own circuit board together. 

PC board t3lanks can be obtained (un- 
sensitized) from Radio Shack, and some 
Stores still have stocks ot spray photo 
resist, which was discontinued about a 
year ago. Radio Shack now also stocks 
some templates, ferric chloride etchant 
and touch-up resist pens (don't use these 
actually to draw circuitry, contrary to the 
instructions with them). 

Complete stocks of PC supplies (pat 
terns, sensitized boards, developing and 



Photo 5. Use a glass fiber board, clad with 
copper and sensitized with emulsion, to 
make the final circuit board. Vou can pur- 
chase it ready-made, or make it yourself 
with emulsion spray. In either case, you'll 
want negative process emulsion, and pro- 
fessional epoxy glass board. Handle 
these boards only in a darkroom: you can 
simulate a darkroom by covering the bath- 
room windows with black paper or felt. 
and wrapping a 7-watt nite-lite in amber 
cellophane (can you still buy cellophane?). 
Once your darkroom is ready, remove a 
board from the black envelope, and place 
it in a photo proof-frame This is another 
item you can make yourself: it Takes a 
wooden base, 1/2'inch of sponge foam. 
and a piece of clean glass Heavy-duty 
stationery spring clips hold the assembly 
together. If you are making your sensi- 
tized boards, take some copper-clad lami- 
nate, clean it with very tine steel wool, 
wash and dry it. Lay it on clean paper, 
spray a complete but light coaling of 
emulsion. Air dry overnight or bake dry m a 
dark oven at 200 degrees for an hour. 



etching chemicals, drills, etc.) are carrieo 
by Kepro Circuit Systems (6X Axminister 
Drive, Fenton, WO 63026) and Vector Elec 
tronics Company (12460 Gladstone Ave- 
nue, Sylmar. CA 91342) Kepro offers a 
professional line as well as service to hob- 
byists, IS very cordial, and will send a com- 
plete sheaf of instructions on all PC board 
making with orders for any supplies. Vec- 
tor has an unusual catalog full of proto- 
typing aids of all kinds, and has been a 
long favorite with experimenters. 

Hobby shops sell drills and drill bits 
(Dreml and Exacto make good sets). You 
can purchase photoflood lamps at any 
photo shop, as well as exposure frames 
(proof or contact frames), graphic arts film 
and developers, trays, and other things 
that make life easy for experimenters. 



Photo 6. Place the negative over the sen- 
sitized board, and sandwich it under the 
glass. Make sure the negative faces cor- 
rectly—if you add some pin number 
guides in the original layout, this is easier 
I usually write (in the direction it eventual- 
ly will be read) "This is the bottom" or 
"This IS the top " It you are making a dou- 
ble-sided board, matching up the two 
sides can be tricky. Here's how I do it. Ask 
your printer to leave plenty of margin on 
the film negatives. Match up the top and 
bottom negatives, and tape two perpen- 
dicular edges together tightly You are 
making a pocket in which the double-sid- 
ed copper blank can be inserted. Carefully 
slide m the sensitized board (be sure not 
to scratch the emulsion if the fit is tight), 
attach the board to the negatives (both 
sides) with a few pieces of tape, and sand- 
wich the whole works in the exposure 
frame. You can now expose one side, re- 
move the board and expose the other side 
without shifting the image 



HolMay Slocking Stuffers 

I'm not much of a "games person, but 
something came in the door last week that 
touched that mad, obsessive part of me 
Its a program called "Fly." Another flight 
simulator, thought I. until i loaded it and 
saw these questions Number of flies'' 
Number of swatters? Speed of Flies? 
Number of Walls? Yep. it's a fly swatting 
program, with the little buggers buzzing 
about and being incredibly maddening— 
for every one you swat, another appears' 
It It can be won, I haven't found a way. (In 
one session I swatted 439 flies before my 
time ran out.) Only one surprise: Fly isn't 
for sale Until March 31 it's being given 
away by the publishers of The Alternate 
Source (1806 Ada Street. Lansing. Ml 
48910) with a yearly subscription. I may 
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Call or Write 
Your Nearest 
Snappware 
Distributor 



MICRO-80 
284 Goodwood Road 
Clarence Park 
Adelaide South Australia 
Ph-(08) 211 7224 

DIGI-TEK SYSTEMS 

65 Tliornridge Circle 
Kitchener Ontario NIZM-4V9 
Ph-(5191 743-1699 

Strawflower Electronics 

50 North Cabrillo 

Half Moon Bay, California 94019 

Ph-i415) 726-9128 

COMPUTER MAGIC 

115 Wiltshire Avenue 
Louisville, Kentucky 40207 
Ph-(502) 893-9334 

E-CDATA 
Tornevangsvej 88 
P.G.B. 116 
OK-3460 

Bikered, Denmark 
Ph-45(0) 2/818191 " 

System Soft 
49. Dunvegan Drive 
Rise Park 

Nottingham, England 
NG5 5Dx 
Ph-(0602) 275559 

Programs Unlimited 
20 Jericho Tpke. 
Jericho. Long Island. 
New York 11 753 
Ph-(516) 333-2266 

AEROCOMP 

Redbird Airport 
Hanger 8 

Dallas, Texas 75232 
Ph-(214) 339-5014 



nappware 
Goes On Trial! 
YouBe J 
The Judge I 

Snappware knows your programming time is valuable. That's why we are 
offering a trial package that will cut your programming time up to 75%! 

This unprecedented offer allows you to judge for yourself the value of our 
software using your hardware at your convenience Our five best selling 
products: EXTENDED BASIC, EXTENDED BUILT IN FUNCTIONS, COLLEGE 
EDUCATED GARBAGE COLLECTOR. AUTOMAP and AUTOFILE, are all 
available to you on a trial basis for only $50.00 for the Model II and 
$35 00 for the Model III. We're convinced that after you see how well our 
software helps you perform programming tasks, you will purchase them 
like thousands of othershave. 

Our trial package consists of a master diskette which may be used to 
create one working copy Your purchase price for the trial package will be 
credited toward the purchase of any software Snappware sells 

If for any reason you are not satisfied, just retur-n the trial diskette and 
working copy and we will refund your money, no questions asked With 
an unconditional guarantee like this, you can't lose 

Call our toll free number 800-543-4268 to put us on trial We're sure your 
verdict will be; Snappware saves you time and money. 



MODEL II Trial Package S50.00 

MODEL III Trial Package S35.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (5131891-4496 
3719Mantell 
Cinti., Ohio 45236 
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Photo 7. Exposure of virtually all sensi- 
tized boards is done with ultraviolet light 
Wow that's not really special: there's plen 
ty in the sun, but it's hard to control In 
stead, you can use a photoflood bulb (not 
a floodlight, but the ones everyone used to 
need for home movies). Set a fairly new 
bulb (old ones lose their UV capabilities) 
about 18 inches from the exposure frame, 
and let it shine for at least 7 minutes; to be 
safe. I let it go for 9 or 10. Graphics film is 
plenty opaque, and you will not expose 
anything under the black parts. Before 
turning on the bulb, put any unused 
pieces of photosensitive board away! 
Also make sure that the negative meets 
the board perfectly: the smallest gap can 
allow stray light to reflect under the 
negative, causing streaks (and eventual 
shorts) in the final circuit board. When you 
have exposed the board, there will be ab- 
solutely no visual evidence that anything 
has been done to it—iust keep it in the 
dark until you develop it. 



like their magazine, but Fly is worth the 
price ot the subscription. Stuff that stock- 
ing with flies. 

There's a new version of Accei2 from 
Allen Gelder Software (Box 11721 Main 
Post Office, San Francisco. CA 94101). 
You can gel it on tape, disk, or Stringy- 
Floppy wafer, and I think it's the easiest 
Basic compiler (actually, a "semi-compil 
er") to use. Audition one at a computer 
club meeting, then buy one of your own 
from Allen. It turns plodding game pro- 
grams into remarkable challenges. 

For the bad spellers among us. there's 
Microproof (Cornucopia Software, P.O. 
Box 5028. Walnut Creek. CA 94596), for 
Models I. II and III. This program isn't 
cheap, but if you're running a word 

ptocessinQ system with vour business, 

and you're always in a hurry, then try 



Photo S. Developing the board is easy, but 
has one nasty aspect. You must ventilate 
the room where you use the developer — 
and don't smoke- Board emulsion devel- 
oper IS not like film developer: instead, it is 
a volatile liquid that can knock you right 
down. Drop the board face up in the liquid, 
and follow the manufacturer's directions. 
Generally, you would agitate the board 
smoothly in the developer using glass 
rods or by shaking the tray: again, 
because the liquid is extremely volatile 
like acetone, don't use your hands. In the 
photo, a glass tray is filled with the devel- 
oper: the developing chemical attacks 
plastic, so don't use ordinary darkroom 
trays. An old Pyrex or Corningware glass 
tray stolen from the kitchen (and never to 
be returned!) will do just tine. When the 
development is complete, the board must 
be drained upright against a solid object. 
Never shake or blow dry the board. This 
will disturb the solid emulsion surface. 
Room lights may now be turned on 



Microproof. Documentation is good and 
support is forthcoming from the author. 
(A nice touch — "Microproof" was mis- 
spelled in the copyright notice in the 
documentation) 

I've talked about the ROM information 
in Supermap and Inside Level II before, 
but there's another book full of good 
things: Microsoft Basic Decoded, by 
James Farvour (IJG Inc., 1260 W, Foothill 
Blvd.. Upland, CA 91786). By now, disas- 
sembled Level II listings have become 
commonplace, but this one is fully com- 
mented, in tear-out form, and with a very 
detailed and revealing (though barely liter- 
ate) introductory text. Though oriented 
toward "big computer ' lovers, it is still an 
information bonanza. 

Color Computer owners sick of reverse 
caps for lowercase can build last month's 



Photo 9. Save the developer; it can be 
used many times The emulsion on the 
board is still soft. Handle the board by the 
edges, and avoid shaking it or blowing on 
it. You must now dry it — either overnight 
at room temperature, orinanoven I prefer 
the latter method, because at a low lem 
perature (200 degrees or less), the emul- 
sion dries solid in less than 15 minutes. 
Preheat the oven, but turn it off if it is not 
an electric stove (remember, the remain- 
ing developer is still volatile). Lay the 
tjoard face up (single-sided) or on edge 
(double-sided) Air should circulate 
around it. Remove it in a quarter hour, but 
remember it will be hot, so use tongs, 
gloves, or a potholder (not a fuzzy one). If 
you dry the board overnight, keep it in a 
relatively dust- (and cat) free area. Hairs 
embedded in the emulsion will prevent et- 
ching, leave almost invisible shorts, and 
can cause all sorts of electronic havoc. 



Applications project, or buy a complete 
version of the Lowerkit from MSB Elec- 
tronics (Drawer 766. Barre, VT 05641). The 
plug-in board is the first add-on for any 
TRS-80 with a 128 ASCII character, 7 by 9 
matrix character set with descenders. You 
can purchase Greek, French, generalized 
European (all those umlauts and tildes, 
you know), math symbol, and Japanese 
(Kata Kana) plug-in character ICs tor it as 
well. (And I don't mind saying I designed it, 
either.) 

The best dollars any Model I disk owner 
can invest are in the plug-in data separa- 
tor made by Percom (211 N, KIrby Street. 
Garland. TX 75042). Not much more can be 
said about this product— just ask any disk 
owner who has one. Another "standard" 
product IS the Archbold Electronics high- 
speed modification (10708 Segovia Way, 
Rancho Cordova, CA 95670). There are so 
many options (several speeds, slow on 
disk or cassette access, etc.) that it's 
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FED UP WITH PATCHES? 

THEN MOVE UP TO 
PROSOFT-S NewScript: 



Easy-to-use Full Screen Editing 

Headings, Page Numbering, 

Centering 

Global Search and Change 

Table of Contents, Indexing 

All 12 MX-80 fonts + underlining 

Italics on GRAFTRAX MX-80 

Supports Diablo, Microline, Anadex 



Typehead — never loses 
keystrokes 

Form Letters, Big Documents 
Double Width, Underlining 
Sub-scripts, Super-scriptst 
Proportional font right-margin 
justification on 737, 739, L.P IV, 
and now R/S Daisywheel U 



* 160 pages of excellent documentation includes "EZEDIT", "EZSCRIPT", 
self-study tutorial, and hundreds of examples 

' see review in Computronics, July 1981 

* runs under TRSDOS, NEWDOS, NEWDOS'80, LDOS, DOSPLUS 
' Requires 48K TRS-80 with one disk drive. Specify Model I or Model III 
tSome features work only if your printer has the mechanical capability. 



NewScript 

Nailing Labels Option 

Special: New Script + Labels 



$ 99.95 
$ 29.95 
$115.00 



RPM 

RPM measures the rotational speed and variation of your disk drives, and reveals a common 

cause of unexplained errors. Simple one-key operation, runs under any DOS, interchangeable 

between Models I and III. Shows current and average speeds, plus fluctuation history. Recovers 

from severe errors. Documentation explains how to adjust drives. Use RPM monthly for best 

results. 

32-48K Model I or III disk: $24.95 

^ f FASTER 

Monitors your BASIC programs while they run, then displays a simple change 
(usually one line) that can reduce run-times by as much as 50%. No hardware 
changes, and handles programs that cannot be compiled! Complex programs 
benefit the most. See review in Personal Computing, May, 1981. 





16-48K Model I or III, tape and disk: 



$29.95 



Order from your Software dealer, or from: 



QUICK COMPRESS 

^^^ ^^k ^^^ /^ r^ rs^r^^ /v^ Small (276 bytes), fast (processes 800 lines in under 3 seconds) 

^^m M^ ■ S V ^^ I 1 11 I I utility removes blanks and remarks from your BASIC programs. 

^^^ ■ ■ ^^V ^^ J^ J\y J \ Produces smaller, faster programs, and doesn't alter the 

" *" ^^ — ■'"^ original logic. 

16 48K Model I or III, tape and disk: $19.95 

SPECIAL FASTER + QUICK Compress: $39.95 

Dept.C Box 839 
North Hollywood, CA 91603 

ORDERING INFORMATION: We accept checks, Mastercard, Visa, Money Orders, C.O.D. {C.O.D. under 
$50.00, odd $2.00), and even cash. Please, no purchase orders. Caliiornia residents add 6% sales tax. 
Add 15% outside North Americo. 



CALL TOLL-FREE FOR ORDERS ONLY: 

(800) 824-7888, Operator 422 
CALIF: (800) 852-7777. Oper.422 
ALASKA/HAWAII: (800) 824-7919 
FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 



^APPIKATIONS 



Photo 10. Care must be taken with all 
steps, but with the etching chemicals it's 
especially important. The most common 
etchant is ferric chloride. It is not only 
moderately corrosive but also stains jusi 
about anything. Use a plastic tray and pro- 
tective gloves, and avoid splashing the 
chemical. Make sure the ferric chloride is 
at room temperature, and do not dilute the 
solution. If you purchase solid etchant. 
add as much as the water will hold (a sat- 
urated solution). Slide the exposed and 
dried board into the etchant, and agitate 
very gently. The unprotected areas of the 
board will immediately turn dark as the et- 
chant dissolves the copper; the iron pre- 
cipitate will cloud the solution, and even- 
tually become globs of blackish rust. Lift 
the board from time to time: look for areas 
where the copper is gone and the fiber- 
glass shows through. The copper will etch 
away following your agitation pattern, so 
turn the board occasionally so the pro- 
cess continues evenly. 



Photo 11. You can reuse the etchant sev- 
eral times; since built-up iron precipitate 
might scratch the emulsion of later pro- 
jects, filter the etchant through laboratory 
filters (coffee filters will do). Always store 
it in a plastic bottle; keep the used solu- 
tion separate from the stock batch. The 
board must now be thoroughly washed, as 
even the smallest trace of etchant can 
continue the etching process long after 
you're actually using the circuit. Wash 
first in cold running water, rinsing the 
board, the sink and the area around: 
etchant can damage porcelain if not 
washed off within a minute or so Wash 
the board until it is thoroughly clear, and 
examine for unetched areas: put it back m 
the etchant if there are any dull copper 
areas left You can hold it up to the light 
for a better look. After the first wash, 
place the board in a clean tray and rmse m 
running water or with regular changes ot 
water for about 10 minutes. Dry the board, 
once again make sure the etching is com- 
plete, set it aside and then clean all the 
trays, utensils and gloves you have used. 

amazing the documentation is clear 
enough to lead the user through it all. It's 
the only documentation, by the way. to 
provide a full-size, annotated photograph 
of the installation process. 

The Holmee Engineering Internal Mem- 
ory Expansion kit (6246 West 2705 South, 
Salt Lake City, UT 84120) isn't easy to in- 
stall, but the results are worth It- There is 
no soldering needed, but the press tit into 
the RAM sockets is really tight. I like this 





board, and hope that anyone who pur- 
chases it will follow the directions to work 
it in place very slowly, and not grow impa- 
tient. Check it out; I've put several in and 
have never seen one that failed. 

Alas, some warnings— before you buy; 
Ask about the service policies on any dou- 
ble-sided disk drives. I don't want any 
more on my workbench - Read the ser- 
vice policy and note the $75 minimum 
charge on LNW-80 repairs— and the mini- 



mum charge even for an estimate. - .As 
software proliferates, especially for the 
Color Computer, you'd better try before 
you buy. I've seen more bad stuff than I 
ever saw for the Model 1 . . . Check out the 
documentation, instructions, flexibility 
and work you have to do to install the Ex- 
atron high-speed board before buying 
(especially compared with the Archbold or 
Mumford products) . - . Don't be surprised 
if your Color Computer power supply 
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Photo 12. Remove the emulsion from the 
board with a thorough scouring using fine 
steel wool, or by soaking in a commercial 
emulsion stripper. In either case, the 
board should be carefully cleaned and 
dried again before the final steps — drill- 
ing and mounting parts. A complete hob- 
by hand drill set is inexpensive, though 
just the tt66 size drill bits will do most of 
the work for you. Holes should be drilled 
very gently, and true to the center of the 
pattern; be very careful not to tear copper 
traces off the bottom of a double-sided 
board. I generally use a small Sears vari- 
able-speed drill and press, as #66 bits fit 
firmly in its chuck. Be careful not to 
scratch the board as you move it from hole 
to hole, and use thin cloth gloves to keep 
hand oils from getting on the clean cop- 
per Check that you have drilled all the 
holes. Brush off bits of copper and board, 
clean it for the last time in a good deter- 
gent, and rmse it thoroughly. 



shuts down with the new Exatron disk in- 
terface/memory expansion. (Come on. 
boys, do it right! More than 50 ICs pow- 
ered by the Color Computer edge connec- 
tor?!) I hope it's corrected by the time you 
read this. 

Now how about somebody stuffing my 
stocking. Here's what I'd like to find in it: A 



Color Computer version of Forth (a com- 
plete one} on disk or Exatron Stringy- 
Floppy. Pascal for real people on any ma- 
chine. A bus communications protocol for 
all the TRS-80 machines. 64K pseudo- 
static RAMs for the Color Computer A 
photocopier interface. Merry Christmas, 
folks. ■ 
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candy — 


bright tree nicely that inebriated 


under the squealing family. . . 


snowball? warmly whistles songfully a 


to 


dreamy red nose what smiling 


my enlightened winter a cold a 


snowman — a north pole. . . 


grand toy. 
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any laughing Schmaltzmas; or my 
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the day the warmth? Any any choir 


this cheerful evergreen? 


gropes Rats! because special love. . . 
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AUTHORIZED TRS 80® DEALER #R491 





TRS-80 Color Computer With 
Extended Color BASIC 



26-1062 

Model HI 16K RAM 
Model III, BASIC 




26 - 4002 

Model II. 64K 



$825.00 

WE ACCEPT CHECK, MONEY ORDER, OR PHONE ORDERS WITH VISA OR MASTERCARD. SHIPPING 
COSTS WILL BE ADDED TO CHARGE ORDERS. DISK DRIVES, PRINTERS, PERIPHERALS, AND SOFT- 
WARE- YOU NAME IT, WE'VE GOT IT. WRITE OR GALL FOR OUR COMPLETE PRICE LIST. 

C& S ELECTRONICS, LTD. 32 EAST MAIN ST. MILAN, MICH. 48160 

(313)439-1508 (313)439-1400 '^'^^ 

C & S ELECTRONICS MART IS AN AUTHORIZED TRS 80 SALES CENTER STORE #R491 



■ S^t l-'si ol AOvwrtiswi an page * IB 
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Special values on complete 
TRS-80^" Model III systems and disk drives! 

AM Electronics Inc nas created the most powertu! and reliable NEW! Teac or Tandon disk drives, 

TRS-80 hardware and software systems available to get /cur complete with power supply, case and 

microcomputing system up and running Take advantage of extender cables 

special values like these: 40-track disk drive . . $285 

Bi vn» AM ■■ J ■ 111 --.1. J- I. J - 80-track disk drive $395 

New THS-80 Model III with disk drives Dual-headed 80-track disk dnve $499 

Model III with dual 80-track disk drives — 704K of reliable disk 

storage on only two drives. System features two double-density 

80-track disk drives, 48K RAM and A.M Electronics controller Disk drive cases and power supplies 

board It's yours complete and ready to run! , $2,295 S'/t-inch single drive unit w case & power supply $85 

5''4-incfi dual drive unit w case & power supply S'20 

Model III with dual 40-track double-density disk ar,ves.48K RAM s-mch single drive unit w case & power supply $'50 

and AM Electronics controller board, ccm.plete and ready to 

run! S:.895, _ , ., • ^ , 

Save on valuable accessories, too! 
Model 111 ROM Commented ^^^ ^^^ nanosecond RAM memory chip S2 00 ea 

The definitive guide to Model III ROM . ...S22.00 Disk drive extender cable . ,^^ ^^ ''^ 

Now available. Teac technical manuals $1:3.00 ea 

NEW! Multiplier from A.M. Electronics 

Tired of unreliable double density operation? Try our new NEW! MAKE 80^ 

Multiplier and upgrade from single-density without doubling now available for Model III 

your problems $99.95 Converts Model I single-density 40-track or Model 111 double- 

Specia/O'/er MultiplierandNEWDOS80Version2 0. together density 40-track standard diskettes into Model HI double- 
in our low package price $199 95 density 80-track-readable diskettes .... $29 95 
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Also, we specialize in complete, powerful software 
packages for business. Put your TRS-80^'' to work for you! 



Manufacturing Inventory 
Control 

The sysieT ccmpnses six proyams to 
c ve yCL complete conlrc c' raw rr.ale- 
ras frcm ordenrg to afte'-prcdi-ci en 
oisbufsement Finished gooas t. es are 
rrarta^nea ara upcated 

The system features adoi.cn de.eiicr. 
ana eaitng o' raw mater. a s cost averag- 
ng raw materia' checking ' n:shed gcocs 
costing 'l;' b'" c! mate' a's 'slrcjs 
ccrr-.p ete v^here-L.seG reports ana raw- 
rratena C sbursemen: Re-cuer pc nt 
ca cuat'cr s tL.. t-,r 

Reports rray be generatec en ccmp'ele 
nveniory becw-reorder perl clI ct 
EXck b> vender nactive lems t i' cf 
mater'ais 'r'shec gooas sis ccst I'Sls 
(With anc w.;hott mventCTy ccunli costs 
sis by finished goca or con-p^ete 
finished goods i si 

The system runs on either the Mccei I or 
Mode! Ml computer and ii'e capacity 
vanes with your hardware configura- 
fon $299 95 

Dealer/Service Center 
Record Package 

This package is built in several modular 
packages and can be used separately or 
together as a complete system Moduiar 
units are self-contained. When combined, 
you get the most comprehensive service 
center bookkeeping and record keeping 
package on the m.arket 

A complete history of customer repair 
files iS maintained cn-l;ne They can be 
accessed by account number or customer 
name Information includes customer 
name, address, phone number, n^ake of 
unit, seri'ice dates, technician, services 
performed and total amount billed Infor- 
mation can be called to the screen or 
printer as a total list, or by previous serv- 
ice date. 

The customer records module can post 
to the accounts receivable modu;e 
payroll module and our Inventory ContfL. 
System. 

Approximately 1.8C0 customers and 
records can be held with a Model I com- 
puter with four 80-traok drives, or a Model 
III with two 80-track drives 

By adding additional drives to the 
Model III. more than twice this amount of 
information can be maintained By switch- 
ing diskettes in drives, the capacity be- 
comes unlimited. 



See your nearest 
A.M. Electronics, Inc. dealer 

Here is a partial Ustmg of our dealers 
ifi North America and Europe 



ARIZONA 

S<nHi)*k Cotnpulw Producli 

PC B;;- '366- 
-.;50r tjf--- 

CONNBCTICUT 

CemputH Sarvic*! of Dinbtiry 

-JSi,mn--5!-»i 

dr.Cor. CS068-C 

Mounum Vi«« Softwir* 

M ryO'OOfc Hoac 

COLORADO 

Dais Rasourcei 

800CEa5-Oi..nc, 

Ctr,fr cc eoj:-- 

HotKnion Enl«ii»'>*> 

235* E Bco-Of 

Cpr.-aocScr ngs Coa0909 

DIST. OF COLUMBIA 

Piograin SIO<e 

■i?OC V.!Cpr,s r AveriLe NW 
Wii-i rgur D C 20f -e 

FLORIDA 

Ad«*nluretnl*rnatlDnBi 

507 Easi Street 

Lc,rci»(,oc FL 32750 

AIISysttmaGo 

fnn plant Sceei 
w.nitr Gardor.Fi.3i7g? 

ILLINOIS 

3HCompuI«r 

iSSCB.-lerRcaG 
*i,FCra IL 5PM4 

Uidwdt Computef Peripriaiali 

MP^S yiCI-iGar A»s 

Ct-.CiGO IL6060S 

Thayet Radio 

15'A.k'eSi 

G-«r..ie« ll_ 62642 

UASSACHUSETTS 

Small Buainess Syitams Group 

f Car' s'eRcac 

CsniiHilaT Plui 

iiSAG'esTRcac 

MICHIGAN 

J»maft Bull«r 
J3eE L_a«sSf«: 
P(I05kev Miio^-C 
Eight Bit Corner 

-£2Euan5rcn».e 
yj5k«;c^ MI4WJ? 



Matrii Softvai* 



RamarliaWa Softwari 

Soft Saciw Martaiiiig 

bJSC W acrOr-P : 



NEW HAUPSHIRE 

TStH»r*»i*« 
( *i--' S-rt- 

NEW JERSEY 

Flopot Dial Sarvicas 
f-.-i.rioi N^MS-iC 

NEW MEXICO 



cky Mountain Eng 



i^E 



Abig^ 



Nfc- 



'OS 



NEW YORK 

B T. Eniarprtiai 

171 Ha*i.in' 

Cpn'prodch NV ;-7L0 

NORTH CAROLINA 

Alpha Tachnologt 

'201 Vi'iki'rDri^f 
Baleich NC2"'S04 

OREGON 

1300 Camra CiacI'Dniia 

nooen' Stife' 



PENNSYLVANIA 

StavtniRadto snack 

5f2N^tlBQjn 
Pficpr,.»iMt- Pi 19J60 

BELGIUM 

D« lam (ion 

'OJC 6r„s;r . Bt !;■_" 
"ELE" M;2i'F lECOr 

WEST GERMANY 



Csmpuiar Stii*»«. CMBH 

«jos;f"ii-'t 



REP. OF SOUTH AFRICA 

Braioa Butinan Machmai 

iK S.ani, Pa 

DbrCJ'-JlX- 



This package may be specified lor auto 
dealers, mechanics. TV repair centers, 
electronic technicians, and appliance re- 
pair centers $199.95 

Order Entry 
With Invoicing and Inventory 

Orders arc composed of name and ad- 
dress information (with optional company 
name), method of shipment, payment 
method, items on order, quantities, prices. 



description, and stock numbe'' Th f fyf- 
tem also pr nts nvc ces 

At po nt cf sf~ pr^er.l nvenlcy ' .-l 
tcma! ca.iy upaatea Dciar sa'ps ore re 
ccrdea Shppmg charges and aa'.v. art- 
logged Entr.es may be ediec ?br\,u 
shipp'ng ,s perm tied 

Ti-e irventcr>' modu'e a icws checf-rcj 
ana upda! rg stock nventcr^ 't-pcrtf 
sa'es reports sl"ipp.ng charge;, arc 
r'-cre 

This complete systerr s tcr a^n os: ;iry 
whc esaie c reta bus ness CapdCitv -s 
upwa'd-expardab'e frcm a c_.ci 40 ■'<ici' 
Mode I system l 75C r.verlcry u.-r t 
565 craers per G sKette Sf-^' "-r 

Inventory Control System 

Th;s system g ves yot ccmp'ett cc niro^ 
ever an unnm^ted arr.ounl cf mvfrtory 
items (Note. Systems coniainn c rrce 
than 13.000 items are difficult Ic hd C.le 
from a maintenance time stardpc r.i. e g 
Block File reorganization can take over 
3 hours.) 

As presently configured, a Model i 
computer with one 40-track drive wiii t old 
T925 items, or a four-dr've system a tcta' 
ot 6.625 items. Four 80-track dnves wil, 
hold over 13.000 items. A fvlodel III com- 
puter, with two 40-track drives wn: hold 
about 13.000 parts 

If necessary, A.M. Electronics. Inc can 
modify both the program and hardware to 
allow on-iine storage of an unlimited 
amount cf items As the die becomes 
larger maintenance operations take 
longer Average search time is six sec- 
ends. With 12 seconds the .cngest time 

Upon program init.a'.zaticn. the user 
specif es the item number ana descrip- 
tion digit length. Th.s allows fcr dem num- 
bers up to 23 alpha-numberic characters 
(As item number digits increase Oig'ts for 
description usage are decreasec i 

The program is completely menu- 
driven. Iterr.s can be added, edited or 
deleted from thef.le Items can be placed 
on order, received to stock, or sold from 
inventory. Complete printout capabilities 
are available. 

Item information includes item number, 
description, supplier, re-order point, cost. 
fAholesale and retail selling price, quan- 
tity, on-order. and total sold. The re-order 
point is calculated by the program, based 
upon number of units sold over a 
specified period of time . . . $199.95 



AM 

A.M. ELECTRONICS. INC. 



.^452 



Ann Arbor: 3366 Washtenaw Ave. 48104 {31 3) 973-2312 Open M-F 10-6, Sat. 10-5 

Fowlerville:*111 North Grand, Box 1071 48836 (517)223-7281 
Attention Dealers, OEM's & Distributors: Call us for details on our attractive pricing. 



'"TRS-80 IS a trademark ot Taridy Corp 
^Sc» List ot AOvenisefS on pagt 4 IS 



'Aulhotized Radio Shack deatw 



Prices sobiecl lo ciidnge w^iho..;t not ce 
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j?P REVIEWS 



edited by Michael E. Nadeau 



"/ find the additional 16K great 
for things like Editor/Assembler Plus. . . 
or a data base management system.." 



The Internal Memory 
Larry Holmes 
Holmes Engineering 
San Lake City, UT 
$59.50 

by Eric Keener, WBGEST 

Occasionally a product comes along 
that you could consider the greatest 
since the microcomputer. This time it is 
the Internal Memory (or the IM) from 
Holmes Engineering, an attachment for 
your TRS-60 Model I. 

Imagine, those of you (like me) who can 
just barely afford the computer, much less 
the expansion interface for that coveted 
amount of additional memory, imagine 
being able to have 32K inside the l<ey- 
board for less than $80. It's fantastic! The 
IM is a small circuit board that contains 16 
RAM sockets (plus the necessary decoder 
circuits], and is plugged Into the eight 
RAM sockets in your keyboard. The origi- 
nal eight RAMs (they must be 16K) are 
then plugged into the IM. This leaves you 
eight more sockets for either 4K or 16K 
RAMs. 

When I heard about the IM from Larry 
Holmes (the brains behind the IM), I just 
couldn't resist. I ordered the IM by phone 
on Tuesday, and it arrived on Friday. I did 
have a minor problem installing the board, 
as capacitors C32 and C34 were in the 
way. I merely moved them to the other 
side of the CPU board and. voila. 32K of 
user RAM (actually 31956 bytes). 

Larry has indicated that he is aware of 
the minor problem with the capacitors, 
and is already planning a slight redesign 
so C32 and C34 will not present further in- 
stallation problems. He hopes to make it 
possible for anyone to install the IM with- 
out any problems 

The IM also requires four connections 
to the CPU board, of which only three are 
required if you are adding 16K. These are 
logic connections, as the IM acquires its 
power from the RAM sockets. Holmes En- 
gineering has come up with some minia- 
ture clips that are small enough to attach 
to the pins of the other ICs on the CPU 
board. Thus, there is no need to solder or 
cut traces, and the IM is easily removed 



when service is required. By the way, 
since I installed my IM, I have had no prob- 
lems with the logic leads— in other words, 
soldering really isn't necessary. 

Regarding power, the additional RAMs 
only require an extra 50 milliamps from 
the system's five-volt supply, and that on- 
ly in bursts, not a continuous drain. As for 
the 12-volt supply, the IM draws an addi- 
tional 60 milliamps. Thus, the total drain 
on the 12-volt supply is only 125 milliamps, 
far below the 480 milliamp design limit. 
Finally, the IM requires power from the 
- 5-volt supply. In my keyboard. I have not 
only the IM, but a lowercase modification 
that uses two RAMs. and the high speed 
modification that uses two more ICs. I 
have not experienced any power supply 
problems. 

The IM Is strictly a hardware modifica- 
tion and does not require software to 



make it work. Just install it and you are 
ready to go. The Level I! ROM is capable of 
addressing up to48K of RAM, plus the 16K 
for the Level II ROM, plus peripherals 
(CRT, keyboard, etc.). This is a total of 64K 
for a Z80 system. 

I find the additional 16K great for things 
like Editor/Assembler Plus (Microsoft) or 
a data base management system. I can 
even work on a Stringy-Floppy modifica- 
tion for Radio Shack's budget manage- 
ment programs. 

The IM package does not include the 
additional RAMs. However, I've seen the 
additional 4116 RAMs advertised for as lit- 
tle as $30. Holmes Engineering provides 
total support for the IM and a one year 
guarantee. 

Those of you who have limited space 
and funding: the Internal Memory is for 
you.H 



Rex 80 Rom Extender 

Model I, Level II 

Personal Microcomputers, Inc. 

Mountain View, CA 

$60 



by Mel Patrick 



When I acquired a JPC cassette sys- 
tem, I searched for an answer to 
some of my software problems, particu- 
larly the JPC driver program that resided 
in memory with many of my other ma- 
chine-language patches and utilities. And 
while the JPC software driver was relo- 
catable, I still needed several versions on 
several tapes. Combine this with other 
programs on the list that reside in high 
men>ory and you can end up with a huge 
number of memory sizes to remember. I 
was convinced there was an alternative to 
my problem. 

The Rex 80 

Scanning the advertisements in many 
computer related publications, I came 
across one which offered a hardware solu- 



tion to my software problems. The de- 
vice was called the Rex 80 ROM Extender. 
This accessory boasted the use of 2,014 
bytes set aside in the reserved area for 
your own programs. There was apparently 
no conflict between the Rex 80 and the 
standard Level II ROM. I checked Radio 
Shack's Technical Reference Manual, and 




using a machine-language monitor I 
checked the computer system itself. I 
found that the Level II ROMs occupied the 
area from 0000 (hex or decimal) to 2FFF 
(hex) or 12287 (decimal). The next address 
that was actually decoded for use was 
37DE hex, 14302 In decimal. The address 
was the DOS communication status ad- 
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dress. According to Radio Shack the area 
from 3000 hex (12286 decimal) to 37DD hex 
(14301 decimal) was a reserved communi- 
cation area. 

The advertisement also said that the 
board was compatible with most of the 
EPROMs on the market. EPROM stands 
for Erasable Programmable Read Only 
Memory. They function exactly the same 
as your standard ROM except the infor- 
mation it contains can be altered. 

I knew that Exatron had their operating 
system on either a ROM or EPROM chip 
and you initialized it by entering System 
/12345. Their entry address of 12345 was 
in this reserved area and did not seem to 
disturb anything, so I guessed the Rex 80 
was addressed In the same way. 

The lnt*rf>ce 

The board Itself is approximately 24 In- 
ches square with an edge-card bus on two 
opposite sides. Four rubber feet on 
3/4-inch standoffs (spacers) support the 
unit. It does not come In a case. The P.C. 
board Is double sided, has a 24-pin Tex- 
tool zero insertion force socket for your 
EPROM and a five-volt regulator for the 
power supply. An ac adapter Is required to 
power the regulator chip on the P.C. 
board, it plugs into a female miniature 
phonejackon the board. Only the address 
lines are fully buffered on the board. This 
did create a problem but was easily fixed. 
Two pages of documentation accompany 
the Rex 80 for connection, operation and 
memory map reference. 

EPROM Programming 

This was one of the hardest tasks I have 
ever attempted. I completely wore out my 
Editor/Assembler creating source and ob- 
ject codes of my routines. Remember that 
all of the routines had to be assembled in 



After deciding which patches and 
utilities I wanted in EPROM, I filled the re- 
maining 864 bytes. Now with a working 
version some 2,007 bytes long, I inquired 
into the format of programming entry. A 
local company informed me that hex, oc- 
tal or binary were acceptable. They would 
then enter my program byte for byte into a 
EPROM programming machine. 

I had my program assembled at 3000 
hex, but there was no way to load it and 
obtain a printout of It, since there is no 
RAM there to hold it. So I dumped the as- 
sembled version from Editor/Assembler to 
the printer, went to Memory size, loaded in 
a machine-language monitor, and then sit- 
ting with printout in hand I entered byte 
after byte of my object code starting at 
5000 hex. Actually I could have entered it 
at any address in RAM since all I wanted 
was a hex dump I also could have given 
them my Editor/Assembler object code 
listing except that I! is difficult to read 
with all the line numbers and mnemonics. 

Armed with a hex dump of my program 
and a blank EPROM (an Intel 2716), I head- 
ed out to the local electronics firm, where 
after about four hours, I had a pro- 
grammed EPROM. 

FIrul AtswnUy 

I connected the Rex 80 to a short 40-pin 
cable and the other end to the rear of the 
keyboard. The programmed chip was 
placed into Its socket and the computer 
system powered up Memory size was an- 
swered with Enter and then System n 2288 
was entered (my program entry point). 
What I got was a spectacular crash. 

I powered down then back up and load- 
ed my machine- language monitor. I start- 
ed a symbolic dump of whatever was at 
3000 hex (I did not Initialize the EPROM 
this time). Something was definitely 



"Armed with a hex dump of my program 

and a blank EPROM, I headed out 

to the local electronics firm. . . " 



RAM, completely debugged and then 
saved for the final version 

I started with JPC's software, rewriting 
parts to fit Its new location until I had a 
final working copy that had shrunk from 
1 ,367 bytes to 1 .250. This lett 864 bytes left 
for my patches and utilities. 



wrong when every 256 bytes the program 
would repeat Itself. At first I suspected the 
data lines, but why was some of the pro- 
gram correct? This lead me to the address 
lines and after doing a lot of continuity 
testing I found a badly plated through 
hole, right under the EPROM socket. The 



socket was removed and replaced by 
Moiex connectors should any other prob- 
lem arise. At this point l could have re 
turned the Rex 80 but I am a hardware butt 
at heart. 

Reconnecting everything as before and 
initializing, it worked! Almost For some 
odd reason part of my I/O routine failed to 
function properly This was the fault of the 
programming firm. They had mistakenly 
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read a hex byte F6 as 66 and entered it as 
such. The EPROM was removed and re- 
programmed in atxjut 15 minutes This 
time there were no problems 

User Comments 

Was it worth all the trouble? Yes! Hav- 
ing all of those routines on-line, never hav- 
ing to remember memory sizes and being 
able to insert different EPROMs for other 
tasks, definitely makes the TRS-80 a much 
more powerful computer system 

If you feel that this could be a possible 
solution tor you as well, allow me to make 
some helpful suggestions: 

• The ac adapter must be at least nine 
volts, 300ma to power the board 

• It is a good idea to install a small heat 
sink on the regulator chip. 

• When you order your EPROM make 
sure you specify the single five-volt ver 
sion. An access time of 450ns Is fast 
enough (even if you have a high-speed 
mod installed). 

• On the P.C. board you will see two 
electrolytic capacitors. On the three 
boards I have seen these are not solderec 
on both sides but should be 

• You can install the Rex 80 between 
your keyboard and expansion interface, or 
to the expansion interface itself. But It you 
have a non-Radio Shack expansion It may 
not work Installed there. My Microtek ex 
panslon will not work off the Rex 80 ex 
pension's bus. You may have to obtain a 
two-for-one cable connector. ■ 
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DyrMtypsr Kaytxiard Actuator 
Rochastar Data, Inc. 
RochestBT, NY 
$499 

by Paul Snow 

A keyboard actuator is an array of sole- 
noids that tits over a typewriter 
keyboard. In response to LPRINT or 
LUST, ttie actuator drives a plastic arm 
down onto the appropriate key and pro- 
duces honest-to-good ness letter-quality 
output. 

If you already own an electric type- 
writer, then an actuator is an inexpensive 
alternative to the daisy-wheel printer. You 
can remove the actuator any time you 
want to use your typewriter normally. 
Since there are no internal changes to the 
typewriter, your warranties and service 
contracts are unaffected. 

The big disadvantage Is speed. A Dyna- 
typer averages about eight characters per 
second. You can boost this to 15 or even 
20 characters per second, but you may 
lose some letters as the typewriter fails to 
keep pace with the mechanical typist. 
Solenoid heating can also be a problem at 
high speeds. Repeatedly hitting the same 
key without an adequate cooling period 
can damage the solenoids. Thus, typewrit- 
er graphics are limited. 

The Dynalyper can be used with the 
IBM Selectric along with many other 
brands. With the Model I. Level 11 it works 
equally well with or without the expansion 
interface. You do not even need a Radio 
Shack printer interface cable if you do not 
have an expansion interface. The Dyna- 
typer simply plugs into the back of the 
keyboard console. 

Installation is simple. Two supports are 
mounted on the outside of your type- 
writer. You remove the cover of the Dyna- 
typer and manipulate four nylon screws to 
adjust the height of the unit over the keys. 
When each plunger activates its key near 



the t>ottom of its stroke, you replace the 
cover and hook up the cables. 

Each time you use the Dynatyper, you 
load and run a Basic program. The pro- 
gram takes over your top 306 bytes of 
RAM POKEing a machine-language driver 
routine into that space. There is some In- 
convenience both in lost memory and In 



Dynatyper driver does not even broach the 
subject. A suggested patch for version 3 

of the driver is given in the Program 
Listing. Why something like this Is not in 
the Dynatyper txjok is a mystery. 

Documentation 

The poor quality of its documentation is 



"The Dynatyper is not a 'set it 

and forget it' device. Its height 

must be readjusted periodically. 

The solenoid plungers must 

be cleaned regularly, too." 



the time required to load the 4K Basic pro- 
gram. This last problem is mitigated if you 
have a Stringy-Floppy or disk. Loss of the 
strategic top bytes may interfere with your 
own machine-language programs. 

But there are advantages to placing the 
driver In RAM. Vital parameters such as 
typing speed can be quickly changed. 
Which ASCII code hits which key can be 
redefined by a simple change in a few 
data statements. Thus, you can fully ex- 
ploit interchangeable IBM typing ele- 
ments with special character sets. 

One function that should be simple with 
a driver in RAM is automatic case rever- 
sal. As you may know, the action of the 
TRS-80 keyboard is exactly opposite to 
that of a regular typewriter. Shifted letters 
are lowercase, unshifteds are uppercase. 
That is fine if you are listing programs. To 
produce ordinary dual-case text, though, 
you either spend a lot of time holding 
down the shift key or else you figure a way 
to perform case reversal automatically. 

The documentation that comes with the 



To get automalk: cas* reversal, actd lt>e toltowng statenwnts to ttM Basic prof^am: 

3072 PRINT "U = UPPER CASE ON SHIFT KEY" 

3090 IF LEFT$(M.1| - "U" THEN 3800 

3e00L1 = 169:L2 = 201:Vl=225:V2-161 FOHI = 0TQ25. 

POKE A + LI * l,V2 t l;POKE A + L2 * l,V1 + I NEXT:GOTO 3060 

Run Ihs DTograin nofmally. Wt>en it asks you 

[X) VOU WANT TO CHANGE ANY DELAY tXWSTANTS? 
say YES. When It asks 

CONSTANT? 
answer "U", 



Program Listing. Patch for Dynatyper Driver Version 3. 



the weakest feature of the Dynatyper. The 
manuals are fraught with typos. The 
would-be modifier of the driver program 
gets little support beyond a listing and a 
brief explanation of the operating philoso- 
phy. Worse, the Assembly listing of the 
machine-language program that resides 
in high memory does not use the standard 
Z80 mnemonics familiar lo EDTASM fans. 
Fortunately, there are enough comments 
to permit comprehension. 

Another baffler about the Dynatyper 
documentation is the absence of any 
mention of the actuator's wrap-around 
capability. Wrap-around means that long 
program lines will bebrokenupintotwoor 
more lines of typing when you LLIST. This 
is a handy feature; you would expect 
Rochester Data to brag about it rather 
than leave you to stumble across it. 

The Dynatyper is not a "set It and forget 
it" device. Its height must be readjusted 
periodically. The solenoid plungers must 
be cleaned regularly, too. Fortunately, it is 
a simple matter to lift each one out, wipe It 
off and slip back into place. But if you drop 
tfie Dynatyper with Its cover off. all those 
plungers will fall out and It will take you a 
while to sort and replace them properly. 

The low cost and flexibility of tfie 
Dynatyper make it an attractive product. 
The one-year warranty is a big plus. After 
all, you are buying a box full of electrome- 
chanical parts. The failure of any one 
renders the entire assembly useless. I am 
happy with mine after several month's ser- 
vice. However, I don't have much software 
that needs those top bytes, nor am I fazed 
by software modification with sketchy 
documentation. ■ 
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"God Created Man — Man Created the Computer" 

"It Took A Special Man to Create the Perfect Basic 
For Your TRS-80'- Computer i" 

COSMOPOLITAN ELECTRONIC CORPORATION 

— PRESENTS — 

"BOSS-SUPERBASIC" by V.B. Hester 

THE MAGNIFICENT "BOSS" IS NOW PART 

OF THE MULTIDOS SYSTEM 

•All of BOSS'S Trace, Single Stepping, and Variable Review features give you 
the Ultimate De-Bugging Tool for Basic Programs. 

•Requires Less Memory than Any Other Basic Interpreter 

• The Usual High Standards set by the Author are incorporated in . . . 

MULTIDOS 

MMULb I IDwS -The Only Complete "All Density" Operating System on Earth 
M U LTI DOS - With "BOSS-SUPERBASIC" is a MUST for Your TRS-SO- 1 

jeaturin^ — — 



-ALPHABETIZED DIRECTORY ■ DUEL DIMENSION STRING SORT- 

- BREAK POINTS TO CONTROL SINGLE STEPPING - 

- EXECUTE ANY DOS COMMAND FROM BASIC- 



• Trace to Line Printer 

• The only All Basic Chatrer 

• Level II Transfer 

• Repeats DOS Commands 

• Flexible Keyboard 

• Single Drive Copy 

• Variable Lenglh flecords 

• Continues Basic Programs 
after reboot 

• Security Boot-Up 

• Fastest De-Bug 

• Graphics Dump 
" Fastest Copy 

• Single Slep 
" Zero Arrays 



Maintains Date 

Multiple DOS Commands 

Sophisticated DC 

Maintains Time 

Fastest Back-Up 

Page Scrolling 

Execute lor only Basic Programs 

Fastest Renumber 

Single Step with Auto Delay 

No Hang 

Dated Files 

Super Dump 

Link 

Route 

Spooler 



• Forms 

• Full Lower Case Support 

• No Printer Hang-Ups 

• Automatic Density Recognized 
" Innovative Load 

• Fastest Formal 

• Find Command 

• Global Editor 

• 80 40 35 Drives Mixed 

• Disk Editor Assembler 

• Space Compressor 

• Simple Mini DOS 

• String Packer 

• Delete Arrays 

• Automatically Supports High-Speed Clock 



Cosmopolitan Electronics Corporation 

P.O. Box 234 • Plymouth, Michigan 48170 
(313) 397-3126 

- DEALER INQUIRIES WELCOMt - 
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Slipping A Han<llif^q 
Michrgan FHaiflBFiib 

4^ SWes T«> 



I WELCOME -,_,.. ^^,^ . 
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^ S0« List at AdvanisarM on page 4ia 
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Archbold High-Speed Modification 

Archboid Electronics 

Rancho Cordova, CA 

High-speed modification, S45 

Memory delay line, S18 

Z80B processor (for 5.4 MHz mode), $18. 

by Dennis Bathory Kitsz 



Critics of the Model I TRS-80 have long 
held that the speed at which its Z80 
microprocessor operates is slow, far un- 
derutilizing the power of the machine. 
Radio Shack has never acknowledged 



"A basic clock 

speed-up is fairly 

simple to achieve.' 



that criticism, and consequently has 
never offered any speed upgrade kits 
similar to their lowercase and Level It up- 
grades. That effort has been left to individ- 
ual hobbyists and experimenters, and. 
sometime later, to a few enterprising man- 
ufacturers. 

There's some disagreement as to who 
manufactured the original high-speed 
modification tor TRS-80 Model I. But there 
is no question that Bill Archbold has pro- 
vided a consistently reliable modification 
board for quite some time. The first Arch- 
bold circuit allowed only a 50 percent 
speed increase, but later he offered ver- 
sions including taster and slower com- 
puter operation. The latest permits some 
TRS-80S to operate at 5.36 MHz, three 
times taster than the original keyboard 
unit. 

Not only is the increase dramatic, but 
Archbold's newest circuitry monitors cer- 
tain computer operations. Thus, errors 
during disk access do not occur because 
the board switches back to normal speed 
during this critical time. 

A basic clock speed-up is fairly simple 
to achieve. Speeds other than the 1,77 
MHzof the TRS-80 are accessible internal- 
ly; it's hard to determine whether they 
were a deliberate design consideration or 
merely the accidental results of the divi- 
sion of 10.644 MHz master clock. In any 
case, speeds 60, 100 and 200 percent 
faster are already present in the TRS-80 
circuitry. Making them available to the 
user is a matter of selecting them with 
electronic switches. 



Once these speeds are selected, mak- 
ing them work reliably is another matter. 
The TRS-80 is comfortable with a 50 per- 
cent speedup and can handle a 100 per- 
cent speedup with a minor modification to 
one circuit- But the expansion interfaces 
resent the speedups, and flakiness begins 
to appear in that area when the TRS-80 is 
pushed faster. Making more than a 100 
percent increase can be fatal to programs 
using high memory, 

Archbold has solved this dilemma in 
several ways. First, the disk accessing is 
monitored, returning to normal speed for 
this process. Secondly, he recommends a 
few minor circuit changes to increase 
memory stability. Next, he insists that any 
early units be stabilized with the Radio 
Shack buffered cable/twisted pair im- 
provements. And finally, he makes a mem- 
ory delay unit available for use with the 
very highest speeds. 

Installation 

Before commenting on the difficulty ot 
installing the high-speed board, I would 
like to say that Archbold makes every ef- 
fort to document each step of the process 
and assist the user. Unlike any other hard- 
ware change to the TRS-80, the Archbold 
board provides a tutl-size photograph of 
the entire TRS-80 circuitry with the modifi- 
cation connections clearly numbered. 
Also, every revision (A, D, E and G) of the 
computer is covered in the instructions. It 
is among the best hardware documenta- 
tion ever prepared for computer add-ons. 

Nevertheless, the prospect of cutting a 
half dozen traces and separating, cutting, 
stripping and soldering 20 wires is not a 
|ob to be undertaken impatiently. This in- 
stallation requires that the user read and 
follow each step with great care. An ex- 
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pert could have the board installed in an 
hour or so, a novice can be expected to 
spend a full evening of careful work. 



The board itself is small (about 1 1/2 by 
3 inches), beautifully crafted, with a clear 
plastic insulator across its bottom, and 
two wide foam pads for attaching to the 
main TRS-80 circuit card, A 20-conductor 
cable is attached, which must be sepa- 
rated into wire groups of different lengths 
after the board is put in place, 

Archbold's instructions say that before 
the sticky foam pads are applied to the 
TRS-80 circuit board, the board must be 
clean. He should have said immaculate. 
After the machine has been used for a 
while (which it probably has by the time 
this mod is installed), there is a buildup ot 



'The board itself 
is small (and) 
beautifully crafted. 



dirt from the air, as well as solvents, 
cleaners or lubricants used for the edge 
card connectors. Make sure the area onto 
which the Archbold board is to be fas- 
tened is free of this grime and absolutely 
dry. 

Separating the wires is the next step. 
Instead of slitting the wires with a razor 
blade, grasp the end of the wire hank as 
you would a package of Fntos— the kind 
that won't ever open with a gentle tear 
Place your fingernails close together at 
the end of a wire pair, and mck the plastic 
between the wires. Then twist as you 
would attempt to crack through the end of 
the Fntos bag. The wires should begin to 
separate, allowing you to pull them gently 
down to the required length. 

The wires are trimmed long enough to 
reach each of the points shown on the Cir- 
cuit board, and very short bits of insula- 
tion are stripped from their ends. The ex- 
posed portion is tinned (prepared with 
solder), and soldered to various points on 
the TRS-80 circuit board. Throughout this 
process, the instruction manual must be 
checked carefully, as there are traces to 
be cut, and different considerations for A, 
D, E and G versions of the computer 
These version numbers are clearly marked 
on the boards (they are part of the board's 
manufacturing number printed near the 
power supply). 

When the board is installed, testing can 
begin. Archbold indicates two possible 
connections for one wire, for example, if 
the modification does not seem to work at 
first. In the three boards I have installed, 
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Your best 

Model I/Ill 

peripheral buy 

is a modem. 



Your best 

Model I/Ill 

modem buy 

is LYNX. 



Considering expanding your TRS-80 
Model I or IIP Then you should know 
that only one kind of peripheral can 
give you all these extra capabilities 
... in a single unit: 

• Computer-to-computer data 
communications, for better 
personal or business manage- 
ment. 

• Access to free "bultetln board" 
resources. 

• Access to Source, Compu- 
Serve and other time-sharing 
systems. 

• Services like electronk: malt, 
instant news and financial re- 
ports. 

• An almost limitless supply of 
r>ew games and other enthusi- 
ast activities. 

Of course, we're talking about a 
modem. A far mora sensitile first 
step in expanding than, say, joy- 
sticks, or a voice box, or a printer. 
And. therefore, your best peripheral 
buy. 

A modem opens up a whole new 
world to you A world of thousands 
of computers and computer people 
just like you, in homes and busi- 
nesses around the block and across 
the country A world you tap through 
your telephone. 

But don t simply settle for any mo- 
dem. For the most modem satisfac- 
tion, you need to make the best mo- 
dem buy. 

And that s LYNX. 




Lymtai 
MnMHI 



The new LYNX for TRS-80 Model I and Model 
III It's the latest innovation from the people who 
are making data communicattons affordable, II s 
the best first step you can take in expanding It 
makes your microcomputer a whole new animal. 




DLYivnco 



123 LOCUST STREET LANCASTER. PENNSYLVANIA 17602 
Phone 717/291-1116 

TRS-SO IS a tiademark ol the Radio Shack Division oi Tandy Corporation, 

FCC Re9rslial)0r Numbet A909KE-68171-DM-N 



re- 



in- 



The new LYNX is the idea modem 
for your Modei i or 1 1 1 That b becaL.se 
it s the key element of a total direct- 
con rvect telephone communica- 
tnns package. 

This package includes all serial 
and computer bus interfaces, cables 
and terminal software , . and comes 
to you with these remarkable fea- 
tures: 

• SINGLE PRICE: $299.95! 

• Compatible with both Model I 
and III. 

■ No separate purchases 
quired. 

• One-year warranty. 

• Auto dial/auto answer. 

• Works with any software, 
eluding ST-80 by Micklus. 

• Active clear, break, and "con- 
trol" keys. 

• Half or full duplex, variable word 
length, parity and stop bits. 

• Dial from phorw, keyboard, or 
memory. 

• Works with or without Model I 
expansion interface. 

• Works with or without Model III 
RS-232 card. 

■ Can be placed on eitfter side of 
Model III. 

• No tools rwefled to install. 

No Other modem gives you so much 
in a single package. And when you 
compare the LYNX price with the to- 
tal cost of bringing any other modem 
on line, it could save you OVER S1 00! 



,-276 



Consult your local microcomputer retailer, or call one of these LYNX handlers today— TOLL FREE: 



ADVENTURE INTERNATIONAL 
Longwood, FL 
800/327-7172 

THE PROGRAM STORE 
Washington, DC 
800/424-2738 

^ Sae List ol Adwrtitari onpag«41B 



ADVANCED COMPUTER PRODUCTS 

Irvine, CA 

800/854-8241 

STEVENS RADIO SHACK 
Phoenixville, PA 
800/345-6279 



TSE HARDSIDE 
Mflford, NH 
800/258-1790 

SIMUTEK 
Tucson, AZ 
800/528-1149 



COMPUTER PLUS 
Littleton, MA 
800/343-8124 

PROGRAMS UNLIMITED 
Jericho, NY 
800/645-6038 
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only one did not work perfectly the first 
time (in fact, it never worked at all— more 
on that later). For expansion interface 
owners, there is some minor work to be 
done there as well. 

The final touch is the power indicator 
on thefront of theTRS-80. This becomes a 
speed indicator — green for normal speed, 
red for high speed. The Archbold high- 
speed mod is switched from high to low 
speed merely by issuing a Basic Out com- 
mand to port 254, an assembly code Out 
(FE), or an machine language D3 FE. The 
modification is otherwise transparent to 
computer operation. 

Moving Faster 

Multiple speed options are available on 
this board, but call for some user interven- 
tion. Specifically, two 74LS74 integrated 
circuits, a double-pole, double-throw 
switch, a Z60B microprocessor, and a 
memory delay line are required in a full ex- 
pansion of the speed options. The mem- 
ory delay line is essential tor 5.36 MHz 
operation (three limes the normal comput- 
er speed), as is the hotter Z80B processor 
(nominally rated a 4 MHz CPU). The whole 
system can run $85 plus a lot of time. 

I won't say super speed is not worth- 
while, but it does take a lot of time and pa- 
tience. Integrated circuits must be piggy- 
backed and holes drilled for switches. 
Even with the ZBOB and memory delay 
line, there's no guarantee it will work re- 
liably and consistently. But it can work, 
and if you need the additional speed, then 
the Archbold nnodification can provide a 
key to it. 

There is one serious black mark against 
the Archbold modification. Archbold has 
joined manufacturers like Percom In tak- 
ing what, from my point of view, is a 
ludicrous form of circuit protection— he 
has sanded the part numbers off the top 
of the integrated circuits. 

If anything goes wrong with the Arch- 
bold board, or if anything (even something 
simple and obvious) does not work upon 
first installing it, forget the diagnosis. 
Unless you are psychic or a very astute 
electronics designer, there is no way the 
Archbold circuit will reveal its operation to 
you. Therefore, you will have wasted all 
the time spent installing the board, have 
to rip it out, box it, put postage and in- 
surance on it, return it to Archbold. and 
wait two weeks tor a replacement. 

I had driven 150 miles to install this 
board for a friend who grows extra thumbs 
whenever he's even shown a soldering 
iron. With everything in place, I powered 
up the modified TRS-80. Within two 
minutes, the computer died. I took the 
machine back home for a 'scope check. 



and found all the signals coming from the 
computer to be good, but nothing coming 
out of the Archbold board. But with no 
idea of what circuits made up the modifi- 



hardly market it cheaper, nor with docu- 
mentation and installation instruction of 
as high a caliber. 

In summary, the Archbold speed-up kit 



"Multiple speed options 

are available. . . but call 

for some user intervention." 



cation, out it came. The computer was 
healthy again. My friend drove to pick up 
his machine, and was disappointed that 
the mod wasn't in place— just a paltry 50 
percent speedup I installed to console 
him. 

Word came back from Archbold a few 
weeks later that the board "tested out just 
fine." I couldn't help feeling a bit 
frustrated and resentful at the implication 
that I had installed the board incorrectly. 
It reflected on my competence, but with- 



is a fine product that can transforTi your 
pokey TRS-80 into a last, more powerful 
computer. Calculations and sorting time 
are cut phenomenally, and graphics take 
on a remarkable new level of animation. 
With all its adventages, though, it joins 
those other black boxes I refuse to install 
in my own computer.H 

Recently I had the opportunity to speak 
with Mr. Archbold. and I asked him atiout 
the missing numbers on the high-speed 



"I won't say super speed 

is not worthwhile, but it does 

take a lot of time and patience." 



out a schematic there was no defense. A 
new board was shipped anyway, but I still 
had no schematic or part numt>ers for 
reference. I refused to install the board, 
asking my friend to ship it back. As of this 
writing, Archbold has still not given 
enough circuit details to diagnose it. . 

It's too bad, because the two other 
Archbold boards I've installed work very 
well, making the Archbold speed-up an ex- 
tremely economical alternative to buying 



circuit board. It seems that Archbold has 
actually been a victim of design ripoff. He 
denied a request from another company 
to market his earlier highspeed modifica- 
tion because of his substantial invest- 
ment in circuit boards and parts. But this 
company (well known in the microcom- 
puter world for mass-storage equipment) 
refused to take no for an answer, actually 
taking Archbold's design and attempting 
to market it with neither credit nor pay- 



"It seems that Archbold 

has actually been a victim 

of design ripoff." 



a faster computer. And it seems a high 
level of paranoia that would allow Bill 
Archbold to believe that anyone would 
bother stealing the product; they could 



menf to Bill Archbold. Perhaps there is 
some justification, then, for Archbold 
removing the markings on his redesign of 
the high-speed mod. 
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Centronics 739 
Centronics Corp. 
Hudson, NH 
$995 parallel port 
$1,045 serial port 



by G. Michael Vose 

80 Microcomputing staff 

The current decade may go down in his- 
tory as the decade of the printer. In the 
past year and a half, over a dozen new 
printers have been introduced for the mi- 
crocomputer market. The price floor for 
these printers has plummeted to less than 
$300! Many of these printers support the 
most sophisticated of features — underlin- 
ing, subscripting, superscripting, bold 
type and more. 

The Centronics Corporation has been 
making printers for computers since the 
early mainframe days. They have broad 
experience, both in manufacturing and 
marketing and have been the Original 
Equipment Manufacturer (OEM) for many 
computer makers including Tandy/Radio 
Shack. 

The Centronics 739 is the newest of the 
Centronics family of dot-matrix printers. 
At 14.5 by 11 Inches, this compact printer 
tits neatly alongside a TRS-80 Model I. II or 
III. The 739 accepts fanfold paper up to 9.5 
inches wide, roll or single-sheet paper up 
to 8.5 inches wide. It prints 40 characters 
per second (the manual claims 100 cps 
but my tests showed it to be slower than 
my NEC Spinwrlter, rated at 55 cps) with 
vertical spacing of six lines per inch and 
horizontal spacing of either 10 characters 
per inch (cpi) or 16.7 cpi. 

The 739 has a primary and a secondary 
character set. The primary character set is 
the standard 96 U.S. ASCII monospaced 
characters. The secondary characters 
sets include switch-selectable sets for 
France, United Kingdom, Germany, Italy 
and Sweden/Finland. The 739 is available 
for either parallel port or serial port config- 
ured applications. Both printers link up 
with the host device via 40-pin edge con- 
nector cables. 

The 739 uses a unidirectional print head 
that slows It substantially. But it has 
some excellent features including sup- 
port of underlining, proportional spacing 
for justification, elongated characters (in 
both the 10 cpi and the 16.7 cpi modes), 
backspacing and half line feed forward 
and reverse for subscripting and super- 
scripting. It also has a select graphics 
mode. This mode provides 75 horizontal 
and 72 vertical dots per inch for good qual- 
Hy resolution. 

In addition to these good features, the 



ded In each print command, because the 
end of a print line terminates the elongate 
mode. This is not clearly stated in the 
manual. It is mentioned but like most im- 
portant information, only obliquely. 

The Centronics 739 will be a solid seller 
because Centronics will stand behind the 
machine with service and backup support. 
If this is important to you, the 739 is a 
good buy. There are other printers on the 
market, however, packed with features 
and much less expensive. ■ 



739 has some poor features. Its most obvi- 
ous shortcoming is its lack of speed. All of 
its control knobs are located at the bot- 
tom along the front portion of the cabinet 
where they can be difficult to see and ma- 
nipulate. The paper advance control 
allows single line advance or continuous 
advance; there is no form-feed control. 
The operator's manual commits a series 
of sins of ommission. For example, to 
place the printer in the elongated print 
mode, the control codes must be imbed- 

PROPORTIONAL NORMAL 
'■■»*%£.'O«-.,-./0I23A56789;Ki:- 
3ABCDEFGH1JKLMN0P0RSTUVWXY1[\]'_ 
' at) cde f g M jkl mn op qr s tu V w X y 1 C 1 > ■>■ 

F'l^OF'OFZTIOlSIA.L ELCD JSrC5 A.TE13 

!■■ #*v.Er'<>-»n-,— .roi ii^sA^-^T'S"? :;<=>"' 

CBA^BCDEfCjMia'ICl-lylNIOF'ORSTUV^WX'VZ C X D ^_ 
'^ti crd^-Fg hi jk.lmnapqi'^'tLjN/ w acy 2 C I i**- 

10 CPI NORMAL 

eABCDEFGHlJKLflNOFQft'jTUyWXrZCN]^. 
' dbcclt^fghi jk lnnopqrstMvw:;yz'.' | J ■• 

10 c F- 1 f: i_ tD M r; A X e: o 

- <3 li« ^r^ cJ ^ -f" t3 »-» i. j l< ± #-» f-i tu f> t^ i- fs t i_i %• t,s» i-i :j :z: •:! | I:- 

U.7 cri nwL 

'■■Hll'lli*,-./llZ31547B?:;<>>'> 

I A. 7 CPI ELONGATED 

! "•♦Xi' < )»+,-. /01Z3'^5A7S9: ;<=>? 
eABCDEFGHIJKLMNOPQRSTU<.»HXYZi:X3«_ 

fig. 1. Print Samples 




The Centronics 739 
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Coosol 101B-80E Printer 
Coosol, Inc. 
Anaheim CA 

$495 'Kit) 

by Peler E, Noelh 

I have (■•erracecJ a Model 3£ te etype anc 
a ScecUic typewriter Ic my TPS-80 aro 
anhoiiCl" 'fiese prov;aed the prir>*out ' 
needed ■ still felt I lacked certain features 
that are normally found m a doi-matnx 
primer, i found those features, n the 
Coosol 101B-80E printer. 

The printer mechanism rs a C.lTOH 830 
with pin-feed platen accepting 1 to 9 
1/2-in. paper. The controller board provid- 
ed by Coosol uses a Cybernetic 
Microsystems CY-480 printer controller 
chip. This controller chip is a masked 
ROM microprocessor designed tor a varie- 
ty of dot-matrix printers. The basic 
features are: 

• 5 by 7 dot-matrix character generator 

• Full ASCII 96-character font 

• Internal 48-character line buffer 

• Graphics capability 

• 32 system level commands 

• Baud rate selectable (1 10-9600 bps) 

• Built-in self test 

• Parallel port with handshaking 
Coosol uses two CY-480s in its control- 
ler board which gives a preset line buffer 
of 88 characters. This is the only disad- 
vantage ! have found in this printer. The 
problem is that there is no overrun protec- 
tion in the buffer. If you output more than 
88 characters without a line terminator 
(CR or FF), you lose the additional charac- 
ters up to the terminator. 

The construction manual is very com- 
plete and easy to follow. If you have ever 
put together any Heathkit equipment, you 
will note the stmularity, It takes you step 
by step through the construction of the 
printed circuit board and the wiring of the 
power supply. The printer is pre-wired and 
requires only the drive motor and print- 
head cables to be plugged into the con- 
troller board. The case is made of molded 
ABS plastic, and is in two parts. The upper 
half provides the mounting surface for the 
function switches (test, linefeed and re- 
set) as well as the power switch. The lower 
half provides the mounting surface for the 
printer mechanism. By themselves, the 
two parts are very pliable and do not ap- 
pear to be very sturdy but, once assem- 
bled, they provide a sturdy, handsome 
housing. 

The reference manual provides you with 
ail the necessary functional and opera- 
tional information pertaining to the print- 
er. It also gives examples of the software 
driver routines to be used with six dif- 



ferent microprocessors (inciudina the 
280). 

A software commano mstructicn chart 
s provided showing the 'unct'on of the 32 
non-prirtab'e ASCI" ccmmarcs. An appli- 
cation note covers the graphics cperat.or 
which allows you com^p ete centre' ever 
each ptTt hammer to prnt whatever pat- 
tern ycu program. Schematics are includ- 
ed tor both the controller board and the 
power supply. Coosol wiH provide you 
with documentation on the printer me- 
chanism on order, but there was no indica- 
tion of cost. 

One item not covered in the manual 
clearly, although timing diagrams are 
given, is that the strobe pulse must be a 
minimum of 4us in length. The TRS-80 only 
outputs a 1,6us pulse, so additional cir- 
cuitry must be added to provide a pulse 
stretcher, I chose to add a small circuit 
board containing a 74123 I.C, to provide 
the necessary strobe. Another possible 
way is to modify your expansion interface 
by adding a 470pf capacitor in parallel to 
the timing capacitor 064 at location Z29, 



It took me about six hours to complete- 
■y assemble the un'' it worked the tirst 
! me using the lest sw.tch lo print the 
character ger era'ot contents ' then bu''t 
ar interface cab.e Ic co between the ex- 
pans'or -ntertace anc \he printer When i 
tr ed to output to thepr nter my expars.on 
nterface deciceo lo go south '. ano my 
system no 'onger funciioned. As i later 
determined 1 was the 5V regu.ator chip 
that failed, but in the process it took the 
input buffers and both of the CV-48C chips 
in the printer A call to Coosoi with my 
problem resulted m a most gratifying ex- 
perience of cooperation on their part I 
returned the unit to them and received it 
back within 10 days completely checked 
out and working. My only cost was for the 
replacement parts. I would suggest that 
anyone purchasing this unit install 
sockets for the input buffer I.C.s— just 
in case. 

I am most pleased with the addition of 
this printer to my system and would rec- 
ommend it to anyone wanting reasonable 
print capability at minimum cost.H 



REMASSEM-1 

An Introduction to TRS-80 

Assambly Language Programming 

Joseph E. Willis 

Remsott, inc. 

Euclid, OH 

$69.95 

by Jim King 

Some time ago I attended a short 
course on TRS-80 Assembly-lan- 
guage programming (ALP). I came away 
with a lot of papers, some confusion, and 
not much interest. I didn't feel confident 
enough after taking it to do any ALP. 
About the only thing that I got out of the 
course was an acquaintance with Assem- 
bly instructions in mnemonic form, such 
as LD, PUSH, POP, EX, ADD, SUB, INC, 
DEC, etc. Most of the demonstration pro- 
grams were to manipulate the video which 
didn't interest me. 




I have just finished the REMASSEM-1 
ALP course, and now feel that I am on the 



road to becoming an Assembly-language 
programmer, This course consists of eight 
cassette tapes, a text book, and a manual. 

Five of these tapes contain 10 40-min- 
ute lessons by Joe Willis. His lecture is lei- 
surely, detailed and starts with descrip- 
tions of the basics— binary, octal and hex 
number systems. His occasional humor is 
a welcome relief from what at times can 
be a difficult subject As usual, a lot of im- 
portant information is given verbally by 
the teacher, and is not on the display, so 
taking notes is necessary. 

The display cassettes are of very good 
quality. They have a higher signal level 
than many that I have used, and there 
were no failures to load. All of the dis- 
plays, except the example programs and 
the last lecture, are in large characters (32 
per line). You can even direct the display 
to start over at section headings in a menu 
without reloading the tape. 

Also included is the third printing of 
Barden's TRS-80 Assembly Language Pro- 
gramming book as the text. 

The course manual describes how to 
load and run the display tapes, and has 
flowcharts and source Assembly-code 
listings for two useful programs: Quick 
and Dirty Memory Test, and Print state- 
ments to both the screen and printer. I 
found that I wanted to follow both the 
code and the flowcharl at the same time 
while he discussed them, therefore I re 
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Now my accounting systems 
run on CP/M as well asTRSDOS. 

So they'll work with your micro, 
no matter which it uses. 



I'm Irwin Taranto, and I originally designed my 
Model II systems to work with TRSDOS, the operating 
software Radio Shack supplies with the TRS-80. 

I designed them extremely carefully, w^ith features 
other microcomputer accounting systems don't have. 
Mine all integrate with the general ledger, and, 
where it helps, they integrate with each other. 

My general ledger system gives year-to-year 
comparisons, in dollars and percentages. It figures 
budgets and it even has a report generator. 

My accounts receivable systems can do sales 
analysis by product code and figure in salesmen's 
commissions. They generate mailing lists by customer 
code or zip code for up to 2000 customers. 
You can choose either an open item system or a 
balance forward system w^hich w^orks on a cash or 
an accrual basis. 

My payroll system can handle up to 600 
employees m multiple departments, with any state 
tax routine (we provide them all). It can make any 
miscellaneous deductions you ask it to — it even 
does tips and meals. 




TRSDOS and TRS-80 aie tiadomarks of the Tandy Corporation 
CP'M is B iTBdemaik at Digital Reiiearch Cnrporaiion 



My inventory control system stores up to 5000 
items. It can report by vendor, tell you when you're 
out of stock or when you need to reorder. It can 
update price or cost automatically, and integrates 
fully with my invoicing system. 

There's a lot more, too. Over the years, I've 
had thousands of phone conversations w^ith 
my customers, v^orking out the bugs and kinks and 
adding desirable features Everybody talks about 
"user-oriented" systems, but because of all these 
phone calls, it really means something when I say it. 
These may well be the most thoroughly researched 
small business accounting programs in the world. 

They're also the best supported, at least as 
far as microcomputer systems go. If you have a 
problem, just call. If your problem is tough enough, 
I'll get on the phone myself. There's no charge for 
phone assistance, ever. 

All these calls keep me upgrading my systems 
constantly. If you own one, you're eligible for a 
standing offer I've made all along: send me your 
diskette, and I'll send you the latest upgrade for 
only $25. 

Now I've taken another step. More and more 
owners are switching over to CP'^M software these 
days. It seems to be where the whole microcomputer 
industry is heading. 

That's fine with me, because I've just converted 
all these accounting systems, and can sell them for 
the prices I've listed: 

General Ledger/Cash Journal $ 299 

Accounts Payable 'Purchase Order 349 
Open Items Accounts Receivable Invoicing 349 

Balance Forward Accounts Receivable 399 

Payroll 299 

with Job Costing Option 399 

Inventory Control 399 

For mail-order programs, these prices may seem 
high. But for serious accounting programs, nothing 
can touch them. 

Michael Tannenbaum, the "80 Accountant" 
in 80 Microcomputing, just called them "a very 
impressive product at a very reasonable price," 

Our TRS-80 Model I and Model III systems 
aren't quite as sophisticated. But they're tremendous 
buys at $99 each ($149 for general ledger). 

So call me and take your choice— CP/M or 
TRSDOS. Same price, same support. My systems 
are ready and waiting. 



Taranto 

45 & ASSOCIATES, INC. 



121 Paul Drive. Sati Ralaei CA 94901 

Outside California, toU free (800) 227 2B6B In Cahfoiiiia, (415) 472-2670 



■ Sae List ol Advemsers onpag«418 
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moved the plastic binder so I could put 
pages s(de~by-side. The back part of the 
manual contains 13 pages from the Zilog 
Z^ CPU Technical Manual listing the in- 
structions in grouped form, handier than 
the alphabetic listing in the Radio Shack 
Editor/Assembler txxik. 

Also included in the package were sev- 
eral self -addressed fold-up sheets for ask- 
ing the programmers at Remsoft ques- 
tions on the course. 

The Quick and Dirty Memory Test writes 
all zeros into a memory location, tests if 
zeros are actually there, then writes all 
ones into the same location. It repeats 
this for all locations above the program in 
memory and displays all errors. The line- 
printing program is more complex, and 
outputs all Print statements to the screen 
and printer together after you type a shift 
P. This is very useful. As "exercises for the 
student" he suggests improvements that 
can be made in each of these two 
programs. 

In Lesson 3 Willis explains in detail 
which commands affect the status flags, 
and how to use them for branching. He 
strongly advocates breaking problems 



down into very small tasks and doing 
them by subroutines, i.e., modularizing. 
He demonstrates extensive use of subrou- 
tines, and a few of the ROM routines In his 
two example programs. 



"The final summary 

is full of 

excellent design 

suggestions." 



To key in programs you will need an edi- 
tor/assembler that uses the Zilog instruc- 
tions, and T-Bug or DeBug (not supplied). 

He recommends for further study three 
references: Barden's Z80 Microcomputer 
Handbook. Sprackien's Z^ and 8080 As- 
sembly Programming, and Leventhal's 



Z80 Assembly Programming 

The final summary is full of excellent 
design suggestions, such as forming a de- 
sign before coding begins. Willis does not 
specifically recommend flowcharting, but 
he does recommend that the problem be 
completely defined in general terms and 
the task be sketched or outlined in terms 
of the language you are using before you 
begin coding. After coding on paper be 
recommends that you step through the 
program by hand, executing the code you 
see before going to your computer. His list 
of common errors should t>e in front o1 you 
while you code and while you debug. 

I benefited considerably from this 
course. It seems to be about the most 
painless way to learn Assembly-language 
programming. I think that for the beginner 
this is a good way to start, and it provides 
a good foundation. 

I would like to see a follow-up, ad- 
vanced course. 1 do not feel that I am an 
expert, but I have a much better handle on 
it now than I did before taking it For 
anyone who is thinking of learning Assem- 
bly language, this is a very worthwhile 
introductory course.! 



Computer World 

Kraftuwrk 

Wamor Bros. Records 

S7.99 rKortV$8.95 tape 



by Chris Brown 

80 Microcomputing staff 



It is not surprising that Kraftwerk, a Ger- 
man band known for anticipating pop 
music trends, has been seduced by the 
microcomputer This progressive comt», 
already with such classic (if unheard of) 
albums to their credit as Autobahn and 
Radio Active, has not been able to resist 
the simple dualism of all those ones and 
zeros or the antiseptic allure of the com- 
puter room. Kraftwerk has discovered the 
melody of the microprocessor. 

Their latest album Computer World has 
a microcomputer on its cover. Some of the 
song titles are: "Computer World." 
"Pocket Calculator," "Numbers," "Com- 
puter Love," "Home Computer," and last 
but not least, "It's More Fun to Compute." 

At first the music sounds mechanistic 



and the lyrics simple minded. Repetitive 
rhythms played through heavily synthe- 
sized keyboards accompany synthesized 
voices chanting one or two-sentence re- 
frains—for instance, "I am the operator of 
my pocket calculator, I am adding, now 
subtracting. I am the operator of my 
pocket calculator, . . ' Or, 'I program my 
home computer— beam myself into the 
future." 

Lyrics aside, the songs will hypnotize 
you with their haunting, melodic refrains. 
The depth and range of the synthesized 
keytxjards and the intricate syncopation 
of the rhythms in Computer World are 
fascinating. I found myself listening again 
and again to the title cut whenever I felt 
the need for some easy listening. 2001 
style. 

Computer World's rich harmonies and 
Interactive rhythms reflect Kraftwerk's 
view of the microprocessor age. Listening 
to the music, it is easy to visualize the in- 
ner regions of the processor where sig- 
nals control and consort amongst layers 
of circuit etch and gate logic. Listening to 
Computer World Is like taking a swing on 
the crystal lattice jungle gym of an LSI 
chip. It Is exhilarating! 

The album's theme, however, Is less 
lighthearted. It seems to be a confused la- 
ment against technology (the same tech- 



nology that made this album possible), 
especially as used by government and big 
business. The FBI, Interpol, the Deutsche 
Banke and Scotland Yard are specifically 
mentioned. 

Another disturbing aspect is the 
album's back cover. The group s four 
members are pictured around the console 
of an antiquated electrical panel Holding 
mechanical poses, the closely shorn 
members of the band are clad in the 
brown shirts and ties of the Hitler Youth. 
In tact, the scene seems a cross between 
the Germany of 1938 and the technologi- 
cal surrealism depicted in the 1927 German 
film Metropolis. It may not be fair to as- 
sume that Kraftwerk has equated technol- 
ogy and the age of the computer with to- 
talitarianism, but they do seem confused 
about It! 

Computer World is not likely to be one 
of the platinum albums of the 80s. but the 
price of innovation Is often anonymity. 
The album's portrayal of the computer, 
especially the microcomputer. In synthe- 
sized melody and syncopated rhythm is a 
clever approximation of what goes on in- 
side a microprocessor. If you have ever 
fantasized about the domain of the micro- 
world within your computer. Computer 
World is for you. The music of Kraftwerk is 
the backbeat of the computing age.H 
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PROVEN MONEY MAKERS FOR YOUR TRS-80* 

"Tandv Corp Trademark 



Provide your customers with 6 C ALEN DAR $9.95 

printed calendar (dlong with standard banker's holidays) ot ar\\ 
month of any vear Useful in motivating history students. Holds 
the same fascmatiofi for students as a game Tape onlv for 
Model I or 111 



llT '^T""' ^' Calendar SUPER CALENDAR 

Add it ion ally prints out large 

"graphics" type wall calendars (tape only) $19.95 

with memos under each day Use as a planning calendar wiih 
optional disk storage requires IfaK and printer 



MAIL LIST SYSTEM (di»koniy, $69.95 

Our easy-to-use system will accomodate almost any "custom" 
requirement of even your most demanding clients A glance 
below will show that we are far ahead of any other system in 
speed, variety of features, and sheer volume of names 
handled hut don t let that fool you. This system can be used 
|ust as easily on one disk for a small Christmas card list 

• Maintain virtually an infinite number of disks all in cnn 
linuous alph or ^ip order essential for large lists 

• Sort 2320 entries {2 full 41) tr at k double density disks) in 
only 32K or an incredible 4640 entries (2 full 80 track 
double density disks] in only 4flK'...Made possible with 
our unique date compression techniques on the Model III 

• Super fast sort by alph or ?ip order (8 sec for 1000 
entries) both orders can exist simultaneously on disk. 

• Hrgh speed recoverv of entries from disk speed of sort is 
meanmgless if retreival from disk is slow ours pulls in 
over n per sec' 

• Transfers old files over to our system 

• In £ip order all entries with same zip iode are also 
arranged alphabetically 

• Four digit 7.ips have a leading "O" appended on labels 

• Backup data disks are easily updated as entries are 
created, edited, or sorted extremely useful" 

• Optional reversal of name about comma for that noo 
computer, personalized look 

• Master printouts of your list in several formats [not lust a 
rehash of the labels) Optionally continuous or page 
oriented Your customers will want this' 

• All s m address labels are replaced by easier to read O's 

• All labels optionally support an "Attn " line 

• Many user defined fields with plenty of options for 
simultaneous purging and selecting.. .even allows for 
inequalities powerful and easy to use!! 

• Continuous display of how many addresses printed 

• Each disk entry automatically "remembers" hov%' many 
mailings have been made for that particular entry Can 
be tied in with purge select 

• Primarily written m BASIC for easy modification 
embedded machine code for those speed sensitive areas 

• Editing is simple and fast automatic search 

• Optional "5 digit zip 

• Deleted entries have "holes" on disk filled automatically 

and alph order is still maintainedi 

• Test label printing lets you make horizontal and vertical 
adjustments with ease 

• Optional one time" mailing for some selected entries 

• Extensive use of error traps {both operator and machine 
induced) even recovers from a power failure during a 
printout' recycling on disk errors 

• Patch program allows vou to upgrade the system to 
any DOS 

• Documentation manual available separately for $3 93 

• Hardware requirements 32K printer, and 1 or 2 drives ■'" 



Football Scouting Report (°;;J) $89.95 

How many high schools and colleHes .ire there within a 7S mile 
radius of you? Did you know that each is a potential customer at 
the rate of from 5S(X)-51I300 per sea'.or' Manv already subscribe 
to more expensive (but inferiorl computer analysis services of 
their scouting reports Using such a ser .ice a coach will typically 
have an opponent scouted several times prior to actually playing 
them This series ot programs was written to the specifications 
of a coach with two state rhampiorships to his credit As a 
result, the emphasis is on producing 'talistics that will help m 
predicting what the opponent will do ir a j^iven situation This is 
a sophisticated set of programs fully equivalent to that used by 
professional football teams Hardware requirements i2K. 1 
disk driver and printer. 



TRY OUR ONE DAY PC BOARD SERVICE 



Tic-Tac-Toe 



(Tape imly] 



$9.95 



$19.95 



loan amortization sche- LOAN AMORTIZATION 

dules are a must for banks. 
S & L institutions, and 
accounting firms You will (Tape ortly for Model I & III) 

be able to charge %'j plus per schedule Multiply that times the 
number of all loans your clients make per day easiest monev we 
know of! runs in about 2 minutes and achieves pin point 
accuracy with a built in calendar This sophisticated piogram 
produces an exceptionally professional looking printout 



Interlaces to your own 
basic programs sort with 
the speed of machine code 
but with the convenience 
of basic You don't have to 



FAST SORT 

(handles multiple dim. arrays) 

ALPHABETIZER 

(disk only) $19.95 

know assembly language programming to use these programs 
lust use your disk to merge our short basic programs (with 
embedded machine code) with your own basic program Follow 
our simple instructions to poke several values before making the 
user call from basic The pokes will set up a sort of string, 
integer, single, or double precision a'rays Also ascending or 
descending order is controlled by a single poke Use one of two 
programs to sort arrays of the form A(1) or A(Q(1)) The disk 
includes 8 simple basic programs that are ready to merge with 
the main sort programs Use them for learning and 
evaluation Also included is a read\ to use basic program 
[already merged with the ORDER projjram) Use it to obtain a 
printout of alphabetized names This program alone is worth 
51995 

Sample Sort Tirres 
8 sec for 1000 dbl prec numbers 53 sec for 5000 integers 
(Ours IS one of the onlv alphabetizers tf at both ignores non alph 
characters and treats upper and lower case alike ) 



Sign 



(Tape only) 



$9.95 



Produce large (reduced 50% here) attention getting signs with 
your printer supports most keyboard characters will print 
multiple lines use alone or interfai e to your own RASIC 
program, requires just over 16K and a printer 



55S5S!'.SS 


nrTTTTTI 


(OTKOIi 


iwtwn 


S? >S 


nTmin 


If! 


«' 


« ft 


s; 


m 


» 


» 


H M 


SSSStSS'.i 


m 


fCi 


(If 


i«**m* 


SSSSS«S? 


nr 


(Ti 


[<■ 


P«*f1¥»* 


Sj 


TII 


Hi 


HI 


» 


'.< 'i 


ni 


* 


iXl 


» 


■j;'.s'.='.^-. 


TTT 


cmottc 


w 



aneanr xootno >> 



111 ot' 






«i o w 

(C MO 

Ml rm 

» II o 

Da It u 



i> 






Precision Prototypes 



^10 E R.x.) 

ReluRiii. }\ "ftC 

,Si;.52h-4758l 
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Sargon It 
Haycton Book Co. 
Rochelle Parte, NJ 
$29.95 

MyChttss 

Programma International 
Canoga Parte, CA 
$34.95 

Gambivt 

Mlcrotrend, U.S.A. 
Louisville, KY 
$39.95 

SFInks 

William A. Fink 
Lighthouse Point, FL 
$29.95 



by Randy Jenne 



A tournament among microcomputer 
chess programs — it sounds like a 
simple enough idea. Well, after contact 
ing the local Radio Shack Computer Cen- 
ter manager, who gave me tree use of his 
facilities, I began the task at hand. Forty 
hours and one carton of cigarettes later. 
here are my results. 

The first hitch that I discovered is that 
there is much more to a computer chess 
tournament than simply determining 
which program wins the most games. Fea- 
tures such as speed, book moves, graphics, 
board set-up and think-time display must 
also be considered. I have, therefore, set up 
a number of grids to most accurately re- 
flect the relative strengths and weaknesses 
of Sargon II, fvlyChess. Gambiet 80 and 
SFinks. The ratings of some of the features 
such as graphics and board set-up are 
somewhat sub)ective and reflect personal 
preference. However, the majority are ob- 
jective, and can be used to compare with- 
out bias. 



MyChess 

MyChess probably plays the strongest 
ov^all game It plays aggressively and 
quickly, making the most of its moves in 
well under three minutes. The main pros of 
this program are: thinking on opponents 



time, setting time limits and saving up to 
Six Jn-progress games on a disk. The main 
cons are no thmk-time display, poor graph- 
ics (meant to verify a real chess traard I 
suspect) and an inadequate board set-up 
option (pieces can be moved and removed. 
but not created). 
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COMPUTER INTERFACES 
& PERIPHERALS 



SVSTEMS 



*ANNOUNCISG: POS 800/1600 UNIVERSAL T*PE DRIVE CONTROLLER * 

Thii "black bo>" conlrollcr/formitier ii desigrKtJ a i iUndilone inwrtacr 
bclween induslry-iUndird S'RZl 1800 B Pi] *nd PE (1600 B PI] lipt drrv« and j 
pdrillrl or RS-212 wriil port ot in 8-bil ASCII compultr. Serijl interlice emulites 
a lerminal vis-a-vjs yoursviWrn ioftwjrc, parallel Inttrfjte frnulales j rtidcr/punch 
and ifipondi lo CPM-slylt PIP comminds from ynur computer. Tipt speeds 12, S, 
25 jnd 37.5 ipi Inlerfice ii microproceisor-curiirollcd, includci power suppiv and 
4Kor 16K bulter memory Pritrs jnil dcUili Ji Jiljble joon rcguesl. 

• POS 100 NRZl TAPE DRIVE CONTROLLER/FORMATTER No. vnur 

miL'O Cin lejd and »rilr IBM/ANil iompjtibit NHZl formal 9-lrjcl, migneliC 
lipcs The POS-100 coniiiis ol SI 00 bui card, ti ribbon cable, lape Jnve conlrolle' 
cird, cabtc to Pertet-Sundjrd NR/1 Tape drive, plus documrnution ind Z-SO or 
80H0 lotiwirc ispecifiv I. Powe' is dcn.rd from Upe drive and S-100 bus. Ship Wl,. 
1C Ihs SuRgcsUd Kciall Pri>.e 1995,00 

• POS DAISVWHEEL PRINTER INTERFACE fot TRS 80 Will drue Dublo 
HvTyP* I, Hilvpf li, jnJ Oumc Q jnJ Sprmi ? pnnrtrs lOLludv^ IK uicr- 

j'.jilable memork 'oi ^iiitom print -oijiinei \\\ji.h as S'apl'ii*. bidireidonil pnnl- 
mg, ctt I. Programmed lo respond to pnnl tommandi tiom B-VSU flECIKIC 
PFNCIL™ and SLRIPSIT'" wtlwart, Oriws ili power from prifiier Ship *i ■ 

5 lbs Pricf tJ'iOOO 

f.iblfs, each ISpciifv HiTvpr I. Hvlvpe II, orOumc! S 2'i.OO 

• POS ASCII INTERFACE fo' IBM I/O SELECTRIC I hn Crntr.jnicv.1vle 

parallel pdrilf interface « ill dii.t an IBM Miidel 711 ni 735 I/O lypcwriter 
(1 HCIJ and Correspondence codesl. No sort ware needed. Features on hoard LP ROM 
nhicM holds 11(1 til S ASin-io-IBM Lodr tables 'or dil'crcnl Ivpc spheres Closed- 
loop operation runs at mjnimurn printer speed, slups and starts on a sjncle character 
wilhout toss p( data, Reyuires 'liVDC and 'SVOC po-cr lOuicr. Ship »t, 

S Ih, Prue , i249 <>', 

Po-tr Suppl, l-'^VDC •■12V[)C, *2-iVUC tor Solenoid* on Pimtet) % -19 95 

• CONVERT OFUCE SELECTRIC TO I/O TYPEWRITER Kit includrs 
j.simb.fd sii.iT^oiai ,1. It, tics, -I'l- lurnrsv "'J^ncl dri.ir PCB plus insliijtlnins 

to' insLJllation and mCPl. inicrrdCi;, Vnce $1'iU,(JU 

• 'FORMALINER" Variable Width Forms Tractof lor 15 Scleclrii.s , , , 195,00 

• C.TE Model S60 ASCII ^ELECTRIC I/O Terminal - Wilh KS-232 Serial Inlcrtave 
jnd jL^itj' .anctte di'.k tu' me as memory tspfwriter. Ship wL: 100 lbs. 

Price, u-,i,j jnj jdiusled tl,I95,00 

• POS ASCII IBM SELECTRIC PRINTER 15 Selectric trom GTE terminal 
i leaned and adusted »itn POS Crniromcs-sis le ASCII primer inter taci". UC/LC, 

carbon and fabric ribbons Compatible witn TRS-fiQ, Apple, SOL and uitier Cl't; 
parallel printer purli SHin*l 7 5 lbs. Pri^e ISy^.UU 

PACIFIC OFFICE SYSTEMS ^ 153 

3265 Old Middlefield Way • Mountain View, C A 94043 • (415)493-7455 




TIME ... 

METHUSELAH" has time for you 
and your TRS-80 



The nrtme Methjwlah htiK nlwavB \wvn assiiciiitrd wilh loni; life Thi- Methuselah 
computer clock bourd with itit '24 hciurfloi'k and its perpetual calendar m indeed worths' 
oflhctillf Mplhuselahput«8lattoflheiii1techni)U>(ty into action with the on hoard four 
year lithium haHtry bark up li> keep il running even when yiui computer is off That 
means no more liiohnx dri'Und with the ik>riwareor hardwiire clocks" that become Kip 
Van Winkles when the computer is reset or turned off. 

MelhuBtiah has many other limelv fealurtB. Software patches keep the IXlSand BASK" 

time and clock [•■immands iKking. Only two screw's mount Methuselah mmde theexpan 
sion interface withiiut soldennK, clippinK. cultinK. iir jumpering Then- is even a spare 
10 port and four different interrupts available for people siho love to tinker. 

'nVY.VS MM [)!) YY, HH MMSSaniidayofthe week Four year lithium battery 

hack up L'ryslal controlled timmu ladjuslable \1 7li« oscillalorl. Twenty fiiur 
hour clink and perpetual calendar 



Send check i 



mdlmi 



NDM DESIGNS >'135 

Wiuwalmi Wl S3:i3 
I4I4I JS9-0<2a 



M-Sl S9TTO 

(addS4-50PandH) 

S«l .... $17.50 

(add $2.50 P and Hi 
< If you wiah to use MethuwUih 
and the RS-2.12 board <2n iur>l 
InRether. order this option which 
includes a new nivtr and con- 
nector.) 
Wl residents add 1"^ sales tax 



METHUSELAH iI ■ 
it rT<iF> ol NDU Dasignt 



PUBLICATIONS for the TRS-80 Model III 

Mytltry of \U% ROM Myitary of tha DISKETTE 

Hi%^*r^ of lh« DOS t1 S.06 MCh 

Musi wUitiora lo the computer loiary o( the serkius 
P'og'arT>mer as Aell as Ihe casually interested Written 
n a -echi cai /«■ pasy-io-read and understandable slyie 
Each book includes: 

• detailed tables of conienis ana indexes, aipiabeticai 
ana numerical tables with njn^erous cross relerences. 

• register setup QOing mio routines 

• register resuHs connir>g out of routines 

• detailed exptanaiiors on all routlr>es. structures. 
codes, elc. and not jusi a few arnbiguous conments. 

• Numerous summaries for ease ol txmk use. 

Special ... all thrM >49.95 
SORT/CMD 

• multi-key (to 14 f.eids). MuHi-iagdo 14 n>ore fields) 

• son any cornbmalion ol vanaMe type 

• lT«()'-i'«)-. pasiiy tnio any existing program 

$1 9.95 MCh O/sfc or noirdistf. Model ' w W. 32K or 48K 

PATCHES 

lo aitow operation ol rnany Modet I programs on the tModei III 

• LM OFFSET/CWD SuperzapCMO' 

• BSM 2DCMD lOK 32K. 4«K' 

• Big F ve Software Games (all garnes}* 

$5.95 MCh Many more send tor brochure! 

DISK DIRECTORY MDIX PROGRAM Model m onw 

• Man:^ ' 1 -nasipr directory listmg a' J I I-j j diskettes 

• Index Size limited onty by dtohette space available 
and number o^ diskelles on wfich (he index win tie 

maintained, 

• Summary by lie narre. diskette, or e«tens»on. 

DIrect/BAS S14.9S 

DirectyCMD $24.95 terv»a/>cetf more powerfu! tasier) 

-.uriii cr-.ecK o' Tiorio, ^jidc- iKj \idi ruskln-:-; 
iidd 3% sales tax] to Twanty-Ftret Century Sotiwere 
1B07 Horth Cochran Hulehlneon. Kanaac 67601 
C-t/ 119 $$3-1047 tO' aaaHronal jn/ormaf/on 




mms/kRi] 






18 



• Sm Liii of Aa*9ft'S»rs on page 418 
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so REVIEWS 



SFlnks 

SFinks plays the most conservative 
game ot the four (games often stretch to 
seventy moves or more). The tie for first 
place may also be somewhat misleading. 
SFinks used more than its allowable three 
minutes per move while playing on the rec- 
ommended tournament level, it seems to 
average about three minutes and twenty 
seconds per move at level eight. 

SFinks standing may have been differ- 
ent on a lower level of play. The graphics 
and think-time display are. however, very 
good, and SF'nks is the only program that 
gives an audible signal to indicate the 
completion of a move. 

Gambiet 80 

Although Gambiet 80 won only one 
game in the tournament, that fact is not in- 



"All four Of 

these programs 

play excellent 

chess, considering 

their size and 

clock speed." 



dicative of the strength of the program. It 

plays very competent chess and all its 
games were hard-fought battles. Its fea- 
tures are definitely the most impressive. 
The think-time display shows the move it is 
currently considering, the best move it has 
found so far, and the numberof moves left 
to evaluate. The chess clock, graphics 
and minimum system requirement (16K 
Level II) are also plusses. 

Sargon II 

Sargon II, although it is over a year old, 
still has a few things over the newer pro- 
grams. It can be played on a 16K Level II. It 
is tied with SFinks as the least expensive, 
at $29.95, and it still has the easiest and 
most versatile set-up mode. Some of the 
new features such as printer option are 
lacking in good old Sargon II. 

All four of these programs play excellent 
chess, considering their size and clock 
speed. Anyone from a beginner to a fairly 
ad'^anced playef should be satistied with 
any of these programs.H 



More TPS-80 Basic 

Inman, Zamora and Albrecht 

John Wiley and Sons, Inc. 

New Yorlc City, NY 

Softcover, 280 pp. 

$9.95 

By Alyson Grupp 

Have you read everything about 
microcomputers that you could get 
your hands on, but still feel like you're 
missing something? Are you striving dili- 
gently to bridge the gap between begin- 
ners' Basic and "real programming '? 
More TPS-dO Basic, a new addition to the 
Wdey Self-Teaching Guides, is an intro- 
duction to some of the more esoteric as- 
pects of using and programming your 
TRS-80. This book will replace your vague 
ideas with solid definitions of such di- 
verse and interesting subjects as graph- 
ics, animation, disk and cassette I/O, and 
the use of sound with Basic programs. 

The overall composition of the book is 
excellent. It has an open layout liberally 
sprinkled with illustrations, allowing the 
reader to quickly locate any particular 
piece of Information. New ideas are easily 
understandable. Clear explanations are 
followed by both subtle and not-so-subtle 
reiterations, ensuring that the reader fully 
grasps new concepts before moving on. 
Occasionally, the authors may appear to 
dwell too long on a single subject — but 
it's easy to skim past the repetition if you 
already understand the subject, and you'll 
appreciate the reinforcement when you're 
still struggling with something new. 

Excellent summaries are found at the 
end of each chapter. Self-tests appear 
throughout the book, generally at the end 
of each chapter, but are also embedded 
within those chapters that cover especial- 
ly difficult or complex material. 

In keeping with the advanced emphasis 
of the book, the more common Basic com- 
mands are dispensed within the first few 
pages of the book. They are listed with 
concise, lucid definitions, and serve as a 
handy reference when the meaning of a 
particular term slips your mind. 

The text itself begins with an explana- 
tion of ROM and RAM, paying special at- 
tention to the differences between the 
two. The second chapter moves quickly in- 
to a well-guided "Tour of Memory Land". 
Suddenly, things begin to come clear. For 
example, a response to the memory size 
question does more than merely reserve 
memory. The authors explain very clearly 
what memory is reserved, why it must be 
reserved, and when it must be reserved. 

One rather lengthy chapter contains 
full explanations of the TRS-80 arithmetic 



and trigonometric abilities. Personally, i 
found these far less interesting than the 
extensive graphics technique taught by 
the book. Graphics can be created using 
Set, Reset, POKE, CHR$ and STRINGS 
commands. Detailed information is pro- 
vided on each of these methods, and ex- 
amples of characters, games and draw- 
ings are given. 

Chapters dealing with graphics and ani- 
mation make terribly obscure points seem 
simple and logical. Best of all. you learn 
sophisticated techniques that work. You 
are given opportunities to try things out 
and experiment with your newfound 
knowledge. Examples are tnoroughiy ex- 
plained, step by step, and it ,s simple to 
apply the techniques used to your own 
programs When the sound capabilities 
learned in a later chapter are added, your 
programs can become more sophisticated. 

Your understanding of what your hard- 
ware does and how it does it will also grow 
with this book. Both cassette and disk 
storage are covered in some detail, and a 
sample data file is set up using each 
media. Using these media to the full ex- 
tent of their capabilities will enhance both 
your programming skills and your enjoy- 
ment of your computer. 

Sufficient cautions are given on the 
danger of indiscriminate POKEing and 
other potentially destructive acts. I 
searched in vain, however, for any men- 
tion of the fact that disks should not be 
left in the drives while power is turned on 
or off. 

The inclusion of a short sort routine 
would be extremely helpful. The authors 
skirt this issue in the sections on data 
files by having the data entered in alpha- 
betic order. 

One other annoying, although minor, 
point deserves mention. There are too 
many Radio Shack ads in this book! By 
following the advice ot the authors, the 
reader would end up with Radio Shack 
disk drives, disks, power strip, disk box 
and bulk eraser, not to mention software. 



'Excellent summaries 
are found (for) 
each chapter." 



All In all, this book was a pleasure to 
work through. It was both entertaining 
and educational, will be valuable to any- 
one who is interested in getting beyond 
the obvious and who wants to use moreof 
the TRS-80's capabilities.! 
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More powerful programming tools 
for theTRS-80: Nowon disk. 



Better results. Microsoft's Level III BASIC and Editor/ 
Assembler-Plus are programming tools that help you write 
complex programs in less time, with less effort and util- 
izing less memory. Better programs. No matter what your 
programming skill. And for the first time these tools are 
available on disk 

Editor/Assembler-Plus. A powerful editing, assembly and 
debugging tool with many sophisticated features that make 
writing TRS-80 assembly language programs easier faster 
and more efficient. 
" Full disk capabilities 

• Assembly directly into memory. No need to save object 
code then reload for execution. 

• Macro capability that allows you to define macros for 
commonly used sequences of instructions, 

• Conditional assembly that allows you to generate more 
than one version of a program. 

• Eight breakpoints at a time for program debugging. 

■ The INCLUDE statement that allows you to call additional 
disk files for assembly 

• Other features include extensive operators, automatic 
origin, symbol table printout, quash command, hex, deci- 
mal and octal constants, single step-through instructions 
in memory five type-out modes, four type-in radices, plus 
extensive edit commands 

A more powerful BASIC. With Level III BASIC, you get 
power to perform tasks in BASIC that used to require 
assembly language. Plus, new ease-of-use features for 
your TRS-80 

• Advanced graphics. Develop charts, graphs, even anima- 
tion in Level III BASIC Draw a line, an outline box or 



a solid box by specifying just two points. Then save and 
recall it with BASIC commands. 

• MENU. One command that allows you to construct an 
entire menu, 

• CHAIN and COMMON commands allow you to call 
another program and pass variables to it 

• Powerful editing commands such as COPY/TRANSFER, 
FIND and CHANGE 

• DUMP command that makes debugging easier 

• Time-limit response. New INPUT p LEN and LINE INPUT 
tt LEN commands allow you to set a time limit on response. 

• RS-232 output from BASIC. With a single command 

• More Level 111 gives you automatic line numbering, 26 
user-definable single stroke instructions, and more. 

Disk or cassette. Dij.k versions ot Level III and Editor/ 
Assembler-Plus are brand new. Cassette versions are also 
available with many o* the same capabilities. 
Talk to your Microsoft™ dealer. Ask for a demonstration 
of two of the most powerful tools you can get for your 
TRS-80 Level III BASIC and Editor/Assembler-Plus. On 
disk or cassette- From Microsoft, 

TRS 80 IS 3 trademark of Radio Shack, a division of Tandy Corporation 

VicrosoM IS a IradeTiark of Microsoft, Inc 

Microsoft ConSiiTier Prodjc's IS a division ot Mrcrosoft. Ire 
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MULTI-PROGRAMMER 

The EE-1470 Multi-Programmer provides a very cost 
effective mass Eprom programming system The EE- 
1470 supports all single supply 2516, 2716. 2532, 
and 2732 Eproms. Erasure verification, device 
programming and data transfer validation are all 
automatic functions Defective Eproms are identi- 
fied and locked out by the EE-1470 on-board micro- 
processor The EE-1470 copies from a master Eprom 
up to 10 Eproms simultaneously Validation checks are 
then completed on each Eprom copy Copy errors or 
defective Eproms are identified by red Fail LED while 
good copy Eproms are indicated by green Pass' LED 
Fast and easy to use m the lab or on the production 
floor The EE-1470 comes complete with internal 
power supply and operation manual. 



32K RAM EXPANSION 




At last 
high speed 
memory for 
your TRS-80 or 
DSI AN-7000 
CPU Simply con- 
_^^^^^^ nect the AN-890 to 
your cup ex- 
pansion connector 

and add an additional 32K of Dynamic Ram with 250 
Nano Second Access Time This unit contains all 
drams and is exercised and tested The AN-890 
comes complete with power supply and operation 
manual. 



1 2 BIT ANALOG PORT 

sgq.9S 



MODEL I/Ill INTERFACE 
549.95 

Now the 
TRS-80 
Model III user 
can interface 
most port based 
hardware avail- 
_^^^^^^^ able for the TRS-BC 
Model 

Computer No 

modification of the Model III is required and only 
slight software changes allow Mode! I hardware 
operation with the Mode! Ill system Software 
changes allow Model I hardware operation with the 
Model III system The AN-587 come complete with 
external power supply module and operation 
manual 




The AN- 
549 Analog 
Port IS atrack- 
ing 12 bit anal- 
og to digital and 
digital to analog 
_^^^^^^^^^^^ converter 
Conversion 
rate of 50us and 
DAC settling time of 750 nanoseconds provide a 
truly flexible analog interface Simply reading a port 
provides the user with instant real time data 
conversion The AN-538 comes complete with power 
Supply and operation manual 




All connections made to AN-SERIES products from 
your breadboard are simply pushed through the front 
panel. Custom ccnnectjrs on the P C.B. provide super 
reliable connection for thousands of operations. All 
AN-SERIES products are warrented for a full 90-DAYS 
under DSI's limited warrenty policy. Complete 
documentation is provided for each model in an 
attractive folder, including theory of operation, and 
special interest projects and applications All units are 
supplied with external power supply modules that 
connect through a mim-jack on the front panel 

C.O.D. add S5.00 - Other add $3.00 S/H. 

DSI DESIGN SOLUTION INC 

BOX 1225, FAYETTEVILLE, AR 72702 

(501) 521-0281 
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DISK CONTROLLER 



DOUBLE DENSITY CONVERTER 



S99.95 




%Tiq.^^ 



An atfora- 
able multi- 
drive floppy 
disk interface. 
The AN-760 sup- 
ports 35, 40, 80. 
__^^^^^^_ and 160 track drives 
Using propri- 
etary DSI Digital 
Data Separation Techniques, maximum permissible 
data transfer integrity is assured. Read, write, and 
step LED indicators prompt operator during all disk 
I/O. The AN-760 comes complete with power supply 
module and operation manual. (Operating system 
software optional.) 




8K FIRMWARE INTERFACE 

8K Bytes 
of User 
Prograniable 
Firmware [4- 
2716 Eproms) 
are automatically 

loaded by system 

/1 2345 Com- 
mand controlled 
by a 2716 controller chip The user can create his 
own firm operating system to load and execute 
programs from Eprom or to provide user defined 
arithmetic functions. Comes complete wittn power 
supply, operation manual and controller chip (The 
AN-522 requires AN-551 Eprom programmer ) 

EPROM PROGRAMMER 




$99 



Using DSI 

Proprietary 

Data Sepera- 

tion and Write 
Precompensation 
Techniques The 
_^^^^^^ AN-920 provides 
approximate- 
ly 1.6 times more 
data storage capacity on your 5' 4 disk drives. The 
AN-920 can be used m conjunction with the AN-760 
FDC or the TRS-80 expansion interface Double 
Density System comes complete with power supply 
module and operation manual (Required Newdos- 
80 Ver 2.0 Disk Operating System Optional ) 

MULTI-RANGE DVM INTERFACE 

Analog 

Signal Inter- 
face IS now as 
easy as turning 
a knob EE-1670 
provides DVf^ 
^^^^^^ functions volts, and 
mtiii-amps 
and 8 ranges. 0- 

200 mtltivolts 0-2 0-20 0-200 volts 0-200 nano 
amps. 0-2 0-20 0-200 miltiamps standard banana 
jacks and test leads create perfect connection 
scheme for real Time analog data aquisition EE-1670 
system 15 complete with power supply and manual 
of operation 





RS-232 INTERFACE 



An 
enhanced 
version of our 
original Eprom 
Programmer, the 
AN-551 will now 

program the single 

supply 2516, 

2716, 2532, and 

2732 Eproms from basic or machine language. 

Software provided will load Eprom from TRS-80 

Ram or load TRS-80 Ram from Eprom with 

complete on-screen verification The AN-551 comes 

complete with power supply and operation manual. 




Can be 
configured 
to communi- 
cate with data 
communications 
equipment or data 

terminal equipment 

at 110, 150, 
300. 600. 1200, 
2400, 4800 and 9600 Baud. The AN-464 provides 
20fyiA loop output and RS-232C through a DB-25P 
connector Software selectable odd/even parity, 5-8 
bit word lengths and stop bit formats are standard 
along with power supply module, software driver, and 
Operation manual 



DSI DESIGN SOLUTION INC 



y* 123 




^179. ''^ 



DSI AN-7000 COMPUTER 



True TRS-SO" work-a-like capability is now 
available in kit form from DSI. The AN-7000 
provides a full 16K of dynamic ram, v^'ith a 
complete modulated video interface system tor 
use with standard televisions, Z-80B Micro- 
processor, cassette interface, membrane keyboard, 
finished case and power supply module, as well as 
every component needed for ROfvl-less assembly Save 
hundreds of dollars by assembling the AN-7000 proces- 
sor yourself with only common hand tools Step by step 
instructions with clear cut pictorials and schematics create a very straight-forward work environment as 
you assemble your own system from scratch Totally flexible, the AN-7000 will interface with all fvlodel I 
Level II hardware accessories including the DSI AN-760 FDC and AN-1000 Megadnves The AN-7000 
system represents the most significant break-through in user assembled computer equipment available 
The AN-7000 kit comes complete with all parts necessary for a full 15K, Z-80 based CPU. less the 12K 
basic interpreter ROfyiS. 



New DOS 80 ver 2 is available at special 
package purchase rates forthe AN-760 and 
AN-1000. Contact DSI for complete 
DOS pricing 



A Registered Microsoft " TRS-80 Level II work-a-like 3 
chip set with manual and complete documentation is 
available for the AN-7000 The Microsott-DSI basic 
package lists at S89 95 



DSI MEGADRIVE 




^§90.00 




This single or double density 
80 track dual sides 5 /'floppy 
disk drive is a must for ail 
serious TRS-80 and DSI 
system users. With almost 1 
million bytes of unf or mated data 
storage capacity in the MFM double 
density mode the AN-1000 provides the 
utmost in stability of performance at a 
very reasonable price. Track to track 
access time 3 ms. soft error rate 1-10" reads, 
hard errors 1-10' reads, and media life 4x10 . 
clearly represent the AN-1000 technology Complete 
with power supply, case, cable and operation 
manual 
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DSI DESIGN SOLUTION INC 



^123 



PRINTER/RTC INTERFACE 

operate 
your printer 
from the AN- 
435s 
Centronics " 
compatible par- 
allel printer inter- 
face Paper 
out and busy 

LEDS prompt the operator of printer status at all 
times The AN-435 also contains a DOS compatible 
real time clock complete with RTC Heartbeat LED 
tndicator The AN-435 comes complete with power 
supply module and operating manual 




AUDIO SIGNAL PROCESSOR 
599.95^ 

TheTRS- 

80 owner IS 
now free to 
interface audio 
information with 
his computer 
_^^^^^_ Music, voice, sound 
effects, etc 
can all be entered 

as dtgital data and saved or manipulated with the 
TRS-80 Digitally created sounds are available as 
music, speech, sound effects etc through on-board 
amp-speaker sysrem The AN-610 comes complete 
with power supply module and operating manual 




DIGITAL PORT INTERFACE 

^94*%^ . TheAN- 

511 Digital 
Port Interface 
provides 8 bits 
of input data and 
8 bits of output 
data 8 decoded 
port addresses are 
also presented for 
LiSB in strob- 
ing external data 

latches etc The Z-80 data bus is also terminated on 
the AN-511 front panel for raw data requirements 
T he AN-51 1 comes complete with power supply and 
operation manual 




ADDRESS-DATA BUFFER 
$59.95 

When 2 or 
more AN- 
senes devices 
are connected 
to a system the 
AN-213 Data 
_^^^^ Address buffer is 

required for 
proper operation 

ot the TRS-80 The AN-213 s Bi-directional data bus 
butter and 16 bit address buffer provide adequate 
tan-out lor up to 4 additional AN-senes products 
Unit comes complete with external power supply 
module and operation manual 




8 BIT ANALOG PORT 




8 CHANNEL ADC 
$84. « 



TMf- AN- 
538 Analog 
Port IS atrack- 
ing 8 bit analog 
to digital and 
digital to analog 
_^^^^ converter 

Conversion 
'ate of 3us and 

DAC settling time of 85 nanoseconds provide a truly 
flexible analog interface Simply reading a port 
provides the user with instant real time data 
conversion The AN-538 comes complete with power 
supply and operation manual 




8 channels 
of analog 
signals are all 
internally multi- 
plexed and 
encoded by the 
_^^^^^^ AN-460 ADC 8 bit 

data values 
are recovered 

from each of the 8 analog signal channels through a 
convenient port based scheme providing the TRS-80 
user with 8 simultaneous A-D conversions. The AN- 
460 comes complete with power supply and 
operalion manual 



•Set L'ilol Aavt'liserson pdgf4)8 
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Edited by Janet Fiderio 



Featuring— Orchestra-85 
Interface your TRS-80 with Stereo Music Synthesis and Percussion. 







Orchestra-85 



Stereo Music Synthesis 

Slereo music synthesis and percus- 
sion are now possible with Orches- 
tra-85, a software/hardware product. 

Stereo separation is by instrument, 
allowing the user to play trumpet and 
oboe simultaneously through channel 
A while playing clarinet and organ 
through channel B. Instruments may 
be switched from channel to channel 
at any time. The software supports 
five-part harmony for use with 2.66, 



3.54, and 4.0 Mhz clock speeds. 

Orchestra-85 includes tape and disk 
versions plus sample music files on 
cassette, and a fully assembled PC 
board which plugs into any 16K Model 
I, Level II without voiding the warranty. 
The stereo output may be connected to 
the Aux/Tape/Tuner inputs of any 
stereo amplifier. 

For more detailed information, con- 
tact Software Affair. 858 Rubis Dr.. 
Sunnyvale. CA 94087. (408) 295-9195. 
The system is priced at $129.95. 

Reader Service ^163 



Software 

For Business Management 

Century Software Systems is offering 
three new professional business systems 
tor the TRS-80 Model II. 

Business Management I is a financial/ 
capital budgeting system which analyzes 
cash flows, internal rate of return, and var- 
ious depreciation methods in accordance 
with the Economic Recovery Tax Act of 
1981. 

Business Management II is a complete 
system for the lease versus purchase 



decision. The purchase may include multi- 
loans, investment tax credit and various 
depreciation options and more. 

Business Management III is a statis- 
tical system which performs statistical 
analysis tor multi-observations on up to 
six variables. 

Each system is on a single eight-inch 
disk TRSDOS Version 2.0A. All programs 
are user-oriented and priced at $125, $100 
and $110 respectively and are available 
from Century Software Systems, 1875 
Century Park East, Suite 1730, Los 
Angeles. CA 90067, (213) 879-5911. 

Reader Sen/ice t-178 



Map the Skies 



The Star Search Astronomy Guide in- 
stantly provides a map of the skies for any 
date or time entered. 

Double stars, galactic and planetary 
nebula, open and globular clusters, and 
the external galaxies are all graphically 
plotted to scale according to their polar 
coordinates. The program employs a split 
screen to simultaneously display perti- 
nent data for each object started. 

This astronomy guide is available from 
Softbyte Computing, Box 217, Walling- 
ford, CT 06492. 

Reader Service ^'348 



MIcrospell Recognizes 
Grammatical Tenses 



MIcrospell is now available in an im- 
proved version from Lifeboat Associates. 

The new version 4.2, provides more than 
a dictionary program that scans for spell- 
ing errors. Microspell now stores prefixes, 
suffixes and roots, enabling it to recog- 
nize spellings and grammatical tenses. 

This CP/M based program runs on the 
Model II and is priced at $249. Additional 
inquiries should be addressed to Lifeboat 
Associates. 1651 Third Ave., New York. NY 
10028,(212)8600300- 

Reader Service ^^^G7 



Uniterm 



Uniterm is a TRS-80 intelligent terminal 
program designed for both the Model I 
and Model III. It includes the following in- 
telligent terminal features: auto log-on, 
auto polling messages, user redefined 
keys, user definable video display width, 
type to buffer, review buffer, and more. 
The program will operate with most 
popular modems. 

Uniterm is being distributed by B.T. 
Enterprises, 171 Hawkins Rd., Center- 
each, NY 11720, (516) 981-8568 and retails 
for $79.95- 

Reader Service ^344 
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Data 

Acquisition Module 

ADAM is a low-cost analog Data ac- 
quisilron module available from Small 
System Design. It is a plug-in module 
allowing you to monitor a large variety of 
analog sensors or transducers. Tfiese 
devices include thermistor temperature 
sensors, solar radiation pyronometers, 
meteorological (wind speed, wind direc- 
tion, barometric pressure) sensing de- 
vices and electrical current sensors. In ad- 
dition, simple on/off (digital) devices can 
be monitored. 

ADAM is available in two models priced 
at $190 and $250. For more detailed infor- 
mation contact Small System Design, Box 
4546, Manchester. NH 03108, (603) 
432 7929. 

Reader Service .^343 

A Statistical 

Package for the TRS-80 

A new statistical package for the micro- 
computer, is now available for the Models 
I or III on cassette or disk, 

SPM consists of five programs that per- 
form descriptive statistics, analysis of 
variance (one or two way), and single and 
multiple variable regression. Features in- 
clude analysis of variance, with unequal 
sample sizes, flexibility in formatting Post 
Hoc and planned comparison analysis 
and computation of percentile ranks of F 
ratio statistics, and additional features. 

The multiple linear regression program 
allows for testing of significance of Beta 
weights, gives regression statistics for 
any subcorrelation matrix, and more. 

SPM is priced at $79.95 from Bruce P. 
Douglas. 20 Willow, Vermilion, SD 57069. 

Reader Service 1^326 



Prevent Static 
Electricity Problems 

Anti-Stat, an anti-static spray, is espe- 
cially effective in preventing the problems 
that static electricity causes in most com- 
puter environments such as unusual 
equipment operation, lost data and pro- 
grams, damage to computer memories, 
and more. Anti-Stat can also add extra 
protection to static eliminator mats. 

Priced at $4.95, this product is 
marketed by Micro Data Processing and 
Systems Inc., 5636 Haddington Lane, 
Philadelphia, PA 19131, (215) 473-6419. 

Reader Service ►-346 




The ADAM Data Acquisition Module. 



Finance Program #1 

Finance Program # 1 is a home-business 
software package that extends the use of 
the Color Computer to the practical ap- 
plications of finance. 

This program package is divided into 
two categories, loans and investments. 
The loan program performs the following: 
discount of commercial paper; principle, 
regular paymant, remaining balance, and 
term of a loan; mortgage amortization 
table; and more. 

The Investments program performs: 
future value of investment and regular 
deposits, initial investment, minimum in- 
vestment for withdrawals, earned interest 
table, and more. 

Finance Program #1 is priced at $21.95 
and is available from Computerware, Box 



668, 1512 Encinitas Blvd. 
92024,(714)436 3512. 
Reader Service ^160 



Encinitas, CA 



New PROM Burner 

Apparat Inc., has announced their new 
PROM Burner for the TRS-80 I and II This 
PROM Blasting system (A.P.B.) will pro- 
gram nine different Eproms (of the 24 pin 
variety) on the same board. 

The package includes the interface 
card, a complete set of personality mod- 
ules, software on disk and a detailed in- 
struction manual. The cost of the A.P.B 
system is $149 from Apparat Inc., 4401 S. 
Tamarac Parkway. Denver, CO 80237. 
(303)741-1778. 

Reader Service ►-335 




►\ r. ,-v iS 



The PROM Burner. 
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The LJPen-80. 



The LTPEN-80 



The LTPEN-80 is a TRS-80 Model I and 
III compatible lightpen with extended soft- 
ware capabilities. 

A machine language program adds five 
functions to Level II or Disk Basic allowing 
the user to select any (X,Y) point or 
character position by pointing the pen. A 
teaching program and a graphic input pro- 
gram are also included in the software 
package. 

The pen and software cassette are 
available for $27.95 from Syntex Elec- 
tronic Innovations. Box 4034; Lancaster 
PA 17604,(717)733-4769. 

Reader Sen/ice ►'328 



Trucker, You're 
In the Driver's Seat 

Trucker, a new simulation game by 
Creative Computing Software, enables 
you to sit in the driver's seat awhile. 

Simulating the travails of a cross coun- 
try trip in an 18-wheeler. the player must 
choose a route from Los Angeles to New 
York as well as decide on a cargo. While 
traveling along interstates and back 
roads, flat tires, sudden blizzards, dense 
fogs, and intensive road construction are 
just some of the hazards that may be 
experierKed. 

Trucker is available together on a disk 
with Streets of the City, a simulation 
modeled on Grand Rapids, Ml. 

The cost of these programs is $24.95 
on cassette or disk. For more information 



contact Creative Computing Software, 39 
E. Hanover Ave., Morris Plains, NJ 07950, 
(201)540-0445. 

Reader Service ^340 



Stretch Super Step 

stretch Super Step is a third generation 
machine language monitor program for 
the Models I and III with 32K— 48K of 
memory. The program has three func- 
tional segments and printer control (Line 
Printer IV). Stretch Super Step is an aid in 
debugging and analyzing machine code 
programs. 

Its three functional segments are: 
FLTCUR, a byte-oriented text editor with 
floating cursor and autorepeal; SPRSTP, 
the single slep/Trace/dissassembler, a 
Z80 instruction-level simulator running on 
the Z80; and BUFSTF, a user-definable 
buffer with special window controls to 
view large code segments in eight formats. 

Priced at $49.95. this product is avail- 
able from Allen Gelder Software, Box 
11721 Main Post Office. San Francisco. 
CA 94101. 

Reader Service ^168 



Original Adventure Now 
Available for the TRS-80 

Lost treasures, underground caverns, 
giant clams, nasty dwarves, and more- 
all must be faced by those who enter the 



world of Original Adventure. Original Ad- 
venture makes no compromises from the 
original game written for much larger 
mainframe computers. It is currently avail- 
able on disk tor CP/M (as a bi-lingual En- 
glish/French program) and TRS-80 users. 

Disks are priced at $24.95 each. 

For more information write Creative 
Computing Software, 39 E. Hanover Ave., 
Morris Plains, NJ 07950, (201) 540-0445. 

Reader Service ^^349 



Sabtronics 2020 
Digital Multi-meter 

Sabtronics announces their new Model 
2020 Digital Multi-meter with micropro- 
cessor interfaces. Optical coupling be- 
tween the DMM and the computer pro- 
tects the computer from damage and also 
isolates ground noises that can affect 
sensitive measurements. The Model 2020 
is equipped with all cabling and I/O sup- 
port necessary for the TRS-80. 

Some applications include: the sam- 
pling of periodic measurements to gener- 
ate statistical data that can be numerical- 
ly reduced for graphic presentation; 
catching intermittent current or voltage 

problems by monitoring the circuit; plot- 
ting the effects of power supply drift ver- 
sus time, temperature or input voltages; 
and more. 

Contact Sabtronics International. Inc. 
5709 N. 50th St., Tampa. FL 33610, (813) 
623-2631. 

Reader Service v'173 



For Amateur 
Radio Operators 



Master Gator Software is now market- 
ing four programs for Amateur Radio 
operators. 

The first. WAS (Worked All Stations), 
keeps records of raUio contacts with each 
of the 50 states and assists the operator 
with a current list of who was contacted, 
where and when. 5BWAS (5-Band Worked 
All States), the second program, main- 
tains data for five different radio bands. 
The third program. DXCC, keeps track of 
radio contacts between the owners sta- 
tion and each of the 319 countries world- 
wide. The last program. Dupe Checker, is 
used by a contest operator to purge all 
duplicate contacts during a contest. 

Prices are as follows: WAS — $8, 
5BWAS — $12, DXCC— $10, and Dupe 
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THE NEW LAREDO LS525. 

WHEN YOU'RE READY 

TO GET DOWN TO BUSINESS. 



Laredo Systems, Inc. introduces the 
LS525 five megabyte rigid disit memory 
system for TRS80 Models I and 111. 
Laredo's LS525 rounds up a Seagate 
ST506 Drive. LDOS Operating System by 
Logical Systems, and Laredo's own LSI 




500 Series Controller into a single-board 
controller that emulates the famed IBM 
3370 disk system, complete with: 
• Improved read write seek access time 
through full block buffering and variably 
tuned interleave. 



• On-board data separator, micro-code 
diagnostics and write-precompensation. 

• Increased disk media reliability and 
data integrity with automatic defect block 
allocation and extended ID fields. 

■ Versatile CPU compatibility provided by 
separate host adaptor. 

Introductory Offer To TRS80 Users. 

Now through October I . I 981 buy the 
LS525 for the OEM dealer price of 
$2990. a savings of S760 off the usual 
suggested retail price of S3750, 

LDOS Operating System 
with manual and diskette 
available for $149, 



For more information about the LS525 
Memory System and the LSI 500 Series 
Controller, contact: Laredo Systems, Inc. 
2264 Callede Luna, ^^^ 

Santa Clara, CA 9S050 
(408)980-1888 




kirado ygi^tam^ Inc. 



■ Swe List of AOvtrJisars on page 418 
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Checker— $8. For additional information 
contact Master Gator Software, Box 10, 
Alachua, FL 32615. 
Reader Service ^^^39 



Especially for Children 

A new book written especially for chil- 
dren, A Young Persons Guide to Micro- 
computers, is currently being marketed by 
Sceibi Publications. 

Starting with an abbreviated history of 
the computer, the book continues with 
simple explanations of how a computer 
works, how to communicate with it, and 
discussions of its purposes. The book is 
heavily illustrated with line drawings and 
photographs designed to appeal to young 
people. 

Priced at $7.95, this softcover book can 
be ordered from Sceibi Publications, 35 
Old State Rd.. Oxford. CT 06483. 

Reader Service ^162 



DEBUG on Cassette 

DEBUG, an easy-to-use monitor for 
writing and debugging Z80 machine lan- 
guage programs, is now available in 
cassette form for the Model I and III. 

DEBUG enables the user to: display 
blocks of memory and the Z80 registers in 
two different ways; modify individual 280 
registers, memory locations, or an entire 
machine language program; jump to a 
program and begin execution; insert 
breakpoints in a program; single-step exe- 
cution of programs; write programs to 
data or tape; and load programs or data in- 
to memory from a tape. 

This product uses the memory area 
from 4200H to 39FFH and can only be 
used on programs in the user area from 
4A00H to the end of memory. 

Marketed by Radio Shack, DEBUG is 
sold for $19.95. 

Reader Service »'341 



Reference Card for Basic 
and Assembler Manuals 

The TRS-80 Basic and Assembler Sys- 
tem Reference Card completely summa- 
rizes the Basic and Assembler manuals. 

Features include: Basic Commands, 
functions, and statements; load, move, 
and branch instructions; shift, compare, 
and math instructions; store instructions; 
I/O instructions; ROM routines; Assem- 




The Keyboarcf Companion. 

bier instructions, commands, and opera- 
tors; and more. 

This reference card is sold for $4,95 
from Nanos Systems, Inc. Box 24344, 
Speedway. IN 46224. 

Reader Service ^-338 



The Keyboard Companion 

The Keyboard Companion is a small 
(11 by 16-inch or 11 by 29-inch) desk top 
that sits between the screen and 
keyboard of a computer terminal. Sup- 
plied with pedestals that lift the video ter- 
minal to eye level, the removable desk top 
is attached to the keyboard and raised 
video screen by Velcro fasteners. 

The complete package including pedes- 
tals is available for the Model I at $72 and 
the Model II at $79.50 from PKay Corpora- 
tion, Box 11463, Costa Mesa, CA 92627, 
(714)548-2081. 

Reader Service ^325 



Color Computer 
System Monitor 

TRSMON is a 2K operating system 
designed for use with the TRS-80 Color 

Computer System. 

It provides the standard functions 



found in most system monitors as well as 
a printer/terminal driver package. 

Printer Terminal modes can be used at 
rates varying from 300 to 9600 baud, and 
changed at any time. TRSMON com- 
mands are a minimum of two characters 
followed by their respective parameters 
The command input line is buffered and 
will recognize the backspace. Break and 
Enter key for error-free entry of command 
sequences. 

TRSMON is available on cassette for 
$19.95, on a 2716 EPROM for $34,95, and 
for Extended Basic Socket at $34.95. For 
more information contact Cer-Comp, 5566 
flichochet Ave., Las Vegas, NV 89110, 
(702) 452-0632 

Reader Service ^'337 



Shuffleboard III 

Shuffleboard 111 is a 64K CP/M 2.2 
system for the TRS-80 Model III, 

Using a memory mapping technique to 
allow the use of standard CP/M 
(TPA = 100), Shuffleboard Is more than a 
memory mapper; it is a sophisticated 
memory manager that expands the Model 
Ill's memory space to 88K. 

Shuffleboard comes with 16K of RAM 
and 2K of ROM (expandable to 8K). This 
allows a full 64K CP/M system to be used 
without any interference from the Level III 
ROM or video memory. 

The Shuffleboard III package includes 
16K of RAM, 2K of ROM, Maxi disk CP/M 
2.2, seven CP/M manuals, installation in- 
structions and a six-month warranty. For 
more detailed information contact Para- 
sitic Engineering, 1101 Ninth Ave., Oak- 
land, CA 94606, (415) 839-2636. 

Reader Service .^164 



A Dental Office 
Management Program 

Dentistard is a dental office manage- 
ment program designed to streamline all 
the major time-consuming tasks per- 
formed in the dental office. 

The menu-oriented program will auto- 
matically print standard ADA insurance 
forms, prequalification and actual ser- 
vices, monthly statements, patient recall 
notices, accounts receivable aging re- 
ports, daily summary of work performed 
and payments received, and more. An ad- 
vantage of Dentistaid is the simplicity of 
operation and automatic generation of 
many forms and reports that give the den- 
tist better practice control. 
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Then Parallel Process! 



CUE is a programmable proct-sbor which 
rapidly accepts Irom your computirr data to be 
printed and then goes off-line to drive the printer 
—independent of your computer, which is now 
free. CUE is better than software spooling since 
none of your computer's memory, processing 
pcwer, or dUk drives are tied upu CUE is mailable 
in parallel, serial, or with both in 2- and 4-pon 
models (connect several printers or computers) 
with from I6K to ^2 K memory Use as an interface 



McattMglnaltlW. 



Q fyteiDConrpcitole 

PO. Bote 7624. AnanlaGA30357 (404)8746366 
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Software. 
For the 80s. 

PofiMdyn* Compuiw S«fvlc*» Th« ofg«rif«iK>r> ihat Iim brougM 
■ffordaM* •ottwar* to hundrada of users in ihs ov«r 40 o< iho Unitad 
SIMM and 16 countrtat around tha world. Ttia oroanizallon wilt> Iha 
paopla. tha aupporl, tha sarwlca and the aipertisa to t>rlng <fOM tha 
htgiiaat quality products availaMa 

Panaa-wrHa 1 - Our BA$IC word procsasing syttam for iha 
ownar who 'aquirsa pertormanca al low cost Many of the taalurai 
of rrora axpansiva word procaaslng aytttma al a traction ot ttta coat 
Comet compieie w<ih mailing IM oapabla of handitng 300 namaa 
S19 9S (Spacily Modal I or Modal III) 

PaitM-wrHa 2 - A rriactiine languaga word procasamg ivstam for 
tha TR8-60 Modal I or iii with tha powar and ipaad that is raaiiy 
naadad in a word processing ervlronmant Word wrap around, 
unlimited insart and delate, block movaa. chaining ol filaa. 20 user 
datinable command), ASCII contror oocta generation tor printed 
output to allow aubacrlplft. superscripts. un4arllnlng or any ottMr 
faalurayour pnnisr supports, ord nnuch mora All this In a pacKage 
that costs luti S79 95 Manual S10 00 Deductabie. (S«a full pagaad 
m April 1981 BO-Microcomputlng for a tuK descrtpllon). 

Scflware puMtshIng - Pensadvne is now publishing software tor 
indopafidant software authors. Sard SASE for complete details, or 
send machine readable copy ol your program w<ih any 
documentation TR3-M> Model I. II. Ill and Colour Computer fully 
supported. Subtact malarial urtiimitad. 

i4ow. with that Kind ol record, and these products and sarvicaa. 
aren't you jutt a little curious aboul Pensadyne Computer Services? 

Visa and Maalercharoe orders weloome Phone orders waloome 
or wrtia, specifying system con figuration, and product desired 
Please wM $1.00 for first ciaaa ahip|»lng. 

PENSADYNE ~ Giving you the power to think. 




i^X'»>: 
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COMPVTBR S£nviC£S 
444t WBS1 FIRST AVE VANCOUVBR BC V6R4H9 604-224-3W7 



BASIC is ^ not nearlv as slow 
as mosi programmers think 

BASIC Faster and Beatr shows vou how to 
supercharge your BASIC with 300 pages (rf 
rast. functions dnd 
subroutines 

You won't find any trivial poorlv design*^ 
check- book balancing' programs in this 
book - if s packed with usefut programs 

Tutorial for the beginner, instructive for 
the advanced. and invaluable for the pro- 
fesslonal. this book doesn't |usi talk. it 
shows how! All routines are also available on 
disk, so that vou can save hours of 
keyboaiding and debugging 

The « I disk BFBDEM contains all the 
demonstration programs, and # 2 BFBUB has 
all the library functions 

BASIC FasurA Better is $29.95. and the two 
program disks are $19 95 each. 
Get the book andVor disks from your local 
1J(; dealer and B. Oalton bookstores 




»■ Sec LJm of AdVamsan Off w* 4t« 



1260 W. Foothill Blvd. 
Uplarkd. Cdlirurni.i9l7a6 
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The Color Buffer. 



All programs are available for the Mod- 
els I and III on cassette or disk for $120. 
Direct inquiries to Hayden Book Com- 
pany, Inc., 50 Essex St., Rochelle Park, NJ 
07662.(201)843-0550. 

Reader Service ►^161 



The Color Buffer 

TBH is currently marketing the Color 
Buffer, a new peripheral for the Color 
Computer. The buffer gains access to the 
system bus through the game slot car- 
tridge and terminates in the standard 
22/44 card edge connector, providing easy 
access to fully buffered address, data and 
control lines. 

Also serving as a building block, the 
buffer will allow the user to plug in a vari- 
ety of peripherals due on the market later 
this year including a RAM Cartridge, serial 
and parallel I/O board and an EPROM 
programmer. 

Cost of the Color Buffer is $59.95. Fur- 
ther information may be obtained from 
TBH Canada. 67 3691 Albion Rd. Ottawa. 
Ontario. Canada KIT 1P2. 

Reader Service .^333 



to the TRS-80 bus port and will deliver 
date, time AM/PM, and day of the week 
without user input at powerup. 

This product is available for the Model I 
at $99.95 or for the Model III at $109.95. 
Direct inquiries lo B,T. Enterprises. 171 
Hawkins Rd.. Centereach. NY 1 1720. (516) 
981-8568. 

Reader Service k'345 

Series Focuses on 
Programming Techniques 

Annotated Basic is a five volume series 
that focuses on Basic programming tech- 
ntques rather than just commands and 
statements. 

The book includes useful programs 
written in TRS-SO Level II Basic. Each 



A Hardware/ 
Clock Calendar 




Tic-Toc-80 is a hardware/clock calendar 
tor the TRS-80 Models I and 111. The device 
features an easy-to-use plug attachment 



The Voltage Surge and Transient 
Suppressor 



chapter includes a documented program, 
annotation describing what goes on In 
specific lines, a discussion of the new 
Basic concepts implemented, and for the 
more involved listings a flowchart. 

Contact Wayne Green Books. Dealer 
Sales, Peterborough, NH 03458 for addi- 
tional information. 

Reader Service ►'334 



The Servant 3.2 

The Servant 3.2 Information Processor 
gives any user the ability to store informa- 
tion regardless of programming or com- 
puter knowledge through a series of sim- 
ple prompts. 

Features of this product include: up to 
20 categories of information, graphic in- 
struction, a machine language sort, up- 
dating of numeric categories by any 
percentage, and a text editor with a form 
letter generator. 

This package is currently available for 
the Model I and III and is priced at $79.95. 
Contact The Computer Connection, 13359 
Killion St., Van Nuys, CA 91401, (213) 
475-9431 for additional information. 

Reader Service .^342 



Synchronous Software 

Synch is a 2780/3780 IBM binary synch- 
ronous software communications pack- 
age for the TRS-80 Model II. 

Synch emulates 2770, 2780, and 3780- 
type bi-synch work stations at up to 9600 
baud. The software supports transparen- 
cy, buffer expansion (128, 256 and 512 
bytes), space compression, processor in- 
terrupt (RVI), and multi-point. 

Synch provides remote job entry capa- 
bility and automatic features which allow 
up to 100 files to be queued for unattend- 
ed operation. 

Available from Westico. Inc. 25 Van 
Zant St., Norwalk, CT 06855. (203) 
853-6880, Synch is priced at $500. 

Reader Service ^^327 



Electronically 

Remove Voltage Changes 

The Voltage Surge and Transient Sup- 
pressor electronically removes or greatly 
reduces sudden voltage changes that can 
affect the performance or catastrophic 
failure of sensitive electronic equipment. 

The suppressor is plugged into an ac 
line power receptacle on the same 15 amp 
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breaker circuit as the equipment being 
protected. Solid-state semi-conductors 
clip all overvoltage surges beyond 132 
Vac. and a passive filter snubs high fre- 
quency transients which might occur over 
the full input voltage waveform. A 2 amp 
internal fuse provides safety overload 
protection. 

This product is available from Cuesta 
Systems Inc., 3440 Roberto Court, San 
Louis Obispo. CA 93401. (805) 541-4160- 

Reader Service ►^172 



The International 
Computer Dictionary 

The International Computer Diction- 
ary(IMD), is a pocket guide containing 
definitions of important terms, acronyms 
(with pronunciations) and numbers used 
in computer jargon. In addition it provides 
a ten language vocabulary of essential 
computer terms. 

This is a revised and expanded version 
of Sybex's Microprocessor Lexicon con- 
taining over 1600 definitions arranged 
alphabetically. Also useful is the "Num- 
bers Game." a list of electronic parts num- 
bers common in everyday microcomputer 
parlance. 

For additional information Contact 
Sybex Inc.. 2344 Sixtti St., Berkeley, CA 
94710,(415)848-8233. 

Reader Service .^331 

Micro Newsletter for 
Medical Professionals 

The Micro Medical Newsletter is a pub- 
lication dealing with microcomputer uses 
within the medical profession. The current 
issue provides a detailed review of ac- 
counting and claim management systems 
available for the leading micro systems 
and more 

The current issue is available tree to 
practicing physicians and health profes- 
sionals from Charles Mann & Associates, 
Micro Medical Newsletter. 7594 San Remo 
Trail, Yucca Valley, CA 92284, (714) 
365-9718. 

Reader Service ►'SSe 

The Micro Advisor 

A new source of information and advice 
on microcomputers is now online. The 
Micro Advisor (TMA), is accessible 
through the CompuServe Information Net- 
work to anyone with a terminal or per- 
sonal computer. 

TMA contains information of interest to 
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anyone using microcomputers. Features 
Include: a question/answer program for- 
um on microcomputers a list of micro 
publications (including newsletters); a na- 
tionwide list of computer clubs; a new 
products section, and more. 

CompuServe subscribers can use the 
Micro Advisor by accessing TMA while in 
CIS Others who are interested should 
contact Battery Lane Information Servic- 
es, Box 30214, Bethesda, MD 20814. (301) 
770-2726, 

Reader Service 1^170 

Displays True 
Upper and Lowercase 

The Word Processing Lowerkit is a 
3 Vz -inch-square piggyback board de- 
signed to press in place, without solder- 
ing, inside the TRS-80 Color Computer. 

The purpose of the Lowerkit is to dis- 
play true upper and lowercase characters. 
As an added feature the kit uses a 7 by 9 
dot matrix for display (rather than the 
built-in 5 by 7 matrix) for large, clear let- 
ters. All characters have descenders 
where necessary (comma, semi-colon, 
lowercase letters g.J.p.q.y). The character 
set in the standard generator is fully 
compatible with the normal Color Com- 
puter character set, with the exception 
that lowercase letters are correctly 
displayed. 

For more detailed information contact 
MSB Electronics, Drawer 766, Barre. VT 
05641,(802)476-7311. 
Reader Service ^^&5 



CalcStar— 

An Electronic Spreadsheet 

CalcStar is an electronic spread sheet 
program that eliminates the need for led- 
ger paper and calculators when solving 
complex mathematical problems. 

Based on CP/M. it is useful for projects 
such as budget plans, sales forecasts. 
cash flow analysis, and more. CalcStar 
allows the user to design a ledger sheet 
on the video screen. Columns may vary 
from three to 63 characters with as many 
as 600 figures entered in any one spread 
sheet. 

Available for the Model II at $295. 
CalcStar is soon to be released in a Model 
I and Ml format for $150. For additional in- 
formation contact MicroPro International 
Corp., 1299 Fourth St.. San Rafael. CA 
94901,(415)499-0919 
Reader Service i.^166 



The Color Data Organizer 

Computerware is now marketing the 
Color Data Organizer on cassette for the 
Color Computer. It is a small inventory 
program; a cross reference system; a 
valuables record, serial numbers, and 
credit card storage system. It stores, re- 
trieves, sorts, prints, and totals whatever 
you want within the two numeric and two 
string entries. The Organizer can hold 125 
records in a 16K Color Computer. 

Priced at $24.95, this product is avail- 
able from Computerware. Box 668, 1472 
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The Tyrop Electronic Typewriter Adapter. 



Encinitas Blvd., Encinitas. CA 92024, (714) 
436-3512. 

Reader Service ^^SSO 



Electronic 
Typewriter Adapter 

Tyrop, a new electronic Typewriter 
adapter, is designed to convert IBM Seiec- 
tric or equivalent electric typewriters into 
computer output printers. 

The device features a printing speed of 
600 characters per minute, a variety of 
computer interfaces, and a built-in self- 
diagnostic function enabling users to 
monitor printing functions easily. 

Retailing for under $1000, Tyrop is avail- 
able from Hollander Office Products, 41 
Duesenburg Drive, Suite B, Thousand 
Oaks, CA 91362, (805) 496-2533. 

Reader Service ►'175 



Real Estate 
Office Management 

The Real Estate Office Management 
software package (ROM) can handle one 
or more offices with one or more profit 
centers. It also includes a general ledger 
that provides profit and loss statements, 
balance sheets, trial balances and trans- 
action registers. 

ROM allows for office and division bud- 
geting with monthly, year-to-date and op- 
erating statement comparisons. The ac- 
counts payable section includes a check- 
writer that will provide monthly checks for 



ongoing items, such as mortgage and rent 
payments. 

For more information on this compre- 
hensive system contact Reality Automa- 
tion Inc., 221 North Lois, La Habra, CA 
90631,(213)947-2762. 

Reader Service ^171 



Accountants 
Microsystems Inc. 

Accountants Microsystems Inc. (AMI) 
recently announced a complete family of 
software modules for practicing accoun- 
tants. Included in the package are Client 



Write-up, Practice Management, Tax 
Preparation, Tax Planning, Financial Plan- 
ning and Word Processing systems. 

The software operates on CP/M based 
microcomputers and is designed to be 
competitive with larger minicomputer 
systems. Module prices range from $400 
to $2995 and are available for the Model II. 
For further information contact; Accoun- 
tants Microsystem Inc., 1404 140th 
Place N.E., Bellevue, WA 98007, (206) 
643-2050. 

Reader Service ►'1 79 



The CompuVend 
Computer Equipment Table 

The CompuVend Computer Equipment 
Table is a fully automatic vending system 
that allows independent operation of a 
computer, terminal or additional peripher- 
al equipment. 

Features include: two vending systems 
(The Model 1310 operates on quarters and 
the Model 21 10 on dollar bills); adjustable 
fixed rate of charge per unit of time; vend 
override staff key; cumulative time capa- 
bility; multiple equipment usage; dual 
vend (simultaneous vending of two pieces 
of computer equipment at different rates 
per unit of time); record keeping; security 
features; and more. 

The Model 1310 is priced at $1650, the 
Model 2110 at $2475. For more detailed in- 
formation contact CompuVend Computer 
Systems Inc., Box 73, Williamstown, NJ 
08094, (609) 778-0566. 

Reader Service ^332 




The CompuVend Table. 
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THE BIGGEST NAME IN LfTTLE COMPUTERS" 

TRS-80 Model H— Your Best Buy 
In a Business Microcomputer 




TRS-80 computers, ^^ 
software and peripherals 

Similor volues on all merchondise 
CALL COLLECT: 

800-351-1580 

Texas Residents call: 915-283-2920 

Van Horn Office Supply ^^ 

701 W. Broadway - P O Box 1060 
Von Horn, Texas 79855 
DEALER G055 

Form F48 Provided 
Standard Warranty in Effect 




Ourongiona! Super Ul ilily was liatd lobfal- welnedanya'ay NowKini Watl 
of Bttf^f Compuiiny. Inc , offers you SUPER UTILITY PLUS, an except lonal, 
complelely rewritten program, including in excess of 70 possible programming 
selections In addition, it now operates on Single or Double Density ihrouglioLit 
all pntiiram utilities Trutly the "Utility of Ulililies" 

Li'-ted helow are only the highlights of Super Utility Plus's outstanding 
features 
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INNOVATIVE READY-REFERENCE PROGRAMS 

How many limes ha<e you racKed you' bram tot jusl the ngtil wo'f! 
when willing an impoilanl letter. leport, or article^ Ho* many limes have 
you I ideas been misunderstood because the words you used didn't exptess 
your thoughts clearly and accurately'' How many times have your turned in 
a leoort or mailed an imporlani letter and then hours later Kicked yoursell 
tor not having thought ol ihe best and most accurate words to use at the 
lime you wrote it 

No* by using me lemarKabie ne* REFWARE THESAUHUS programs 
,ou' computer can speeOny 'md those wotds ina; are on the tip o' your 
tongue bui thai you can t guite 'e"iember al the Tiomeni AnO il tens ,ou 
huA 10 spei; ihem' 

Just Slip a REFWARE THESAURUS aiSK nlo you' diSK Ori.e Then lype 
in youi sentences or paragraphs Tiie computer *.i ; guicH'y otler a vaneiv 
ot alternatives, 'elypirig >our sentences or pa'agraphs with substitute 
possibilities chosen hom ris multi thousand wed vocabuiaiy II displays 
Ihe revised sentences on your monitor oi types them on your printer as you 
choose, so that you can mull Ihem over and cfioose llie one that most ai; 
cuiately expresses what you FIEALLY mean lo say 

Having helped thousands ol writers learn to express themselves with 
clarity as editor ol such publications as the Wo'ia Book Encyclopedia the 
Encyclopedia Americana, and the ReaOer s Digest Almanac and Yearboo' 
□avid C Whitney has drawn on decades o' editonal experience lo prepare 
the revotuliofiary REFWARE THESAUHUS programs. Dnr.gino the speed 
and power o' the computer to the aid ol anyone Aho wishes to mprove his 
wriiing or speaking 

In addition to Ihe speci' c p'ograms capable o! substiluimg suggested 
alternate wo'ds lo' nour^s and adjectives. REFWARE THESAURUS Build«( 
enalDies engineers, physicians, lawyers educates business physicists 
chemists, and oihei prolessionals and specialists to develop Iheir own in 
dividually tailored compute' vocabularies of ^a^d■to■'Bmefnbe^ techmoai 
words 

REFWARE THESAUHUS Adjectives 1.0 Order No lOOiRT S39.95 
Utilizes 6,200 adjectives to assist you m choosing the mosl accurate 
modifiers lo describe nouns and pronouns in your letters, reports, and 

Speeches 

REFWARETHESAUHUSNounsl.O O'der No JOOfT J39.9S 

Draws on a vocabulary ol 6.200 nouns to Suggest alternates lo' the names 

ot persons, places things, and ideas that you use m your writing and 

speaking 

REFWARE THESAURUS Buildarl.O Order No 500 IRT 1149.95 

Series o' eight utmty ptograms enables the user to develop specialized 
computer thesaurus disk programs of hard-to-remember technical words 
and their alternates lor personal use. Functions independently of Adjec- 
tives and Nouns programs 

REFWARE THESAURUS User'* Manuale: Complete descriptions of use of 
eacli of the above programs. Included al no addilional charge with each of 
program disks listed above. If ordered separately, price of documentation 
IS refundable upon receipt of order and payment lor program disk 

Utar'i Manual Adlectlve* Order No 6001 RT tO.95 

Uaer's Manual Nouna Order No e002RT t9.95 

Uaar-s Manual Builder Order No G003RT S9.9S 

Introductory prlcai subiect to change alter Jan 1 , 1982 

MINIMUM System RK)uir»dTRS 80' Mod lorMod 111 ASK with twodis* dr ves 

■A Tradema'k of Tandy Corporation 



REFWARE' Reference software division David C Whitney Associates. Inc 

P.O. Box451, Chappaqua, N.Y. 1Q514 
■A trademark of David C Whitney Associates. Inc. 

Specify ModM lor WodllK ) 

Qly Order No TitH Unit Price Total 



Sales tai (N Y stale residents only) 
Postage and handling 



Enclosed S I iChecK ( (Money Order TOTAL S 

Bill ( (Visa 1 IMaslerChaige ' 



Card* 
Eip Date 
Signatu'C 
Name 
Address 



Ptior>e( I. 



Cily Stale Zip 

Mailed Fusl Class but aiiow 3 to * wee*s lor delivery no C D orders 
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EixydoiMdii for ttn TRS«0* 

What's the key to getting the most from your 
TRS-80*? No, it isn't disk drives or printers or joy- 
sticks. It's information. Without a continual sup- 
ply of information and ideas, you cannot realize 
the full potential of the TRS-80V 

Our response to the clamor for additional infor- 
mation IS the Encyclopedia for the TRS-dO', a ten- 
volume reference work of programs and articles 
carefully selected to help you make the most of 
your microcorftputer. You can consider the 
volumes of the Encyclopedia to be an extension of 
the documentation that came with your TRS-flO* 
Each bcK>k is full of material on programming 
techniques, business, language, hardware, games, 
tutorials, education, utilities and interfacing. 

Unlike conventional encyclopedias, the 
Encyctopedis for tfte TRSSO* will r»ever become 
stale or out of date. That's because the volumes of 
the Encyclopedia are being issued one-al-a-lime. 
approximately six weeks apart. This means that 
each new volume will reflect the latest develop- 
ments and discoveries, making this a living ency- 
clopedia for TRS-60" users 

The first four volumes are being issued during 
1961. Theremaining volumes will be issued during 
the first half of 1982 The deluxe COLLECTOR S 
LDITION has a handsome green and black hard 
cover with a dust jacket. 
A soft cover edition is also available. 

PEALtRS Please request discount information 
and catalog when ordering. Mail Dealer orders 
ATT: Wavne Green Books Dealer Sales. 

WAVNI C»EN BOOKS 

A divmcM at W*vn» tUm» Im - 

Pine Street * 

P.-*. <' -^ NH 03450 
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Encydopsdia Uadar 

The editors at Wayne Green Books want to help 
you use the programs in your Encyclopedia fortf>e 
JRS-80'. So to help you maximize the use of your 
microcomputing time, we created Encyclopedia 
Loader tM. 

By a special arrangement with Instant Soft- 
ware'^. Wayne Green Books can now provide you 
with selected programs contained in each volume 
of the Encyclopedia for the 7RS-80' on a special 
series of cassettes called Encyclopedia Loader'^ 
Your encyclopedia provides the essential docu- 
mentation but now you'll be able to load the pro- 
grams instantlv. 

With Encyclopedia LoaderiM you'll save hours 
of keyboard time and eliminate the aggravating 
search for typos 

Save money with this introductory offer 
Encyclopedia Loader^M for Volume 1 of 
Encyclopedia for the TRS-SO' which will normal- 
ly ( ost S1 4 95 IS available for a limited time only at 
the introductory price of $12.9S. 

To order spec if y EL8001 $12.95. 
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SPECIAL OFFER 




REE 



If you order the entire 
ten volume set of the 
Encyclopedia ior the 
TRS-80? you'll receive 
the tenth volume FREE! 

10 Volume deluxe 
hard cover COLLECTOR'S 
EDITION -a $199.50 value. 
$164.00 EN8100 postpaid 

10 Volume soft cover 
edition, a $109.50 value. 
$83.00 bN8080 postpaid 




YES, I want your specUl offerl 



10 Volume deluw hard covM 

COUICIORS tDITION-J 
JIOTSO value JNfllOOSlWOO 

To order Jin^e hard cov«r volumes 
o^(twfncycfop«/M please ipectK: 



in Volume solt cowf t'CIHior 
-aS109.S0value. CNaOHOWJUU 



To ontc-f single «otl covet volumes 
of the Encydopeda pleaw *pecrfv: 



Volume 1 


EN«t01»19 95' 


Volume 2 


E>«102H9 95- 


Volume i 


Et4«10JM995* 


Volume 4 
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Volume 5 


EN8105»19.95' 


Volume 6 


|N810tpS1995" 


Volume 7 
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Volume 8 


tN810fiil995' 


Voluiit«9 


fNB109$199V 


Volume 10 


ENai10S1995* 


MFNTFNirirXlFn 



. Volume 1 
.Volume 3 
.Volume^ 
.Volume 4 
. Volume 1 
.Volume 6 
. Volume 7 
.Volumes 
.Volume 9 
.Volume 10 
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IlUCARDPROVIDtDIO 
WAYNE GREEN BOOKS 
SALES DEPT. PINE ST, 
PE 1 1 Rt*OROUCH, HH J458 
()K( Ml TOIt rREC 
1-600-2 Sa-S473 
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PLEASE CHARGE TOMY VISA MASTERCARD AMEX 

CARD# INTERBANK* tXPIRFS 

NAME^ . 



ADDRESS 
CITY 
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ZIP- 
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Here's a way to keep track of your times. 



The Runner's Logbook 



G. Michael Vose 

80 Microcomputing Technical Editor 

■ J| aintaining physical fitness might not 
be considered a hobby by some peo- 
pie. I classify any activity performed and en- 
joyed on a regular basis as a hobby. For me, 
that includes running. 

I ran track and cross-country in high 
school. I enjoyed it, but stopped when 
school days were done. I started again four 
years ago to help overcome the damage 
done by six years of cigarette smoking. 
Plus, I wanted to enjoy the other health 
benefits of reguiar exercise— weight con- 
trol, increased vigor, sounder steep and the 
iike. i began tor these reasons and con- 
tinued because it was fun! 

i run 24-30 miies a week from April 
through early November and 15-20 miles a 
week during the winter months. Living in 
New Hampshire, I also cross-country ski in 
the winter. Until recently, I kept track of my 
3-5 weekly runs in a little notebook. I fre- 
quently misplaced the notebook and hated 
figuring out In my head my average pace for 
a run. So, I decided to write a Runner's 
Logbook program for my TRS-80. 



Tht Logbook 

Program Listing 1 is the Model 



version 




Photo 1. 80 Microcomputing Technical 
Editors Mike Vose and Chris Brown out for a 
training run on Peterborough s Pine Street. 
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of the Logbook, The program will run on the 
Model I using the few modifications at the 
end of this article. 

The Logtx)ok is designed to keep track of 
daily activities such as training runs and 
racing events. It is a Menu-driven program 
which offers instructions on entering data 
as it proceeds. It allows the entry of the 
following information: 

• Date of run or race; 

• Distance run in miles; 

• Time in hours, minutes and seconds; 

• Weather conditions; 

• Morning pulse rate; 

• Overall health evaluation; 

• Comments. 

Once the information is entered, the pro- 
gram calculates and displays the day's 
average pace per mile, in minutes and sec- 
onds, and your total mileage since starting 
the log. 

The first four categories of input are self 
explanatory; the othefs require some expla- 
nation. For a distance runner, the resting 
pulse rate measured first thing in the morn- 
ing is a good yardstick for determining if his 
training regimen is loo strenuous. If the 



resting pulse rate increases by eight to ten 
beats per minute, it is a good bet the runner 
is tired, possibly from training too much. 
Very often, the pulse rate will warn that 
fatigue is increasing before the runner actu- 
ally begins to feel tired. 

The overall health evaluation is merely a 
subjective measure of how the runner feels 
—from excellent to not so good, I did not in- 
clude "really rotten" because when I feel 
that way I don't run. 

Comments is a short field, containing on- 
ly 15 characters, designed tor a quick note 
about injury, how the run felt, or anything 
that seems worth recording. 

The program calculates average pace, 
the best measure of the qualitative differ- 
ence in runs from day to day. It also com- 
putes the year-to-date total mileage. That's 
a nice ego boost, especially near the end of 



The Key Box 

Models I « III 
Version 1.3 TRSDOS 



Program Listing 

10 ON ERROR GOT01638 

20 CL5iPRINTe405, 'RUNNER'S LOGBOOK'iFOR W-lTO1000iNEX1W 

30 'COPYRIGHT (C) BY G.M.VOSE 

40 CLEAR100:POKEie419,252 

59 FORI-1TO500:NEXT 

60 GosuBieee 

70 CLS:PRIHT:PRINTTAB(7)"THIS PROGRAM WILL NEED SEVERAL KINDS" 

80 PRIHTTAB(7} "OF DATA. USE THE FOLLOWING INPUT FORMAT FOR" 

90 PRINTTAB(7) "THIS DATA.":PRINT 

100 PHIHTTAB(15)"DATE! MO/DAY/YR (03/23/81) "" 

110 PRINTTAB(15) "DISTANCE: MILES. TOTrBS (5.5} ' 

120 PRINTTAB(15) "TIME: HR/HIN/SEC (0.43.15)" 

130 PRINTiPRI»ITTAB(7) 'ALL OTHER DATA CAN BE ENTERED BY SIMPLY" 

140 PRINTTAB(7} "PRESSING THE NUHBER KEY CORRESPONDING TO A" 

150 PRINTTAB(7) "CHOICE YOU ARE OFFERED." 

160 GOSUB490 

170 CLS:PBINTiPRINT"ENTER THE FOLLOWING DATA: " 

180 PRINT:PRIHTTAB(15) "TODAY'S DATE: ";: INPUT DTS 

190 PRINTiPRINTTAB(15) "DISTANCE RUN: "jiINPUT DS$ 

200 PRINTiPRIHTTAB{15)"YOUR TIME: "jilNPUT TS 

210 PRINT:PRINT"WAS THE WEATHER: (1) SUNNY (2) CLOUDY (3) RAINY" 

220 PRINT" (4) SNOWY (5) WINDY OR (6) CALM'iiINP 

UT W$ 

238 CLS:PRIHT:PRINT"HHAT HAS YOUR PULSE RATE THIS MORMIWG"; .'INPUT 

PR$ 

pfogratn continues 



the year when you can boast of having 
1200 miles! 



run 



Body Fat and Oxygen Uptake 

The program also has two built-in self 
tests designed to help you approximate 
your maximal oxygen uptake ability, your 
ability to extract oxygen from the air during 
aerobic exercise, and to estimate your txxJy 
fat percentage. Remember, these are only 
estimates— laboratory measurements are 
likely to be slightly different. 

The maximal oxygen uptake is calculated 
by subtracting 133 from the speed in meters 
recorded during a 15 minute run. The result 
is multiplied by 0.172. Next, 33.3 is added to 
produce the final result, expressed as milli- 
liters of oxygen per kilogram of body weight 
per minute. A level of about 40 is considered 
a minimum standard of everyday fitness. 
This test, devised by Bruno Baike, showed a 
level of 73.312 for three-time New York and 
Boston Marathon champion Bill Rogers. 
This is close to the figure produced in the 
lab for Rogers. 

The trody fat test is based on the Pon- 
dural Index devised by exercise physiolo- 
gist E.G. Frederick. It computes body lat by 
dividing the athlete's height in inches by the 
cube root of his or her weight. My tests 
show it tends to underestimate body fat 
percentage as measured in a lab by 3-4 per- 
cent. The average male should be in the 
14-20 percent range. The average female 
will test out at 18-24 percent. Runners test 
out at 6-13 percent for males and 10-14 per- 
cent for females. 

To use either self test, follow the on- 
screen instructions. You need to know your 
height in inches and your weight for the 
body fat test; the oxygen uptake test re- 
quires you to input the miles you can run in 
fifteen minutes. 



Modifications 

I use the Logbook to keep a year's worth 
of records in each data file. When a new 
year rolls around, I copy the program onto a 
separate disk and start a new data file tor 
the upcoming year. I label the disks accord- 
ing to year if I plan to keep them (I usually 
do, since I run in the same races year to year 
and mark improvement by my previous 
year's time). If desired, you can modify the 
Open statements in lines 1190, 1220 and 
1290, 1390 to specify a new data file. Replace 
"Data" with another file name, run the pro- 
gram and the new file will be created on the 
same disk. 

Model I users should delete line 40. This 



line accesses the Model 111 character set and 
POKES the value for the t»xed question 
mark cursor into the Video Device Control 
Block of memory. 

Model I users have to modify the disk I/O 
routine. I have taken advantage of Model 111 
TRSDOSs (Version 1 .3) ability to set variable 
length files (don't use TRSDOS Version 
1.2 — it does not understand how to manipu- 
late variable length files). This is done by 
answering the How Many Files? question 
during Basic initialization by replying 2V 
This sets aside two variable length files. Pro- 
gram tines 1190. 1220 and 1290, 1390 each 



"/ did not include 

'really rotten' because 

when I feel like 

that I do not run ." 

contain a 45 after the data f ilespec. This sets 
the logical record length at 45 characters. 
Model I users should delete the 45 from 
these lines. 

To add the capability of storing data for 
speed workouts over and above your endur- 
ance training, add a separate subroutir 3 and 
another menu option. If you cannot write the 
code to accomplish this task, drop me a note 
care of 80 Microcomputing and I'll offer 
some suggestions. 

If you ever visit Peterborough, NH, stop by 
our Pine Street office and we'll go out for a 
run.H 



The Compass 
pointing the way to 
the right running shoe 




The COMPASS machine. COMPASS is 
an acronym for COMPuter Assisted 
Shoe Selector 



by G. Michael Vose 

80 Microcomputing Technical Editor 

t was only a matter of time before some- 
one invented a computer to sell shoes. 
After all, selling shoes is like collecting 
garbage or cleaning fish — it's one of 
those )obs someone has to do, but who 
wants to do it? 

The concept of a mechanized shoe 
salesman is not entirely new. Sears, 
Roebuck and Company pioneered a ma- 
chine to measure and test feet for the 
proper shoe fit back in the 1950's. This 
device measured size and width and could 
even perform a crude calculation ol arch 
strength. It was more of a gimmick than a 
serious attempt at scientific measure- 
ment, but it served Sears' purpose for 
several years. 

Thirty years later, in the hustling 1980s, 
the Nike Running Shoe Company is using 
a computerized salesman named Com- 
pass to sell the 35 different models of run- 
ning shoes the company has developed 
over the last six years. The machine uses 
a Zilog Z80 microprocessor and a 2K byte 
PROM to quiz the potential customer. The 
short machine language program in the 
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"Interestingly, the machine 
makes no distinction 
between sexes." 



PROM compiles the results to display a 
numtier on an LED located on the front 
panel of Compass. The number desig- 
nates one of 15 different shoe categories 
and lists them on the front panel. 

What makes this exercise worthwhile is 
the series of test questions addressed to 
the buyer. They help the athlete evaluate 
his or her running needs in a fairly scientif- 
ic way before he purchases footwear for a 
sport which subjects the muscles and 
skeleton to high levels of physical stress. 

The test consists of ten questions, to 
which the buyer responds by pressing 
keys marked A, B, or C. representing three 
possible answers. These questions and 
answers are printed on the front panel. 
Below the front panel is a mirror with a 
drawing of a human foot with a measure- 
ment scale alongside it. 

The ten Compass questions evaluate 
these factors: 

• Height 

• Weight 

• Age 

• Weekly mileage 

• Training pace 

• Number of years running 

• Part of the foot the runner lands on 

• Sitting arch height 

• Standing arch height 

• Frequency of injury. 
Interestingly, the machine makes no 
distinction between sexes. 

Of the fifteen shoe categories, two ma- 
jor categories cover most runners. Each 
category contains ten to twelve shoe 
models. The remaining thirteen catego- 
ries contain models designed for soecial 
problems— high mileage, weak arches, 
heavy runners, or racers' needs. 

Nike has placed 170 Compass ma- 
chines in stores around the country. They 
feel that when used by a knowledgeable 
salesperson, the machines can give a buy- 
er confidence in a shoe design. The selec- 
tion of a running shoe is not a matter of 
cosmetics: The wrong shoe can cause in- 
jury. The Compass machine, like all com- 
puters, is designed to reduce error. 

Nike is now contemplating a modifica- 
tion to Compass. It would allow an individ- 
uals statistics to t>e saved on disk or tape. 
The statistics compiled from this data on 
the running population could then t>e used 
to develop new and better running shoes. 

Here's hoping they let us continue to be 
in charge of choosing our own shortslB 



P'ogram continued 

240 PRINT:PRINTTAB(10) "WOULD YOU DESCRIBE YODR FITNESS AS) 

(1) EXCELLENT 

(2) COOD 

(3) OK 

(4) NOT SO GOOD";:INPUT K5 
250 PRINT!PRINT"COHMENTS? ";:INPUT AT$ 

260 PRINTe980,"ARE THESE ENTRIES CORRECT (Y/N) "jiINPUT ZAS 

270 IF ZAS<>"Y"THENGOTO170 

280 CLS:PRINTe272,"** WRITING DATA TO DISK •*" 

290 RETURN 

300 FORI«1TO1000:NEXT 

310 IFDSS=""THENCLS:PRINTe400,"YOU HAVE NOT ENTERED ANY DATAl'tPGR 

X=1TO500:NEXTX:GOTO1080 

320 H$=LEFTS(TS,2) :M5=HID5 (TS, 3 ,2) :SS="RIGHTS (TS , 2) 

330 H=VAL(HS) !M=VAL(H$) :S=VAL(SS) : 

340 DS=VAL(DSS) 

350 T={H*3600)+IM*60)+S: ■ CONVERT ALL VALUES TO SECONDS 

360 P=T/DS 

370 P1=INT(P/3600):P=P-(P1*3600) 

380 P2-INT(P/60) :P-P-(P2*60) 

390 CLSjPRINT@262, "TODAY'S AVERAGE PACE WAS' ; P2 ; "MINUTES ■!lNT(P+. 

5);"SEC0NDS PER MILE" 

400 PRINT:PRINTiPRlNTTAB(6)"Y0UR TOTAL MILEAGE SO FAR THIS YEAR: " 

;RT 

410 GOSUB 490 

420 CLS:PRINT§271,"HERE ARE TWO SIMPLE SELF TESTS" 

430 PRINT:PRINTTAB(19) "1. OXYGEN INTAKE 

2. BODY FAT LEVEL 

3. RETURN TO MAIN MENU" 
440 PRINTe978, 'CHOOSE 1, 2 OR 3";:INPUTBlS 
450 ON VAL(Bl$)GOTO 510 ,660 ,1090 

460 GOTO 

470 CLS:PRINTe256,"BILL ROGERS SAYSi 'ALWAYS DO STRETCHING EXERCIS 

ES BEFORE AND 

AFTER A RUN'. HE SHOULD KNOW.'iEND 

480 GOTO 

490 PRINTe980, "PRESS <ENT£R> TO CONTINUE" 

500 QQS-INKEYS: IF QQSOCHRS ( 13) THEN 500 ELSE RETURN 

510 REM**** OXYGEN INTAKE ***** 

520 CLS;PRINT:PRINT"AFTER RUNNING AS FAR AS YOU CAN FOR 15 MINUTES 

■ 

530 PRINT"RECORD YOUR DISTANCE IN MILES." 

540 PRINT: PRINT"TYPE IN YOUR TOTAL DISTANCE; ";: INPUTMl 

550 M2=Ml*1609.334 

560 M3=H2/15:OX=(M3-133)*0. 172+33. 3 

570 PRINT@720,"** COMPUTING **":FOR TT=1TO50:NEXT TT 

580 PRINT§720,"** COMPUTING **":FOR TT-1TO50: NEXT TT 

590 FOR W=1TO1000:NEXTW 

600 CLS:PRINTe391,''Y0UR ESTIMATED OXYGEN UPTAKE IS " ;0X; "MILLILITE 

RS" 

610 PRINTTAB(7) "PER KILOGRAM PER MINUTE." 

620 PRINT:PRINTTAB(7) "BILL ROGERS TESTS OUT 'j 

630 PRINT"AT OVER 78 FOR MAX V021" 

640 GOSUB490 

650 GOTO420 

660 REM ••••* BODY FAT ***** 

670 CLS;PRINT:PRINT:PRINTe265,"THIS BODY PAT EVALUATION IS BASED 

N THE" 

660 PRINTTAB(9)"'P0NDERAL INDEX' WHICH IS A RATIO OF HEIGBT" 

690 PRINTTAB(9) "TO WEIGHT." 

700 PRINT:PRINT:PR1NT"FIRST, TYPE IN YOUR HEIGHT IN INCHES "jiINPU 

THl 

710 PRINT: PRINT"NOW, TYPE IN YOUR WEIGHT " i : INPUTWl 

720 FOR X=lT01fl 

730 PRINTe980,"** COMPUTING **";:FOR W=1TO50:NEXTW 

740 PRINTe980," " ; : FOB W=1TO50 iNEXTW 

750 NEXTX 

760 W2=W1 1(1/3) 'CUBE ROOT FORMULA GOES HERE 

770 MH-H1/W2 

780 IF MM>13.59 THEN CLS : PRINTe400 , "GREAT ! YOUR BODY IS LESS THAN 

Program corJiinues 
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PENULTIMATE 

Space War Game 

is HERE! 






dventur6 

INTERNATIONAL 

A DIVISION OF SCOTT ADAMS, INC. ^ 

BOX 3435 • LONGWOOD, FL 32750 • (305) 862-6917 

ORDER FROM YOUR FAVORITE DEALER 
or CALL TOLL FREE (800) 327-7172 
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TRS-80* 

Model 1 & 3 

16K and up — Tape 
010-0102 S24.95 

32K and up — Disk 
012-0102 S29.95 
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CHRISTMAS 

SHOPPING LIST 

CIN lUMMT 3M The b«t card game ever 
put into a coinputer Plays a full regulation 
game, with layotfi. knocks at 10 potnts or less 
Changes strategy to counter your play Disk 
version keeps score from game to game. 

TflS-W Caaa. tIMS DMi S21.9S 
Atari 34K Can. |19.«S Ditk S24.9S 
CASINO ILACKJACK/COUNTER Learn to 
beat the house with card counting, practice 
strategy with a tireless dealer Very realistic 
simulation of j casino table; uses complete 
casino rules House' deals with 1 to 6 decks 

TRS-M CaH. SU.95 DU S19.95 
AUri 1UC Cam. I14.9S Dbk S24.9S 
CIIIIACE MASni A sharp card partiwr; 
plays hard for every point in play, hand and 
crib. Counts every play point, His Nobs, His 
Heels, and will Muggins you if you make an 
error. Excellent cardgraphics 

nS«0 Cmm. tU.95 OU %^9.K 
CONCENTRATION Match the pairs of 
figures on the screen — superb graphics, with 
sound Ideal game for children of all ages 

TitS40 Caj*. S9.95 
AtaH 1UC C«M. SU.9S 

LAIYRINTH RUN Set a time record as you 
whiz through turns, slaloms arxJ reverses, but 
hit a wall and you're outi High speed graphics. 
TRMO Cua. M.9S 
AUri 1UC Ca«. S14.95 Obk 119.95 
YACHT Roll five dice and fit the results into 
12 scoring categories. Up to 4 players; on- 
screen dice graphics TRMO Cua. S1 4.95 
Atari ItK Caaa. $14.95 
TRMO VGAME PACK CIn, Cribbage and 
Blackjack on a single disk at a substantial 
saving $39.95 
ATARI 3-CAME PACK Gin, Blackjack and 
Concentration on a single ditk. S39.95 
SALES TAX ACCOUNTANT Handles the 
problems of calculating quarterly reports. 

TRS-U Cau. »14.95 
ONE-DISK MAILING LIST Holds over 450 
names, addresses on one disk; includes conv 
pany name; new 10-digit zips. Prints one-up 
labels and note-book format listing. Sorts by 
name or zip; prints user-selected labels, with 
up to 5 codes for each entry Mod I disk conv. 
to 111. TRS-80 Diik $34.95 

THE LISTIMAKER II Holds 400 names or 
items, plus codes, in 16K; sorts and prints total 
list or code-selected entries Not a mailing list 
Mod III version holds 385; specify when order- 
ing. TRMO Caw. $9.9S 
CHECKROOK PLUS Solves the problems of 
monthly checkstub and bank statement recorv 
ciliation Screen-prints TRS-HCua.$1D.9S 

PRINTING CALCULATOR Chain and mixed 
calculations, constants arxJ memories; op- 
tjonal doJIar format. Prints calculation steps 
and results on full-size TIS«) Caa. »9.9S 

LOAN AMORTIZATION II Monthly pay- 
ment, interest, principal, with annual tunv 
maries. in clean dollar format for any siie 
straight-lir>e loan. Screen prints on full-iize or 
QP-II. TR&40 Can. $7.95 

CALCULATOR 4 CHECKIOOK Both on a 
single combination disk or cassette, with Loan 
Amortization II included as a bonus. 

TRS40 Can. $17.95 Dhk $32.95 
LIFE LIST Special program for birders, sorts 
& keeps track of sightings Searches list by 
name, date, place Prints overall, search lists 
Mod I disk conv to III TRS40 Dbk $24.95 

QSO LOG Special program for amateur 
operators; holds all details of 70 QSO's in 1bK, 
190 in 32K (specify) Instant orvscreen access 
to entries; prints sorted calls and details. 

TRS40 CaM. $14.95 



MANHATTAN SOFTWARE 

P.O. BOX 1063 
WOODLAND HILLS, CA 91365 

All AUri prograM D^arala wllli loyiHdu. 

10M dbcMint on orden a( I or mort fromitmt. 

AMILSttUMrVwidlMnriUiv- Ithoar JtipmML 

OvarMH w4m add Tl« lot Alt Mall PoMaga. 

CiWoffiU TwHewh aM V% lu. 

24-hour Vlf/MtiltrC§rd Order Line. 

[213)704-8495 ^9o 



Program continual 
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1% PAT.";GOSUB490 
799 IF MM>13,59GOT042fl ELSE GOTOSaB 
880 IF MM<13.59 AND MH>13.55 TBEN BF-1 
810 IP MM<13.5S AND MM>13.5fl THEN BF=3 
820 IF MM<13.50 AND MH>13.45 THEN BF-4 

IF HM<13.45 AND HHM3.40 THEN BF-5 

IF MM<13.4fl AND MMM3.35 THEN BF-6 
858 IF HM<13.35 AND HH>13.30 THEN BF=7 
860 IF MM<13.30 AND MMM3.25 THEN BF-B 
878 IP MM<13.25 AND MMM3.28 THEN BF-9 
B80 IF HH<I3.28 AND HHM3.15 THEN BF-10 
898 IF MM<13.15 AND HH>13,1B THEN BF-11 
900 IF MM<13.10 AND MMM3.05 THEN BF-12 
910 IF MH<13.05 AND MM>13.00 THEN BF-13 
920 IF MM<13.00 AND MMM2.95 THEN BF-14 
930 IF MM<12.95 AND MMM2.90 THEN BF=15 
940 IF HH<12.90 AND MM>12.85 THEN BF-16 
950 IF MH<12.a5 AND MM>12.88 THEN BF=17 
960 IF HM<12.80 AND Mn>12.75 THEN BF-18 
978 IF KM<12.75 AND MM>12.7fl THEN BF-18 

IF MH<12.78 AND MM>12.65 THEN BF»19 

IF MM<12.65 AND MM>12,68 THEN BF-=20 
1800 IF MH<12,6fl THEN BF-21 
1810 GOSUBi060 

1828 CLS!PRINT#400,'YOUR BODY IS "jBF;"% FAT." 

1838 PRINTiPRZNT'THE AVERAGE FOR MEN IS 15-20%, FOR HOHBH 20-25%.' 
1840 GOSUB490 
1058 GOTO420 

1060 FOR V-1TO1000!NEXTV:RETURN 

1070 CLS!PRINTg271, "THERE HAS BEEN A SERIOUS MISTAKE t " :GOTOl070 
1060 CLEAR 1000: 

1090 CLSiPRINTTAB(22) "RUNNER'S LOGBOOK KENU" 
1100 PRINTSTRING$(63,45) 

1110 PRINTTAB(22) '1, ADD LOGBOOK ENTRIES 
1120 PRINTTAB(22)"2. DISPLAY AN ENTRY 
1130 PRINTTAB(22}"3. CALCULATE PACE U MILEAGE" 
1140 PRINTTAB(22)"4. SELF TESTS" 
1150 PRINTTABC 22) '5. EXIT 

1160 PRINT:PRINTTAB{22) "YOUR CHOICE" j : INPUT C:IF C<1OBC>5THEN1160 
1170 ONCGOTO1180 ,1380 ,310 ,420 ,470 
1160 GOSUB70 

1190 OPEN"R",l,"DATA",45 

1200 FIELD 1,BASA$,4ASB$,8ASD$,2ASE$,2ASF$,2A5I$,15ASTAS,4ASG$ 
1205 EE-L0F(1):IF EE-8THEN CLOSE:GOTO12e0 
1210 PUT1,1:CL0SE 
1220 0PEN"R",2,"DATA",45 
1230 FIELD2, 41ASS$,4ASL$ 
1240 EE°L0F(2> :GET2,EE:CL0S£ 
1260 DS-VAL(DS$) 
1270 RT-RT+DS 
1280 RTS=STRS(BT) 
1290 0PEN"R",1,"DATA",45 

1308 FIELDl, 8ASAS,4ASB$,6ASDS,2ASES,2ASFS,2ASI$,15ASTAS,4ASG$ 
1318 LSETAS-DTS:RSETBS=DSS:RSETD$-TS!RSETE$-WS!RSETFS"PRS 
1320 RSETIS-^KSsLSETTAS-ATSiRSETGS-RTS 
1330 EE-LOF(l) 
1340 EE-EE+1 
1350 PUT 1,EE 
1368 CLOSE 
1370 GOTO1090 
1380 PRINT 

1390 OPEN"R",l,"DATA",45 

1400 FIELD 1,BASA?,4ASBS,8ASD$,2ASES,2ASF$,2ASI$,I5ASTA$,4ASG$ 
1410 LINEINPUT'WHAT IS THE DATE OP THE ENTRY YOU WANT TO SEE: "102 
S 

1420 FOR PE-=1T0L0F(1) 
1430 GET 1,FE 
1440 IF D2$<-A$ THEN 1460 

1450 NEXT FE!CLOSE:PRINT"ENTRY NOT FOUND" : FORKK-lT075a :NEXTKK jGOTO 
1090 

1460 CLOSE 

1470 PHINT!PRINT:PRINT 

1480 CLS:PRINT:PRINTTAB(22)"DATEi ";AS 
1490 PRINTTAB( 22) "DISTANCE RUN: "fBS 
1500 PRINTTAB<22)"TIME :"rDS 

1510 IF E$=" l'THENPRINTTAB( 22) "WEATHER WAS SUNNY" 
1520 IF ES=" 2"THENPRINTTAB[22) "WEATHER WAS CLOUDY" 
IF ES-" 3"THENPRINTTAB(22) "WEATHER WAS RAINY" 
IF ES=" 4"THENPRINTTAB(22) "WEATHER WAS SNOWY" 
1550 IP ES-" 5"THENPRINTTABI22) "WEATHER WAS WINDY" 
1560 IF ES-' 6"THENPRINTTAB( 22) "WEATHER WAS CALM" 
1570 PRINTTAB( 22) "PULSE RATE WAS: "jFS 
1580 PRINTTAB( 22) "FITNESS LEVEL WAS; "jlS 
1590 PRINTTAB(22) ;ATS 

16B0 PRINTTABt 22) "TOTAL MILEAGE TO DATE IS: "iG$ 
1610 GOSUB490 
1620 GOTO1090 
1630 CLOSEiPRINT"OOPSl"!STOP 



1530 
1540 
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ow's your 
love life? 




A little dull around tnc edges 

Routine? Predictable? Boring? Maybe 

all it needs is a little Interlude. Interlude is 

the most stimulating computer game ever conceived. 

It combines a computer interview, an innovative 

programming concept, and a one-of-a-kind manual to 

turn yotw love life into exciting, adventurous, delicious fun! 




Interlude l«: romantic... playful.,. outrageous... a fantasy. Interlude is: ■ A Bed of Roses (Inter- 
lude #1) ■ Mata Hari {Intt^rlude #49) ■ The Chast- (Interlude #7) ■ Rodeo! (Interlude #71) ■ The King and I 
(Interlude #60) ■ Some Enchanted Evening (Interlude #84) ■ Caveman Caper (Interlude #82} ■ From Here 
to F.cstasy (Interlude No. 30) ■ Satin Dreams (Interlude #72) 

More than 100 Interludes are included in the program. Most are described in detail in the accompanying manual, 
but several surprise Interludes are buried in the program awaiting that very ^^e? 

special time when your interview says you're ready. (When you leam secret T^^^ J j-fc-afft» , J J^ 
tnteriude #9*^ y<:>ur love life may never again be the same!) Interlude ^ MlT^ ^ ri M jl C jl ^ ? 



can give you fxjii^riences you'll never forget Are you ready for it? 



The Ultimate Experience. 



INTERLUDE. Dept. BO, 10635 Richmond Avenue, Houston, Texas 77042. I'm realty ready. Send my Interlude today. 



Appl«II(16KI* TRS-80 (Model 1. IdK)" 

..1 Ca^seiie ($18.95) r Cassette ($18 95) 
■^ Diskt'ite ($21,95) D Diskette ($21 95) 

Diskette - Pascal or DOS 3,3 ($21 95) 
Add $1.75 for shipping and handling. 

n MASTERCARD G VISA 
Account No. 



Poster 

C 20"x 24" reproduction of 
this ad without ad copy 
($4.95— includes 
shipi^ng charges) 

All charge customers must sign here 

Expiration date 



Available for Immediate shipvant. 

Please enclose your check payable to INTERLUDE 
or complete "the charge information: 



MasterCard Bank Ccxic 



CHARGE CUSTOMERS: Order by phone toll-free! 1-800-231-5768 Ext. 306 (Texas: 1-800-392-2348 ExL 306) 

Name , . _^ „_^ ^Agc 

Address ^ . . ___^ . ^_^ , 

City 



State 



Zip 



'flipfie II is a regei«red trademark of Apple Computers, inc **TRS-80 is a registered trademark of Radio Shack, a Tandy Co. 



^[^TRS-80* Computer Owners... 

Light Up Your Christmas Tree 





I'm dreaming of a mini-disk Cliristmas... 

A dream come true: 
Mini-Disk Drives 

from 

• Every Access Floppy Disk drive is electrically tested, mechan- 
ically tested and burned*in 48 hours under operating condi- 
tions. Look for the signed test list in the shipping carton. 

• AFD drives are capable of either single- or double-density op- 
eration. AFD-IOO'" drives store 102-Kbytes in single-density, 
180 Kbytes in double density. AFD-200 " drives store 205 
Kbytes in single-density, 364 Kbytes in double density. And 
these are formatted file storage capacities. Moreover, you can 
store twice these amounts on a single diskette using AFD 
■flippy" drives (AFD- 1 0OF " or AFD-200F"' drives). 

• 15-day free trial offer . . . comprehensive 90-day limited war- 
ranty . . . unbeatable prices . . . AFD-IOO ui $275.00. -100F 
(u $329.00, -200 "' $429.95. -200F (<t $449.95. 

White they last! 

Percom TFD-200t 77-track add-on drives $375 



'All I want for Christmas Is.,." 

Percom Model III Mini-Disk Drives 

Internally mounted drives that feature "flippy" capability, double- or single- 
density storage, comprehensive pre-delivery testing. 48-hour burn-in and. best 
of all, Percom's widely acclaimed disk controller. A First-Dnve System includes 
the four-drive disk controller, one or two dhves, cables and a fully illustrated 
owners manual. Use Model HI TRSDOS*, Percom OS-80 1 and other Model III 
compatible DOSs. 

First-Drive System wl drive $560, 

w/2 drives $860 

Note: If you prefer not to make the First-Drive System installation, we will 
do it for only S29.95 plus shipping (if shipped). This includes a 48-hour 
operating burn-in of your Model III computer, installation of the drive sys- 
tem and final checkout of the expanded system. 



. 



How to ordsr- Order by ciiUing Access UnNmiledlol>-lreG on t-S00-S27-347S. Or (Hctefby rna<[ 
Orders may be cnaraocl lo a VISA cm Master Ca'O accounl. or paid t>y casnier s check certilied 
check 0( money nroer COD oritets 'ecju>re 2^°d aepos<I Sorry we caimol accept personal 
checks We pay shipping ana msuiance cfiargos on orders over S1 CXXl 00 Add apQfOximaie m* 
surance arid shipping charges lor orrSers urwJri' S', 000. 00 II indouOl about tliMe charges ash 
when you can in your order Texas residents irx:lude 5°. sa>es lai Winirnum rraii order S20 00 
Alkiw 2 lo 4 weeks lor delivery 
Technical & Tenas (2>4) 690-0206. 

Save! Ask about quantity discounts for TRUGs. 

Save! VISA and Master Card charges are not deposited 

until the day your order is shipped. 



PRICES AND SPECIFICATKXS SUBJECT TO CHANGE WITHOUT NOTICE 



Stocking Staffers 



Percom Data Separator 
Green Screen I. II, or III 
Head Cleaning Kit 
Dnve Numbering Tabs (pkg 0-3) 
S'A" Flip-N-File (Ig. stocking) 
8" Flip-N-File (very Ig. stocking) 




$23.95 

$18.95 
S24.95 
$3.00 
S24.95 
539,95 




With Presents from 



The best gift often comes in a small package. The Percom DOUBLERf is an example. 

Upgrade Your Model I to Double Density for 

only $159.95 

And not with some unproven hacker s kit, either. But with an assembled and fully 
tested Percom DOUBLER-in. The DOUBLER-IH simply plugs into the disk drive 
controller socket of your Expansion Interface. Then it lets you store over four 
times more on one side of a diskette, depending on the drive, than you can store on 
standard Tandy Model I drives. Other features: • Reads, writes and formats either 
single- or double-density • Includes DBLDOS'", a TRSDOS' compatible disk- 
operating system "Runs TRSDOS". NEWDOStt. Percom OS-80t and other 
single-density software immediately. Change to double-density operation when con- 
venient • Lets l\/1odel III software be read on your Model I • Includes on-card high- 
performance data separation and write precompensation circuitry. 






Write Santa a Thank-you Note 

on Your New MX-80 

or Microline 80 

These popular printers, from Epson and 
Okidata, provide the features you want, the 
reliability you need ~ and the price is 
unbeatable. 

MX-80: Call for latest low price Microline 80 only $399.95 

*;,: For a man who has everything, including 
^J too many peripherals for a computer with 
•,.fj. only one printer port... 

% An Arrick Products Quick-Switch^: 

'^f , The OLiick-Swilch lets you easily swilch youf TRS-80* printer outpul Irom 

ft* device #1 lo device *2 - Iforr your printef lo yojr Eleclnc Crayont Or. 

V use It lo switch one pefipheial between computers Optionally available 

■M with Ihree^porls Also, versions conligured tor RS-232 or Centronics inter- 

|L : facing. Standard unit includes 5-lool 34-pin cable with card edge socket, 

M bOK-mounled 34-pin card-edge plugs From S79.95 
J trademark o( Arnck Products Company 




Low Cost 
System Furniture 

Modular design permits cus- 
tom arrangements • Furniture 
styling and quality • TRS-80* 
colors • OK for UPS shipping 
• Reassemble without tools 

System desks from $115 
Printer stands from $144 



Save! Make ACCESS your one-call shopping center for TRS-80* 
hardware and software Call our toll-free order number for free 
product literature and latest prices. 



■ 



AUTHORIZED 
PERCOM SALES AND SERVICE CENTER 



ACCESS UNLIMITED 



^ Toll-Free 

:^ Order No. 

1 1 -800-527-3475 



(orders & literature only) 



401 N. Central Expressway #600 
Richardson. Texas 75080 
(214) 690-0206 



' liaoemaik ol Access UrUiiTMied 
tTiadeiTiarii of Percon^ Data Comciany, fnc.! 



v'329 



■T'ii!ipma't< of T.-irrlv Rad'O Sbat* CofOWBhon 
ttTriHldt-Mrli ol Appdidt Co'pO'aiioi' 



^Ses List ol Aavenisers on page 4 iB 
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APPLICATION 



LOAD 80 



Youll stamp your feet over this inventory program. 



The Philatelist's Friend 



Program Listirig 1 

10 CLS:PRINTTAB(15)"**** PHILATELIC INVENTORY ii ••♦•"sPRINT TAB 

(19)"**** IMPORTANT NOTICE **'"":PRINT 

15 PRINT"SINCE PROCESSING TIMES FOR FILES CONTAINING IN EXCESS 

F 50" :PRINT"FULL INVENTORY RECORDS BECOME PROGRESSIVELY LONGER, 

IT IS":PRINT'RECOMHENDED THAT SUCH FILES BE DIVIDED INTO TWO OR 

MORE"" 

20 PRINT"SMALLER FILES" :PRINT: INPUT"PRESS <EHTER> TO CONTINUE" ;X 

:CLS 

90 CLEAR 2500:DEFSTR S,Y,D:DEFINT Q,R,C,P,L 

95 DIMS1(120,13) ,Ll(20) ,PS(20) 

10B CLS: PRINT TAB(17)"**«* PHILATELIC INVENTORY ***•" 

105 PRINT TAB{10)"THIS PROGRAM CREATES AN INVENTORY OF REGULAR": 

PRINT TAB(7) "AND COMMEMORATIVE POSTAL ISSUES FOR (ENTER COUNTRY) 

": PRINT 

110 PRINT TAB(7) "COUNTRY"jTAB(32) j:lNPUT CS:PRINT 

115 PRINT"WHAT IS THE LOWEST SCOTT CATALOG NUMBER" : INPUT"ABOVE W 

HIGH A FULL INVENTORY IS DESIRED" )D:PRINTiPRINT"CAPACITY 120 I 

SSUES": PRINT 

120 INPUT"THIS IS FILE #";Q 

390 CLS!PRINT"THIS IS INVENTORY PILE NUMBER— ";Q 

395 INPUT"INVENTORY TO BEGIN WITH YEAR— ";Y1 

400 INPUT" INVENTORY TO BEGIN WITH SCOTT CATALOG NUMBER— ";S1 

405 INPUT" INVENTORY TO END WITH YEAR— ";Y2 

410 INPUT" INVENTORY TO END WITH SCOTT CATALOG NUMBER — ";S2 

415 INPUT'PRICING IS BASED UPON CATALOG VALUES FOR YEAR--";Y3 

420 PRINTiPRINT TAB(14)"«*** FILE #"jQ;"-INPUT ROUTINE *••*- 

425 PRINT"TO END INVENTORY, ENTER THE SCOTT CATALOG NUMBER "S2:P 
RINT"SELECTED ABOVE FOR END OF FILE" 

430 IF VAL(Sl) <VAL(D) THEN PRINT" INVENTORY WILL INCLUDE ONLY USE 
D AND HINT SPECIMENS" : PRINT"FOR SCOTT CATALOG NUMBERS LESS THAN 
— ";D 

431 RsliPRINT 

500 PR1NT"SC0TT CATALOG NUMBER" ; TAB (32) ;: INPUT S1(R,0) 

501 IFS1(R,0)=S2THENCLS!GOTO1000 

502 IFVAL(S1(R,0))':VAL(S1)ORVAL(S1(R,0))>VAL(S2)THENPRINT"NOT IN 
THIS INVENTORY" :INPUT"HIT <ENTEB> TO CONTINUE" jX :GOTO500 

505 PRINT "NUMBER OF USED COPIES" ;TAB( 32) ;: INPUT S1[R,1) 

510 PRINT "AT CATALOG VALUE OF" ;TABt32) ;: INPUT S1(R,2) 

515 PRINT "NUMBER OF HINT COPIES" ;TAB{ 32) ;: INPUT S1{R,3) 

520 PRINT "AT CATALOG VALUE OF" , -TAB (32) ;: INPUT S1(R,4) 

525 IFVAL(S1(R,0) )<VAL{D) THENSl (R, 13) =STRS (VAL ( SI (R,l> ) 'VAL(S1 (R 

,2) )+VAL{Sl{R,3) )*VAL(S1{R,4) )) : SI ( R, 13) =RIGHTS (SI ( R ,13) ,LEN(S1( 

R,13) )-l) :PRINT"TOTAL CATALOG VALUE ABOVE" ;TAB (32) SI (R,13) 

53 a IFVAL ( SI ( R , ) ) < VAL ( D) THENR=R+1 :G0T05 00 

Program contmues 



Richard W. Castor 
345 South 51st Averjue 
Bellwood, IL 60104 
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^ake the world's foremost hobby more 
enjoyable by tying your computer to 
it. I am talking about stamp collecting— or 
philately— and my program, Philatelic In- 
ventory, that can be used to keep track of 
your stamps. 

The program is written in Basic for a 16K 
Level It TRS-80 and while simple enough for 
many to use. it is comprehensive enough 
for the more sophisticated philatelist. 

Data banks managed by computers have 
common limitations associated with their 
storage media and data storage time. 

Standard magnetic tape cassettes are no 
exception. Each time a PRINT*-! or 
INPUT#-1 data transfer routine passes 
through a For . . . Next loop or is otherwise 
transferred, 255 zero bytes followed by the 
synchronization byte (decimal 165) precede 
the data transfer. Since the Model I records 
at 500 baud (500 bils/second = 62.5 
bytes/second), each leader is about 4.1 
seconds long. 

Packing or blocking as implemented in a 



'Make the world's foremost hobby more 
enjoyable by tying your computer to it." 



program statement such as: "100 PRINT#-1, 
A(1), A(2), A(3), A(4), A(5), etc." is limited by 
the maximum size of the statement iine and 
the maximum record iength. 

By concatenating data into 248-byte 
strings (lines 1120-1178) the TRS-80 for- 
mats its own PRINT#-1/iNPUT#-l transfers, 
eliminating inefficient For... Next rou- 
tines. By reducing file lengths by a factor of 
10 in most cases, this technique permits 
massive data storage on an Inexpensive 
magnetic tape. 

For those who must disassemble every- 
thing, data string formatting is shown in 
Fig. 1. 



Program coritmued 

535 PRINT "NUMBER OF MINT PLATE BLOCKS" ; TAB( 32] ;: INPUT Sl{K,5) 
540 PRINT "AT CATALOG VALUE OF" ;TAB{32) ;: INPUT S1(R,6) 
545 PRINT "NUMBER OF HINT SHEETS' ;TAB [32 ); i INPUT S1(R,7) 
550 PRINT "AT CATALOG VALUE OF" ; TAB(32) j : INPUT Sl(R,8) 
555 PRINT "NUMBER OF FIRST DAY COVERS" fTAB{32) ; J INPUT S1{R,9) 
56B PRINT "AT CATALOG VALUE OF" ;TAB( 32) j : INPUT S1(R,1B) 
565 PRINT "SPECIAL SITUATIONS" jTAB(32} i : INPUT S1(R,1I) 
570 PRINT "AT CATALOG VALUE OF" ; TAB{32) j : INPUT S1(B,12) 
57 5 S1(R,13)=STR$(VAL{S1(B,1) ) *VAL(S1 ( B,2) ) +VAL{S1 ( R,3) )*VAL(S1( 
R,4))+VAL(Sl{R,5))*VAL{Sl(R,6))-fVAL(Sl(R,7) ) *VAL{S1 (R,8) )+VAL(Sl 
(R,9))*VAL(S1{R,19))+VAL(S1(K,11))*VALCS1{R,12))) :S1 (R,13) =RIGHT 
$(S1(B,13) ,LEN(S1(R,13))-1) 
576 PRINT"TOTAL CATALOG VALUE" ;TAB[32) SI (R, 13) 

580 R-R-^l 

581 IFR>12BTHENPRINT"PILE PULL" iGOTOieflB 

Program corjtinues 
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Fig. 2. Philatelic Inventory Matrix 
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". . . /■/ is possible to use about 
49 percent of each cassette. . . " 



Depending on the space between records 

separating records on a tape, it is possible f""' 
to use about 49 percent of each cassette for 
data storage (see Table 1). ^5' 

File Preparation, Program Level A, gener- 
ates the two-dimensional string matrix 
Sl(R,C) (see Fig. 2) and provides for simple 
editing before storing it. File parameters 
(C$, Q, Yl, Y2. Y3. SI, S2, D) are defined and 
the total catalog value (T) of the files are 
computed. 

When you answer the question, "What Is 
the lowest Scott Catalog Number (D) above 
which a full inventory is desired?", you sec- 
tionalize the tile and mai^e it possible for a 
less sophisticated stamp collector to limit 
his inventory to only used and mint speci- 
mens. For example, if the answer is 700, 
data for issues having catalog numbers 
1-699 IS entered only in columns 1-4; the 
matrix is effectively redimensioned, signifi- 
cantly reducing processing times. 

I omitted a numerical sort routine be- 
cause most collectors tallying their hold- 
ings will do it with a numerical reference in 
hand and sequential listings will be 
automatic. 



CO 

sm.o) 



SUI.I) 



C'2 

sin,2) 



SKI, 3) 



C-4 
SKI, 41 



C-13 

51(1,13) 



8 B 5 



3 4 











-R'Z-» 

C-0 

SI (2,0) 


SM2.I1 


C! 

5112,2) 


SIIZ.3 


C>4 

51(2,4) 


SH2.5 


C>6 

SllZ.fi) 


7 5 • • • 


1 


2-00 


3 


4-00 


5 


6-00 



-R-2 
81(2.7 


C-8 

SKZ.B) 


Sl(2,9) 


C'lO 

51(2,10) 


SHE, 111 


C'I2 
51(2,12) 


C"13 
5112.13) 


7 


8-00 


9 


10-00 


1 1 


12-00 


3 2 2 - 



KI-5aC-7B0 



72 C'll 74 



— R-3-* 

51(3.01 



9 ■ • • 



KI-86 



19 4 



Fig. 1 
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Computer Inlormation ExchanKe 

Box 159 (7H) 757-4849 ^n 
San Luis Key CA 92068 



Shack-so Model-l Users: 
Restore Reliability 

Tired of spontaneous r»-booting. "loss" of 
rnvmory, UL ERROR on programs that are 
correct, "BAD RAM" or ROM that is good and 
other symptoms of dirty edge connectors? 

CIE Cramol In cleaning kit lets yoo quickly, 
safely strip away coatings of high -resistance 
oxide films built upon . S-80's non-gold- 
platededge fingers, and coat them to reduce 
further buildup. Contains one bottle cleaner, 
one lubricant/sealer 
CIE Cramolin $8.95 ($9.49 CA) 

Silver Solder Rejuvinates 
Shack-80 Edge Connectors 

Ratty Radio Shack edge fingers require 
frequent Cramolin cleaning for system 
reliability Tandy did not gold plate them, but 
after yousilver tt^em you can tug cables and 
jar computer without system rebooti 

Kit contains special high-quality flux and 
16" (about 15 oz) of solder, 5-6% silver, 
balance tin (contains no cadmium, zinc, or 
lead) Caution: do not resolder fingers with 
ordinary solder, or system will be totally 
unusablel 
CIE $4.50 ($4.77 CA) 

Media Buys: 

Diskettes 

5" Unbranded, single-density, 10, in 
envelopes, fully guaranteed $19.95* 
5" Memorex sngl dens., box 10 $24.75* 
5" Memorex dbl dens , box 10 J26 55* 
S" Dysan, plastic box of 10, double-density 
ultra-reliable $44 95* 
5" Wabash SSSO with hub ring $26 55* 
5" Wabash DSDD with hub ring $$38 98* 
Reinforcements, 50 rings for 5" $7 75* 
Ring tools-apply reinforcements $4 95* 
Cleaning kits, 3M or FD, 2 disks $22 46* 



GUARANTEE 

All CIE disks guaranteed 

If you gel d bdd disk, CIE will replace it 



Hardware: 

Percom, LNDoubler Savings 

DOUBLE DENSITY attachments 

$153.50/$! 57. 50/$207» 
Double disk storage with either Percom or 
LNW Research plug- in adapters. No 
soldering. Percom Doubler 2 comes with 
OoubleDOS TRSOOS varient, is $153 50* 
LNDoubler 1 includes DOS-plus deluxe 
operating system LNDoubler 5/B, with 
operating system, allows use of double 
density with either 5" or 8" drives', just 

$207* 

Lowest Prices 
On Disk Drives! 

TE AC 40- track si ngle/doi^ I e density, single 
headed (writes, reads on one side of disk), 
with incredible 1-yr. factory guarantee! 
Case, power supply disassembled for 
shipping, just insert 6 screws Exclusive no 
extender cable needed! $269'. 

M-TRACK, 1-HEADED $395* 

80-TRACK, 2-HEADED (dbl sided) $650* 
Bare 40-track. unpowered $215* 

Bara-80-track $225* 

SOFTWARE to 50% oft 

Leading brands includmg Acorn. Allen 
Gelder, Alternate Source. Apparat. 
Blechman Enterprises, Breeze Computing, 
CIE, Data Soft, DorseH, Edu Ware. Ellis 
Computing. Hexagon Systems. Micro Clinic, 
Micro Works, Microsoft, Modular Software. 
Nepenthe, Personal Computer Service, 
ProSoft, and Ramware. 
BOOKS, leading publishers, 10% off 



Discounts: 

*p'-iLe^ CIE net, including lO'i discount 

lot- $50 o-morelotdl order, 3 0' more items 

nurninjl sfi'ppinqchdrgeon all but books aid 

sottwre 
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Program continued 

582 GOTO500 

1000 INPUT'ARE CORRECTIONS TO THIS INVEKTORY NECESSARY? YES OR N 

O'jAS 

1005 IF AS="NO" GOTO 1100 

1010 PRINT:PRINT"COLUMN NUMBERS HAVE BEEN ASSIGNED AS FOLLOWS" 

1015 PRINT :PRINT"USED SINGLES" ;TAB( 25) "1" ; TAB ( 32) "CATALOG VALUE" 

;TAB(50)'2' 

1020 PRINT'MINT SINGLES" fTAB{ 25) '3" ;TAB( 32) "CATALOG VALUE';TAB(5 

0)"4" 

1025 PRINT"MINT PLATE BLOCKS" ;TAB( 25) ■5"jTAB(32) "CATALOG VALUE"; 

TAB(50) "6" 

1030 PRINT"MINT SHEETS" ;TAB( 25) "7" jTAB( 32) "CATALOG VALUE" ;TAB ( 50 

)"8" 

1035 PR1NT"FIRST DAY COVERS" ;TAB( 25) "9" ;TAB ( 32) "CATALOG VALUE";T 

AB(49)"10" 

1040 PRINT"SPECIAL SITUATIONS" ;TAB( 24) "11" ;TAB( 32) "CATALOG VALUE 

";TAB(49) "12" 

1045 PRINT:PRINT"SCOTT CATALOG NUMBER AND COLUMN OF ENTRY":INPUT 

"TO BE CORRECTED";BS,C:PRINT 

1050 FOR Rl=l TO R 

1055 IFS1(R1,0)-B$GOTO1065 

1060 NEXT R1:PBINT"SC0TT CATALOG NUMBER— " ;B5; "—NOT IN FILE":GO 

TO 1085 

1065 PRINT'DATA NOW READS — "jSKRlpC) 

1070 PRINTiINPUT "ENTER CORRECT DATA — "jSl(Rl,C) 

107 5 IFVAL(BS) <VAL[D)THENS1[R1,13)'=STR5(VAL(S1(R1,1} )*VAL(S1(R1, 

2) )+VAL(Sl(Rl,3))*VAL(Sl{Rl,4) ) ) : SI (Rl , 13) =RIGHT$ ( SI { Rl , 13) ,LEN[ 

S1{R1,13))-1) 

1080 IF(VAL{BS)"VAL(D) ANDB?>D)ORBS-DORVAL{BS) >VAL (D) THENS1(R1 , 1 
3) -STRS(VAL(S1(R1,1) ) *VAL [SI { Rl , 2) ) +VAL(S1 ( Rl , 3) ) *VAL( SI ( Rl , 4) ) + 
VAL(S1(R1,5) )*VAL{S1(R1,6) ) +VAL{ SI ( Rl , 7) ) *VAL ( SI ( Rl , 8) )+VAL(Sl(R 
1,9))*VAL(S1{R1,10)]+VAL(S1(R1,11))*VAHS1{R1,12))) 

1081 IF{VAL{BS)=VAL(D)ANDBS>D)ORB$»DORVAL(BS) >VAL (D) THENSl (Rl , 1 
3)-RIGHT3(Sl{Rl,13) ,LEN{S1 ( Rl , 13) ) -1) 

1085 INPUT"HAVE ALL CORRECTIONS BEEN MADE? YES OR NO"jA$ 

1090 IF AS="YES' THEN CLS:G0TO 1100 

1095 IF A$="NO" THEN CLS:GOTO 1010 

1100 T-0 

1105 FOR Rl=l TO R 

1110 T=T+VAL[S1(R1,13) ) 

1115 NEXT Rl 

1120 C=0:Rl=l:P-l:Kl»fl:PS{P)-"":CLS!PRlNT"BE PATIENT—i'm WORKIN 
G" 

1121 LETV=VAL(S1(R1,C) ) 

1122 IFR1=RTHENCLS:PRINT"F0RMATTING COMPLETE'iLKP) «Kl;GOTO1150 
1124 L=LENtSl(Rl,C) ) :LS-RIGHT$ (STR$ (L) ,1) 

1126 IFS1(R1,C) =""0RLEN(S1(R1,C) ) =0ORVAL( SI ( Rl ,C) ) =0THENLS="1 " : L 

=1:S1(R1,C)="*" 

1128 S1(R1,C)-LS+S1(R1,C) iLS-"" 

1130 K1=K1+(L+1) 

1132 IF248-K1<L+1THENL1(P)=K1-(L+1) :K1=L+1 : P«P+1:PS (P) ="" 

1134 PS(P)=PS(P)+S1(R1,C) 

1141 IFC-4ANDV<VAL (D) THENSl (Rl,C)='":C=13:GOT01124 

1142 S1(R1,C)="":C=C+1 

1146 IFC-14THENR1-R1+1:C-0:GOTO1121 

1148 GOT01124 

1150 PRINT"COUNTRY "CS" FILE «"Q" CONSISTS OF "R-1" RECORDS":? 

RINT"HAVING A TOTAL VALUE OF $"T: PRINT'FILE INCLUDES SPECIMENS I 

SSUED FROM "Yl" THROUGH "Y2 iPRINT'AND IS BASED UPON "YS" CATALOG 

VALUES" 
1152 PRINTjPRINT'FILE INCLUDES SCOTT CATALOG •"SI" THROUGH l"S2: 
PRINT'WITH A FULL INVENTORY SCOTT *"D" AND ABOVE" 
1154 PRINT"THERE ARE "P" PRINT STATEMENTS" 

1156 PRINT:PRINT"NOTE LOCATION AT WHICH THIS FILE IS TO START":I 
NPUT"PLACE CASSETTE IN <RECORD> MODE. WHEN READY, PRESS <ENTER>" 
; X ! CLS 

1158 PRINT»-1,CS,Q,Y1,Y2,Y3,S1,S2,R,T,D,P 
1160 F0RP1=1T0P 
1162 PRINTP1;L1(P1) ;P5(P1) 
1164 PHINTI-l,Ll(Pl] ,PS(Pl) 

1166 INPUT"PRESS <ENTER> TO CONTINUE" ;X:CLS 
1168 NEXTP1:CLS 

1170 PRINT'RECORDING COMPLETE. NOTE TAPE LOCATION" 
1172 PRINT: PRINT-ENTRIES LEFT ■;120-{R-1) 

1174 PRINT: INPUT'HAVE YOU RECORDED THIS FILE TWICE. (Y/N)";A5:CL 
S 

1176 IPA$-"Y"THENGOTO117 8ELSEGOTO1150 

1178 PRINT"TO EDIT, ADD TO, OR REVIEW THIS INVENTORY, RUN PROGRA 
M LEVEL B":END 



Modify Philatelic Inventorv II — File Preparation — Level A as indicatefl below. 
90 CLEAR5000DEFSTRS,V,D,DEFINTQ,R,C,P.L 



Program Listing 2 



From Computer Plus to YOU . . . 
PLUS after PLUS after PLUS 





32K Exp. Int. $334 



P3 3 CJ :_) Lj LJ i_i L^i_r a «« M ■ 
_J _J [ ) 1 1 1 1 1 I L II ' 1 _ _ _ _ Z 



Pocket Computer $ 1 89 
P.C. Printer $130 



CsWmfiffift^ 



Color Computer 4K $31 
W/16K Ext. Basic $459 




MODEL II 64K $3300 




Modellll16K$839 

Model III 46K 

2Dlsc&RS232C$210a 



BUY DIRECT 



Here are just a few of our fine offers . - . 
call TOLL FREE for full information. 



COMPUTERS 




PERIPHERALS 




Line Printer V 


1610 


Model II 64K 


S3300 


Expansion Interface OK 


S249 


Microline80 


345 


Model III 4K LEV 1 


599 


Expansion Interface 16K 


355,50 


Microline82A 


515 


MODEL IIM6K 


839 


'Expansion Interface 16K 


291.50 


Mlcroline83A 


799 


MODEL III 32K 


945.50 


Expansion Interface 32K 


462 


Pocket Computer Printer 


130 


•MODEL III 32K 


881.50 


•Expansion Interface 32K 


334 


DISK DRIVES 




MODEL III 48K 


1052 


16K RAM N.E.C. 200 N.S, chips 25 


R.S. Model III IST-Drlve 


712 


•MODEL III 48K 


924 


MODEMS 




TEAC40TrackMI 


329 


Model III 48K 




Lynx Direct Connect Ml/Mill 


269 


R.S. 1 Drive Exp Mil 


999 


2Disc8tRS232c 


2100 


Auto Ans. /Dial 




R.S, 2 Drive Exp Mil 


1518 


Color Computer 4K 


310 


Telephone Interface II 


169 


R.S. 3 Drive Exp Mil 


2040 


Color Computer 16K 


416.50 


R.S. Modem IDC, 


130 


SOFTWARE 




•Color Computer 16K 


352.50 


R.S Modem II D.C. 


199 


R,S. Software 10% off list 




Color Computer 16K 




PRINTERS 




Newdos +(40) track Ml 


88 


w/extended basic 


459 


Daisy Wheel II 


1695 


Newdos80MI)l 


149 


Color Computer Drive 


470 


Line Printer VI 


999 


ST80III 


149 


Pocket Computer 


189 


Epson MX80 


499 


ETC. 




VIDEOTEX 


310 


Epson MX80 FT 


599 


Verbatum 5" Double Density 


32 






Epson MX100 


799 


Verbatum 8" Data Life 


49,95 


'Computer Plus New Equipment. 


Line Printer VII 


315 


Ctr-80A recorder 


5? 


180 Day Extended Watrantv 




Line Printer VIII 


620 


CO Joysticks 


22 




We have the lowest possible 
Fully Warranteed Prices AND 
a full complement of Radio Shack 
Software, 



DEALER INQUIRIES ARE INVITED 

Prices aub)ect to change without nolle*. 
Not responsible for typographical errors. 

TS$-M li a r»gl)t«red trademark of Tandy Corp. 



call TOLL FREE 1-800-S4S-8124 




com 



Dept. D 

245A Great Road 

Littleton, MA 01460 

617-466-3193 



plus 

I Write (or your >^ 
free catalog 



'SeeLiatotAaverUsersonpage4ie 
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"Keep in mind the TRS-80's 
string processing times 
can be time-consuming." 



A reasonable amount of unused space 
should be left at the end of each file to per- 
mit additions. Such additions will be "out of 
numerical sequence." But the editor will 
retrieve them by catalog number wherever 
Ihey reside so there is no reason to avoid 
random inputs. 

There is no relationship between the row 
of the matrix and the Scott Catalog number. 
That would duplicate the catalog and re- 
serve large portions of the matrix and sub- 
sequent files, portions better used in other 
ways. 

The Editor, Program Level B— lil^e File 
Preparation— is written in a modular format 
to facilitate its understanding and debug- 
ging. A powerful feature, the Dummy File, 
makes it possible to execute all options in 
the menu simply by inserting a remark 
Statement in program line 101 and removing 
the remark statements in lines 102-104. 

The program is formatted into modules 
making it possible to break a large program 
into smaller ones. Menu options include: 

• Seeing an existing listing; 

• Correcting and updating an existing 
listing; 

• Adding to inventory; and 

• Updating annual values. 

Each option used with a PRINT#-i, 
INPUT #1 and END is a standalone pro- 
gram {see Pfogram Listings 2. 3 and 4). 

File Preparation, Program Level A, line 
105, can be used to change the type o1 in- 
ventory to air mail issues, revenue issues, 
post cards, envelopes and other categories. 

If the collection is moderately large, sev- 
eral files will be required. Keep in mind the 
TRS-80's string processing times can be 
time consuming {see Fig. 3). 

As each file is completed, enter its total 
catalog value into a printout along with the 
other file parameters selected. To make a 
second back-up copy of each file is a matter 
of personal choice but in general is not 
a bad idea. 

The total catalog value computed by Phil- 
atelic Inventory will come as a pleasant sur- 
prise to many.H 



Cassette 


Byles 


'Mat SioiaQe Capacity 


Type 


One Side 


248-Byte Pfinl Strings 


ClO 


1B.7M 


37 2 


C20 


37,500 


74 4 


C30 


85,250 


1116 


C45 


04.375 


1302 


C60 


112.500 


223 2 


C90 


131,250 


2604 


C120 


22b.aX) 


4464 


"Including 


25GBy\e "Leaders' 


Table 1. 


Cassette 


Storage Capacities. 



ModiFy Philatelic Inventory 11— Edilof— Level B as indicatsd baiom. 
90 CLEAR3500 DEFSTHS,Y,0;DEF1NTQ.R,C,P,LE 
DELETE Lines 60O-7» 
ADO Line 600 

600 PRINT USE EDITOR VERSION 2.2 (LEVEL Q FOR MtHUAL VALUE UPDATE" INPUT PRESS (ENTEH) TO 
RETURN TO MENU ;X CLSGOT0105 

Program Listing 3 



Modify Philatelic Inventory II— Editor— Level B as mdicaled ImIow. 
90 CLEAR5000:DEFSTRS,Y,D:DEFINTQ,R,C,R,L 

725 PRINT-TO EDIT. ADD TO, OR REVIEW THIS INVENTORY, RUN PROGRAM LEVEL B":ENO 
1258 PRINT-MATRIX RESTORATION COMPLETE":PRINT:INPUT-TO CONTINUE. PRESS [ENTERl'.X.CLS: 
GOTO600 

DELETE Lines 105-140 

DELETE Lines 200-270 

DELETE Lines 420-582 

DCLETEUfwa 1000-1115 



Program Listing 4 



2500 



2000 



1500 



1000 



500 




t 271 



^-O— COMPUTED 
X ACTUAL DATA 



SHORT RECORD 27 CHARACTERS 
LONG RECORD 95 CHARACTERS 



5 10 15 20 25 30 35 40 45 50 55 60 65 70 75 SO 85 90 

PRINT STRING FORMATION TIME 
{MINUTES) 



-♦X 
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TIlis Months Special 

Okidata 



At a New 
Low, Low, Pncei 



A great buy 

■ List Price is $449. 

The Microline 80 

is a quiet, 

small printer 

Microline y^jth fjeld proven 

^° reliability. 

Featun 

• Friction tt pin paper feed, roll or fan fold 

• Prints ewanded characters and block graphics 

• Print spad 80 characters per second 

• PrintheadVated at 200 million characters continuous 
cycle 

• 132columl compressed print ..-j 

• Available fl-232C Serial Interfaces: 
ORS-256 (256 Character Memory) . .$109.00 
MSPlOO (Unbuffered, Switch 

Select Data Rates) $120.00 

1SP-200X (200 Character Memory) $215.00 
1SP-2000X (2000 Character 

Memory) $300.00 

^her available options: 
Jjustable Tractor Feed ■ 

'^ ^^^ Hdel54100201 $ 50.00 

^80 Parallel Output 

?ble to printer $ 35.00 

Ions $ 3.00 





ASK FOR OUR 

INSTANT OISCOUNT 

From Roy Hawthorne 

Talk To Sill Tokar On 

Applications 



CALL TOLL FREE 
U.S.A. 

1-800-521-2764 

MiCHiGaru 
1-800-482-8393 




into a Word Processing or 
Data Processing System 
by adding one of the NEW 
Okidata Printers 




Microline Microline 

83A 82A 

If you require a system printer, the new Okidata 
Microline 82A, 83A, 84 should be your choice. 

These printers feature: 
•9x9 Dot Matrix heads rated at 200 million 
characters continuous duty ■ true lower descenders 
•Full forms control - vertical tab, top of form 
•Block Graphics 

•Bidirectional, Short Une Seeking 
•Dual Interface - Parallel b RS-232C Serial 

MicroHne 82A - Sacolumn, ""'^^ 

120 characters per second $ 649. 

Tractor Optional $ 50. 

Microline 83A - 136-columa 

120 cps, built-in tractor $ 995. 

Microline 84 - 136-column, 

200 cps, built-in tractor $1395. 

Optional Serial Interfaces - RS-232C: 

HSRS232 - 256 Character Buffer $ 1 50. 

HS-RS232 - 2K Character Buffer $180. 





Remember: 
UUe arc open 
8:30 AM to 
6:00 PM EST 
Monday - Friday 



No Credit 
Card Penalty 



"The Stocking Source" 
240G9 Research Drive 
Farmington Hills, Ml 
48024 
313-474-6708 ''^ 



' Sm Ustol AOvenisers on page^tS 
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APPUCATION 



Let the versatility of your 80 flower. 



The House Plant Index 




John Chipman 

18 Laurel Drive 
Medfield, MA 02052 

Some people have a green thumb— they 
seem able to grow plants anywhere. 
The secret to their success is hard work 
combined with a i^nowledge ot soil and light 
conditions and temperature ranges. 

The Houseplant Index lets you in on the 
secret ot growing flowering and foliage 
houseplants You provide information on a 
particular location in your home and the In- 
dex lists plants suitable for that location. 
The Index also provides information on soil. 
humidity and feeding requirements. Plant 
suggestions are offered by scientific and 
common names A cross reference provi- 
sion is included; a user can enter the scien- 
tific name for a particular plant and find out 
its ideal growth conditions. 

Program Listing 1 is tor flowering house- 
plants and Program Listing 2 is for foliage 
houseplants. Both versions of the House- 
plant Index use scientific names because 



common names vary from one part of the 
country to another. 

This program permits the use of a printer 
to obtain lists of recommended plants. 

Using The Index 

The first option of each program permits 
you to look up data on any specific plant. 
The second option allows you to enter the 
conditions at a particular location in your 
home or office. The program considers 
lighting conditions, plant height range, 
nighttime temperature range and desired 
s|:>ecial features such as fragrance and color. 
Advice for watering frequency, humidity 
and feeding schedules is included. Read 
this advice as follows: 
• Watering frequency 
Wet— Keep the soil very damp to the 
touch at all times; excess water should 
not stand on top of the soil or fill the 
saucer under the plant pot. 
Moist— Never allow the soil to dry out 
completely; water the plant when the top 
of the soil Ijecomes dry to the touch. 



Program Listing 1 

' FLOWERING PLANT INDEX — BY JOHN CHIPMAN 

S CLeAR10e:GOSUB1710 

le CLS:GOSUB660:PRINT"FLOWEBING HOUSE PLANT INDEX" jGOSDB66e 

Program L'siing I continues 



Dry— Keep the soil dry most of the time; 
water sparingly, Soil below the top 
should be allowed to dry out. 

• Room air relative humidity 
Normal— The plant requires no special 
level of humidity. 

High— Raise humidity to a level greater 
than 50 percent. Do this by placing trays 
of pebbles near or under the plant pots 
and keeping the pebbles wet. 

• Fertilizer application (any houseplant 
fertilizer diluted to 50 percent strength 
with water). 

M — month 

W— week 

Example: 2W means every two weeKs. 

3-4M means every three to four months 

Spring means once a month during 

spring only. 

When answering questions about loca- 
tion, run the program first with zero for plant 
height and special features. This avoids a 
"no recommendation" response as a result 
of requiring a height restriction and a spe- 
cial feature simultaneously. Once a list of 
possibilities is obtained, add other require- 
ments one at a time and make compro- 
mises where necessary. It no foliage plants 
are suitable for a particular location try 
flowering plants, and vice versa. 

Once you have a list of recommended 
plants, go to your local greenhouse and 
look at the plants or look them up in any 
good plant book to make your select ions.H 
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"Some people have a green thumb— 

they seem able 
to grow plants anywhere. " 



Piogiam L'shng Iconimoed 

15 PRIHT'ENTER DESIRED PRCXJRAM" : PRINT'l - DATA ON SPECIFIC PLANT 

■ 

20 PRIMT"2 - PLANT SELECTION* iGOSUB66fl i INPUTQQ 

25 IFQQ<>lANDQQ<>2THENlfl 

30 IPOQ-1THEN245 

35 W=0:Y-0:I-1 

40 CLS:GOSUB660:PRINT"FLOWERIHG HOUSE PLANT INDEX" :W-W+1 

45 IFW>6PRINTgl09,'RECOHMENDED PLANTS" 

50 GOSUB66fl:ONWGOTO55,70,85,lfl0,115,135,14fl,195,195,195,195,195 

55 PRINT'ENTER " ;AA$: PRINT"! - ■;ABS:PRINT"2 - "jACS 

60 PRINT"3 - ";ADS:PRItfr"4 - "; AES;PRINT"5 - "[AF$ 

65 GOSUB660:INPUTL:GOTO4e 

70 PRINT"ENTER " ; BA$: PRINT"1 - ■ jBB5t PRINT"2 - "iBCS 

75 PRINT'S - ";BDS:PRINT"4 - ■;BES:PRINT"0 - ".-BPS 

80 GOSUB66O:INPOTH!GOTO40 

85 PRINT"ENTER " iCA5 : PRINT"! - " ; CBS:PRINT"2 - "jCC$ 

90 PRINT"3 - ";CDS 

95 GOSUB66O:INPUTN:GOTO40 

!0D PRlirr'ENTER " ;DAS :PRINT"! - " ;DB$:PRINT"2 - ";DCS 

!05 PRI»T"3 - ";DDS:PR1NT"4 - " iDE$:PRINT"e - ";DFS 

1!0 GOSUB660:INPUTC:GOTO40 

!15 PRINT"EHTER YOUR DISPLAY CHOICE" 

120 PRINT"! - SCIENTIFIC NAMES" ; PRItrr"2 - SCIENTIFIC AND COlillON" 

125 PRItJT"3 - SCIENTIFIC, COIUION, PLUS PLANT CARE MOTES" 

!3tJ GOSUB660!lNPUTG:GOTO40 

135 GOSUQ1460:GOSUD660!GOTO40 

140 FOR2=lT012fl:READAS*QfR»T,V 

145 IF(L=>Q) + ((L-3)«(Q«5))+((L=!)«(Q-2))*((H-R> + (H-0))THEH155 

150 G0T021fl 

155 IFN-TTUEII165 

160 GOTO210 

165 IF(C-V)+(C-0)+1(C-2)*((V=5)+(V=6)+(V-7)))+(CC-4)"(V=6))T»E:i1 

80 

170 IFUC-3)*(V-5))+(tC=3)*(V-8)) + ((C-l)*((V"7}+(V-8)))TllEN180 

175 GOTO210 

180 IFI<10THEtll95 

1B5 GOSUB66O:IFPS-"Y"GOSUD1525:I=l!GOTO40 

190 PRINT"HIT ENTER TO CONTINUE LISTING" 

192 IFINKEYS<>CHRS(13)THEN192ELSEI=1:GOTO40 

195 Y=Y+l!lFG=lPRINT0176+16*Y,AS:I=I+.25 

200 IFOlPRINTASi" - " ; : I-I+l :GOSUB665 

205 IFG-3GOSUB!270:I=I+1 

210 NEXTZ:RESTORE!lFY»flPRINT"SORRY - NO RECOIIHENDATIOHS" 

215 GOSUB660:IFPS="Y"GOSUB1525 

220 IPL>1THEN235 

225 PRINT"! RECOIIMEND A FOLIAGE PLANT - BUT YOU MAY TRY THE ABOV 

E" 

230 GOSUB660 

235 INPUT"ANOTHER RUN (Y/N) • iO$: IFLEFTS(Q$,1) ="y"THEN10 

240 CLSiEND 

245 CLS:GOSUB660:PRINT"FLOWERING HOUSE PLANT INDEX":CK"0 

250 GOSUB660 

255 PRINT"TYPE IN THE SCIENTIFIC PLANT NAME THAT YOU DESIRE" 

260 PRIHT"TO GET INFORMATION ON":GOSUB660 

265 INPUTQS 

270 FORZ-1TO120:READAS,O»R»T,V 

275 IFA$<>Q$THEN415 

280 CK=1:CLS:GOSUB660:PRINTAS;" PLANT CHARACTERISTICS" 

285 GOSUB660:PR1NT"COMMON NAHE[S) - ■;:GOSUB665 

290 PRINT"BEST "jAASi" - "; 

295 IFQ-10RQ=2PRINTACS;' OR ";ABS 

300 IFQ-3PRINTADS 

305 IFQ=4PRINTAES 

310 IFQ-5PRINTAFSj", ";ADS 

315 PRINT"MAXIMUM "jBAS;" - "; 

320 IFR=1PRINTBB5 

325 IFR-2PRINTBCS 

330 IFR=3PRINTBD$ 

335 1FR»4PRINTBES 

340 PRINT'BEST "jCAS;" - "; 

345 IFT-IPRINTCBS 

350 IFT=2PRINTCCS 



Progiam Listing I continues 



MMSFORTH VERSION 2.0: 

MORE FOR YOUR RADIO SHACK 
TRS-80 MODEL I OR MODEL III ! 

* MORE SPEED 

1? K t.mes 'is'B' IhJ" Lwfl II BASIC 

* MORE ROOM 

V^iy compacl i.<i'"D"*a code siui VIBIUAl. 
WFLicnv TisuM rout ram tc: iugx Vciuii* 
n\jrr\b^ oi DioCK buff<ri J1 ct^t' -untgw« wofa 
nimas use oil) i brisi i naadi'' 

* MORE INSTRUCTIONS 

»00 YOUR tomi'iindi 10 ■!• '9-ST*N0*R[>-plu> 
injUucliO" sf 

Fai mor* conifMI* irian moii Foitni imgie ft 
iiouM* C'vcttion. aTiti tinng handling, cMck. 

* MORE EASE 

EicBllanl'ji icHX EdilO' sI'uclurM 1 

mmula' p'Oi]r»mmlno 

Ao'a seaicn uiiiiir 

The notepad I»Ii«'«nI«< 

OctOTiiM lOf yOUF TRS 80 m»n I>*iib04rd 

'•p**ti .. t>o«'' low » CBsa display ar>va I 'ull 

ASCII sng'a t doubta-Midtn griproci. ale 

* MORE POWER 

i-!»T)ieie' AND compinf 

6080 Assambiw 
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REMSOFT, INC. 

Let Your TRS-80' 
Teach You 
ASSEMBLY LANGUAGE 

Tired ol buying txiok a'ter book on assembw 
language progiamning and still nol knowing voui 
POP from your PUSH? 

RcMsOFT p'oodly announces a more e"i- 
cient way, using you' own TRS-SO* lo lea'" l>^e 
tundamsnlals ol assembly language progiamri 
ing ■ - al YOUR oace and YOUR convenience 

Out unique package, "INTRODUCTION TO 
TRS-SO- ASSEMBLY PROORAMMINO". will pio 
vide you wlih the (ollo*lng 

• Ten 45-mlnuie lessons on audio cassettes 

• A flflvef Qiofliam Xo make youi TRS-SO' video 
monitor serve as a blackboard lor the instructor. 

• A display progiam lor each lesson lo orovlde 
IlluSlration and remlorcement lor wtial you arc 
heating. 

■ Step*by-step dissection ol complete and useful 
roulines lo lesl memory and to gain direct cor> 
irol over the keyboard, video monitor, and 
Dnnler 

■ How to access and use powerlul routines in 
your Level II ROM 

Presently available tor Model 1 only 
REMASSEM-1(.apei only $69.95 
REMASSEM-1idi.k) only $74.95 

LEARN TRSaO^ 
ASSEMBLY LANGUAGE 
DISK I/O 

Your disk sysiHiii am.! yuu tjn really step ou! 
wiih REMSOFT'S Educational Module 
REMOISK-I, a short course" revealing the details 
of DISK liO PROGRAMMING using assembly 
language 

Jnlendad tor the student with experience in 
assembly language, using ihe same (ormal as our 
eiliemely popular 'nt'oduction lo assemDIy 
language programming, this "ASSEMBLY 
LANGUAGE DISK IfO PROGRAMMING" course m 
eludes: 

• Two 45-minyle lessons on audio cassette 

• A driver program to make your TRS-SO' video 
monitor serve as s blackboard lor the insttuctot 

• A display program lor each lesaon to provide il- 
luslralion and reinlorcemeni lor what you are 
healing. 

• A traokiet ol comprehensive, iully-commented 
program listings illustrating sequential Hie IfO 
random. access lile ifO. and track and sector IfO 

• A diskette wilh machine readable source codes 
lor all programs discussed, in both Radio Shack 
EDTASM and Maco formats 

■ Routines to convert from one assembler loimal 
to the other 

Presently available tor Model 1 only 
REMDISK-1 only$29.95 

Dealer inquiries invited 

T^ese courses wore developed and recorded by 
Joseph E Wiliis and are based on ihe successlul 
series ot courses n« has taughi a! Meta 
Technologies Corporation, the Radio Shack Com 
puier Center, and other locations in Northern 
Ohio. The minimum system required Is a Level II. 
16K RAM 



REMSOFT. INC. 

571 E. 185 St. 

Euclid. Ohio 44119 

(216)531-1338 



SHIPPING CHARGES 

%2 50 WITHIN UNITED STATES 

S5(W CANADA AND MEXICO 

OTHER FOREIGN ORDERS ADD 20'o 

OHIO RESIDENTS ADD 5'.. % SALES TAX 
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TBSaO- IS A TRADEMARK OF TANDY CORP 



Program L'Sling Icontinued 

355 IFT-3PRINTCDS 
368 PRINTDASf" - 'j 
355 IFV-0PRINT"NONE" 
37B IFV-lPRINTDBS 
37 5 IFV-2PRINTDCS 
380 IFV=3PRINTDDS 
385 IFV-4PRINTDES 
IFV=5PRINTDCSl 
IFV-6PRINTDCS; 



390 
395 
406 



AND ";DDS 
AND "jDES 
IFV=7PRINTDCS;" AND ".-DBS 
405 IFV-ePRINT-TRAILING, CLIMBING, AND FOLIAGE MARKINGS" 
410 PRINT'PLAHT CARE NOTES . . . . " :GOSUBl270 
415 NEXTZjRESTORE 

420 IFCK-lTHEriGO5UB660:GOSUB1460:GOSUB1525:GOTO445 
425 PRIHT'HO PLANT BY THAT NAME HAS BEEN FOUND ..." 
430 PRINT"PLEASE CHECK YOUR SPELLING" 

435 GOSUB660:INPUT"DO YOU WISH TO TRY AGAIN, (Y/N)";QAS 
440 GOTO450 

445 INPUT"ANOTHER RUN (Y/N)";QA$ 
450 QAS-LEFTS(QAS,1) : lFgAS="Y"THENl0 
455 CLS:EHD 

460 DATAABUTXLOH,4,3,2,1,ACAHYPHA,3,3,3,0,ACHIHEHES,S/1,3,0 
46 5 DATAAECHHEA ,3,2,3, 3 , AESCHYNAHTHUS ,3,2,3,1, AGAPATHUS ,4,2,2,6 
470 DATAALLAMANDA,4,4,3,1,ANTHURIUK,3,2,3,0,APHELANDRA,3,2,3,0 
475 DATAAKDI SI A, 3, 3, 2, 4, AZALEA, 3, 2, 1,0, BEGONIA, 4, 2, 2, 3 
480 DATABELOPERONE,4,2,2,0,BILLBERGIA,4,2,3,3,BOUGAINVILLEA,4,3, 
3,1 

485 DATABRASSAV0LA,3,1,2,2,BRASSIA,4,2,3,5,BR0v;ALLIA,4,3,2,1 
490 DATADRUNFELSIA,4,2,2,2,CALCEOLARIA,3,l,l,0,CALLIANDRA,4,4f3r 
3 

495 DATACAHELLIA,3,3,l,fl,CAPSICUH,4,l,3,4,CARISSA,4,2,3,6 
500 DATACATTLEYA,4,2,2,0,CESTRUH,4,2,3,6,CHIRITA,4,2,3,0 
50 5 DATACI TRUS ,4,4,3,6, CLERODENDRON ,3,3,3,1 ,CLIVIA, 3 ,2,2,0 
510 DATACOFFEA,3,4,3,6,COLUMNEA,5,2,2,1,CRINODONNA,4,3,2,2 
515 DATACRINUM,4,3,2,2,CROSSANDRA,4,1,3,0,CRYPTANTHUS,3,1,3,3 
520 DATACUPHEA,4,l,2,3,CYMBIDIUM,4,l,2,0,DeUDROBIUK,3,2,2,7 
525 DATADIPLADENIA,3,4,3,0,DYCKIA,2,2,2,3,EPIDENDRUH,3,1,2,2 
530 DATAEPIPHYLLUM,3,2,2,0,EPISCIA,5,1,3,8,ERVATAHIA,4,3,3,2 
535 DATAEUCHAR1S,3,2,3,2,EUPHORB1A,4,2,2,0,EXACUH,3,1,3,2 
540 DATAFORTUMELLA,4,2,2,6,FUCHSIA,4,3,2,0,GARDENIA,4,3,2,2 
545 DATAGELSEHIUH,2,4,2,7,GLOXINERA,5,1,3,0,GUZMANIA,3,2,3,3 
550 DATAHAEMANTHUS,4,2,2,2,HELIOTROPIUM,4,2,2,2,HIBISCUS,4,4,3,0 
55 5 DATAHIPPEASTRUH,4,2,3,O,HOYA,4,4,3,2,HYDRANGEA,3,2,2,0 
560 DATAHYPOCYRTA, 5,2,3,1, IMPATI ENS ,5,1,3,0 , IPOHOEA, 4 ,4,3,1 
565 DATAIXORA,4,2,3,3,JACOBINIA,4,1,3,0,JASHINUH,4,4,2,2 
570 DATAKALAHCHOE,4,1,2,0,KOHLERIA,3,2,3,1,LACREHALIA,4,1,1,0 
575 DATALAELI A ,4,2,2,0, LAELIOCATTLEYA, 3 ,2,2,0, LAHTANA, 4,4,2,7 
580 DATALILHJtl,3,2,l,2,LOBULARIA,4,l,2,7,MALPIGHIA,2,l,2,4 
585 DATAHALVAVISCUS,4,2,3,0,HANETT1A,2,4,2,1,MAXILLARIA,3,1,2,2 
590 DATANEOFINETIA,3,1,2,2,NEOHARCIA,3,2,2,2,NICOTIANA,4,1,2,2 
595 DATANIDULARIUM,3,1,3,3,ODONTOGLOSSUH,3,1,3,2,ONCIDIUM,4,2,2, 


600 DATAOSHANTHUS,2,3,2,2,OXALIS,4,1,2,0,PAPHIOPEDILUM,2,2,3,3 
605 DATAPA5SIFLORA,4,4,2,7,PELARGONIUM,4,2,2,0,PHALAENOPSIS,3,4, 
3,0 

610 DATAPRIHULA,3,1,1,0,PUHICA,4,2,2,4,QUESNELIA,3,2,3,0 
615 DATARECHSTEINERIA,5,2,3,0,ROSA,4,1,2,2,ROSHARIHUS,4,2,2,5 
620 DATARUELLrA,3,3,2,0,SAINTPAULIA,5,l,3,0,SAXIFRAGA,2,l,l,8 
625 DATA5CHIZOCENTRON,2,1,2,1,SCHLUKBERGRA,3,2,2,0,SENECIO,4,2,1 
,3 

630 DATASINNINGIA,5,l,3,0,SMITtlIANTHA,S,l,3,3,SOLANUM,4,l,2,4 
635 DATASPATmPHYLLUH,2,2,3,2,STEPHAHOTIS,4,2,3,2,STRELIT2IA,4,3 
,2,0 

640 DATASTREPTOCARPUS ,5,1,3, ,STREPTOSOLEN ,4,3,2, 1 ,THUHBERGIA, 4 , 
4,2,1 

645 DATATILLANDSIA,3,l,3,2,TRACHELOSPERMUIl,4,3,2,7,TRICHOCENTRUH 
,3,1,2,5 

650 DATATULBAGIA,4,2,1,2,VALLOTA,4,2,2,0,VELTHEIMIA,4,2,1,0 
655 DATAVRIESIA,3,2,2,0,ZANTEDESCHIA,4,2,2,3,2EPHYRANTHES,4,1,1, 


660 PRINTSTRING$(64,42) ;:RETURN 
665 IFZ«1PRINT"FL0WERING MAPLE" 
670 IFZ«2PRINT"CHENILLE OR BEEFSTEAK PLANT" 
675 IFZ-3PRINT"HAGIC FLOWER, WIDOVrs TEARS, NUT ORCHID" 
680 IFZ-4PRINT"F0STER'S FAVORITE" 
685 IFZ-5PRINT"LIPSTICK PLANT OR BASKETVINE" 
690 IFZ-6PRINT"BLUE AFRICAN LILY" 
695 IFZ-7PRINT-ALLAHANDA" 

700 IFZ-8PRINT-TAILFL0WER OR FLAMINGO FLOWER" 
705 IFZ»9PRINT"APHELANDRA" 
710 IFZ=10PRINT"ARD1SIA" 
715 IFZ"11PRINT"AZALEA" 
720 IFZ-12PBINT'BEG0NIA" 
725 IF2=13PRINT"SHRIHP PLANT" 
730 IFZ-14PRINT"PERMAHENT IJAVE PLANT" 
735 IFZ=15PRINT"B0UGANVILLEA" 
740 IF2-16PRINT"LADY OF THE NIGHT ORCHID" 
745 IFZ=17PRINT"SPIDER ORCHID" 
750 1FZ = 18PRINT"BR0WALLIA" P,og,am Us,-ng i cor,^^^ 
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We've got 5 Mbytes on TRS-80® Model Ml! 

W ' TRS-80 IS a trademarK 0l the Radio Shack Division of Tandy Ckifcxifatlon 




Model 325 

Over 5 Mbytes of storage is attained using a 
double-headed 40-track drive and a 6.38 
Mbyte Winchester, all housed In the Model 
Ml system. Drive storage Is equivalent to 
more than 27 single-sided 40-track fioppy 
drives. Storage is approximately equivalent 
to 1000 pages of text. $5,995.00 

10 Mbyte system aiso available. . $6,495.00 



^ 



SPECIFICATIONS 
Microprocessor • Z-80 runs 2,03 MHz, 4.0 MHz 

optional. 

Winchester Drive Spec I float ions • Tandon Winchester 
storage up to 10 Mbytes on 5V4' fixed disk • backup to 
floppy by file/name or sector count • hardware Is 
Tandon TM602/TM603 Winchester, Western Digital 
WD1000 drive controller • Computex host adaptor/ 
drive controller and switching power supply • Win- 



chester is drive-accessed as drive #4 • standard DOS 
commands are used in all Winchester accesses. 
Floppy Disk Drive • Disk drives: Tandon TM1O0 series 
supporting track-to-track access time of 5ms, • storage 
capacities range from 340K to 9,57 Mbytes • drive 
controller board by Computex. 



Transient Protection • all systems include a metal 
oxide varister which prevents transients from 
damaging your system. 



Model 321 

370 Kbyte floppy disk storage with 
2 single-sided 40-track drives. 
Storage approximately equivalent 
tQ 80 full pages of text. System 
configuration ts identical to Radio 
Shack 26-1066. less RS232. 



$1,895.00 



Model 322 

740 Kbyte floppy disk storage with 
2 double-sided 40-track drives. 
Drives can be accessed as either 2 
single-volume 80-track drives, or as 
4 individual 40-track drives. Drive 
storage is equivalent to a 4-drive 
system using only 2 physical disk 
drives. Storage is approximately 
equivalent to 160 pages of text. 

$2.295.00 



Model 324 

1 .4 Mbyte floppy disk storage with 
2 double-sided 80-track drives. 
Drives can be configured and 
accessed as 2 single-volume 160- 
track drives, or as 4 individual 
80-track drives. Drive storage is 
equivalent to 8-drive system, using 
only 2 physical disk drives. Storage 
is approximately equivalent to 320 
pages of text $2,595.00 



COMPUTEX Comprehensive Test Program 

As a leading supplier of disli drives and TRS80 systems, we tiad to have 
asystem test program -and one tfiat we could trust. Since none existed, 
we wrote our own, Now we make it available to you. A must tor disk 
drive users - no library sfiouib be without one. 
• disk drive soeed test • disk drive alignment program (requires 
alignment disk - Dysan Alignment Disk $39 95) • expansion interface 
RAM test • keyboard RAM test • video RAM test • keyboard bounce 
lest • ROM checksum program • full screen RAM display program. 



TANDON DISK DRIVE EXPANSION KITS 

• Switching power supply • storage to 2 Mbytes • supports TRSDOS, 
LDOS. DOS+, and new DOS80 • 32K RAM expansion • double 
oensity disk controller, 

M30KO» Drive kii, 1 Tandon single-sidefl 40-track drive $550.00 

f^3DK1 ■ Drive kit, 2 Tandon single-sided 40-lraci( drives. , $765.00 
M3DKZ- Driveklt,2Tandondouble-sided40-trackdrives. , $995.00 
M3DK4 - Drivekil 2 Tandon double-sidefl 80-track drives $1,195.00 



V 

^ 



TANDON MINI-FLOPPY DISK DRIVES 

Complet* TM100-1 - Single-Sided 40-track drive ■ 102 Rare Onve 

Kbytes single density 180 Kbytes double 

S299.95 density 

TM100-2- double-sided 40-track drive - 204 
Kbytes Single density - 360 Kbytes double 

$399,95 density. 

TM10O-3 - single-sided BO-track drive ■ 2W 
Kbytes single density - 360 Kbytes double 

S399.95 density, 

TM100-4 ■ double-sided 80-track drive - 408 
Kbytes single density - 735 Kbytes double 

S499.95 density 



$235.00 
$335.00 



$335.00 



$435.00 



nMPUT£?{ 

a subsifliary ot World Wide Data Systems, Ifx;. 
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MDX-2 INTERFACE EXPANSION 
Provides more capabilities than any other lyitem axpantlon currsntly 
available, fiuild only what you need. 
Complete MDX-2 Kit $274.95 

• MDX-2t)nnted circuit board only iU.^ 

• Onboard direct connect modem kit 39.95 

• RS232 mA serial interface (required lordirecl connect modem). . 1 7 95 

• 2K/4KEpromkil |7,^ 

• Reai-timeclock kit '' * 

• Floppy disk controller kit 3^ ^ 

•32KRAfy( expansion kit (less RAM) 1''95 

• Dual cassette kit (less 4 PDT relay) 4 95 

• Analog power supply ^ ^^ 

• Hardware and socket kit ^^ 

• Cenironic line printer kit ''0.95 

• I6K RAM merrory '"'^ 
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LET'S MAKE A 
DEAL 

Free Shiuiung Wilhin ContinerKal U.S.A. 



LDOS 



Complete w/manual & latest updates 
Modtorlll $144.95 



LAZYWRITER 

Mod. I $118-95— Mod III $164.95 



EPSON/OKIDATA 

CALL FOR OUR LOW PRICE 



MAXI MANAGER 

by Adventure International -Latest Version 

Model I/III48K Disk $84.95 



Proofreader-* . - . .Mod i 49.95 Mod III 59.95 
Proofedit . . Soy Soti loois . . Mod I or III 28.50 
Grammatik . I . . . Mod 1 45.95 Mod III 55.95 



LYNX — Mod 



Includes — Autodial/answer 
cables & software 



$259.95 



Wg also carry the toll line o* Adventure Int I. Acoin. Sig 
Five. Btodertunrt, Avalon Hill MicrosoU, Dalaso'l 
Misosys. AntomslMl simulalxins and most rilhci Imp 
5oll*arc at ilistount pfiri". Gi't Ccudciips ..v.nUinit- 



GENDFOR YOUR F RCE CATALOG 
Nocietl>tca'aialllinselow(itii;t:s Aihl S?OOiin.inCodor 
(Jers. Cethlied cklMOlCOD stiipped Krimeiliaiely Please 
allow 2 weeks (or »o'Miiial ctiorks Fur cxtt.i last service, 
pdone in your COD order PfiC3SSUb|eclloctiange*iIhOul 
rioiice NVS lesidt'nis nie-ise add .ipiHoprialp sales Ian 

WeQI'piG'P-il V^I'^-'-i ^ PrompI Deltvpry WhyNnlln/Us'' 



MICRO-IMAGES 

146-03 25th Rd, Flushing, NY 11354 

10Am''JPM (212)445-7124 S.il inAM!-PM 



^3S3 



Electronic Engineers 

Electronic Hobbyists 

Electronic Students 

Ham Operators 



TRSflO -* 

MODEL I 
LEVEL II 
2 DISK 



A General DC AC jsteady state) 
Analysis of Any Cirruit 

Will Analyze and Compute: 

• Node. Hr Jttrh. Klrniriii. VulLijich 

• Node Biariih- Klriiiriit, Ciirmilh 

• Hfiini'li I'owi-r Dissip.tlioii 

• MiiKililiiilr .tTKl plM-rf- i'iiii»'%.iiid(i>iii|)lrlc 
Ircqiiciii V rrsponst' vml* ilT.n>\uf \\f^til,t\ 

• Moililv .M1V rlt-iiinit III riK ml t>ii <l<-siri-(l 
result •■ 



A corriplete opeielionai 


Altat our 


mai^ai suffplied 


BIG SUCCESS 


comparalslMo I B M. s 


wilh iriese programs 


E.C.A.P^Proaram 


we c^n now sell it 


*A C. ArylysW Program 


lor only 


Al49h^ 


$79.95 


'0 Cy«nalysis ftogram 


FOR BOTH PROGRAMS 


/ IS9 95 V 


LimneO o'ler — orcler now 



VISA OR M ASTERCH ARGE ACCEPTED 

III. N..I -^1 111) t .i-.li in ilii M.iil 
]>■ Orilt-i UllK- 

G at L Software Enterp. "^^^ 
2304 N. 1st. Street 
Upland. CA 91786 

TRS 80"'^"^ 15 a trademark ot the Tandy Corp E C A P is a 
trademark o' international Business Machines, inc 



Program Listing t conttnuw^S 

755 IF2-19PRIHT"YESTERDAY, TODAY, AND TOMORROW PLANT" 

760 IPZ=20PRINT"POCKETBOOK FLOWER OR SLIPPERWORT" 

765 IFZ-21PRINT"PINK POWDER PUFF" 

770 1FZ-22PRINT"CAHELLIA" 

775 IPZ-23PRINT"ORMAMENTAL PEPPER" 

780 IFZ-24PRINT-NATAL PLUM" 

IFZ=25PRINT"CATTEYA, EASTER, OR CHRISTMAS ORCHID" 

IFZ-26PRINT"BLOOMING JASMINE" 

IPZ=27PRINT"CHIRITA" 

IFZ-28PRINT"LEHOH, ORANGE, OR TANGERINE" .!»-, 

IFZ = 29PRINT"GLORY BOWER" '^ ><S 

IPZ=30PR1NT"KAFIR LILY" '• ■ 

IFZ-31PRINT"ARABIAN COFFEE" 

IFZ-32PRINT"COLUHEA" 
825 IFZ-33PRINT"CRINODONNA" 

830 IPZ-34PRINT"BENGAL OR HILK AND WINE LILY" 
835 IPZ=35PRINT"CROSSANDRA" 
840 IFZ=36PRINT"EARTH STAR" 
845 IFZ-37PRINT"CIGAR PLANT" 
850 IFZ-38PRINT"CyHBIDIUH ORCHID" 

855 IFZ=39PRINT"DENDROBIUM ORCHID" \ 

860 IFZ-40PRINT"DIPLADENIA" 
865 IFZ=41PRINT"DYCKIA" 
870 IFZ-42PRINT"CLAHSHELL ORCHID" 
875 IFZ=43PRINT"ORCHID CACTUS" 



785 
790 
795 
800 
805 
810 
815 
820 



880 
885 
890 
895 
900 
905 
910 
915 
920 
925 
930 



IFZ-44PRINT"EPISCIA OR FLAME VIOLET" 
IFZ=45PRINT"BUTTERFLY GARDENIA OR CRAPE JASMINE" 
I FZ- 46 PRINT" AMAZON LILY" 
IFZ=47PRINT"POINSETTIA" 
I FZ =4 SPRINT" ARABIAN VIOLET" 
IFZ-49PRINT-NAGAHI OR OVAL KUHQUAT" 
IFZ«=50PRINT"FUCHSIA" 

IFZ-51PRINT"GARDENIA OR CAPE JASMINE" 
IFZ=52PRINT"CAROLINA JASMINE" 
IFZ-53PRINT"GLOXINERA" 
IFZ=54PRINT-GUZHANIA" 
935 IFZ-55PRINT"BLOOD LILY" 
940 IFZ-56PR1NT"C0MH0N HELIOTROPE" 
IFZ-57PRI NT-HIBISCUS" 
I FZ= 5 8PR1 NT "AMARYLLIS" 
955 IFZ-59PRINT"WAXPLANT" 
960 IFZa6DPRINT"HYDRANGEA" 
965 IFZ=61PRINT"G0LDFISH PLANT" 
970 IFZ»62PRINT"PATIENT LUCY" 
975 IFZ=63PRINT"MORNING GLORY" 

980 IFZ-64PRINT"JUNGLE GERANIUM OR FLAME OF WOODS" 
IFZ-65PRINT"BRAZILIAN PLUME OR KING'S CROWN" 
IFZ"66PRIMT"JASMINUH" 
995 IFZ-67PRIHT"KALANCHOE" 
1000 IFZ=68PRIKT"KOHLERIA" 

1005 IFZ"69PRINT'CAPE COWSLIPS OR LEOPARD LILIES" 
IFZ=70PRINT'LAELIA ORCHID" 
IFZ-71PRINT"LAELI0CATTLEYA ORCHID" 
IFZ=72PRINT"COMHOH OR TRAILING LANTANA" 
IFZ-73PR1NT"EASTER LILY" 
IFZ=74PRINT"SWEET ALYSSUH" 
1035 IFZ-75PRINT"HALPIGHIA OR SINGAPORE HOLLY" 
1040 IFZ=76PRINT"TURK'S CAP, SCOTCH PURSE, WAXHALLOW" 
IF2-77PRINT"FIRECRACKER VINE" 
IFZ=78PRINT"HAXILLARIA ORCHID" 
IF2=79PR1NT"NE0PINETIA ORCHID" 
IFZ<-80PR1NT" APOSTLE PLANT OR WALKING IRIS" 
1065 IFZ=81PRINT"FL0WERING TOBACCO" 
1070 IFZ-82PRINT"NIDULARIUH (A BROMELIAD) " 
1075 IFZ=83PRINT"LILY OF THE VALLEY ORCHID" 
IFZ-84PRINT"DANCING LADY ORCHID" 
IFZ=85PRINT"SWEET OLIVE" 
IFZ-86PRINT"OXALIS" 

IFZ=87PRINT"PAPHIOPEDLUH OR CYPRIPEDIUM ORCHID* 
IFZ-88PRINT"PASSI0FLOWER" 
1105 IFZ=89PRINT"GERANIUM" 
1110 IFZ-90PRINT"MOTH ORCHID" 
IFZ»91PRINT"PRIHR0SE" 
IFZ-92PRINT"DWARF POMAGRANATE" 
IFZ-93PRINT"GRECIAN VASE PLANT" 
1130 IFZ-94PRINT"DOUBLE DECKER PLANT OR CARDINAL FLOWER" 
1135 IFZ=95PRINT"MINITURE ROSE" 
I PZ-96PRI NT "ROSEMARY" 
IFZ=97PRINT"TRAILING VELVET PLANT" 
IFZ-98PRINT"AFRICAN VIOLET" 
IFZ=99PRINT"STRAWBERRY BEGONIA" 
IFZ-100PRINT"SPANISH SHAWL" 
1165 IFZ=101PRINT"EASTER OR CHRISTMAS CACTUS" 
1170 IFZ-102PRINT"HEXICAN FLAME VINE OR PARLOR IVY" , 
1175 IF2=103PRINT"GLOXINIA" 

IFZ=104PRINT"TEMPLE BELLS" 

IFZ-105PRINT"JERUSALEM OR CLEVELAND CHERRY" 
1190 IFZ«106PRINT"SPATHIPHYLLUH" 
1195 IFZ=107PRINT"MADAGASCAR JASMINE" 



945 
950 



985 
990 



1010 
1015 
1020 

1025 
1030 



1045 
1050 
1055 
1060 



1080 
1085 
1090 
1095 
1100 



1115 
1120 
1125 



1140 
1145 
1150 
1155 
1160 



1180 
1185 



Program Listing I cortmiMS 
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Program Listing 1 conlmueO 

1200 IFZ=108PBINT"BIRD OF PARADISE" 

1205 IPZ=109PRINT"CAPE PRIMROSE" 

1210 IFZ=110PBINT"ORANGE STREPTOSOLEN" 

1215 IFZ=111PRINT"BLACK EYED SUSAN VINE" 

1220 IFZ=112PRINT''TILLANDSIA° 

1225 IFZ=113PRINT"STAR JASMINE" 

1230 IFZ=114PRINT"TRICH0CEHTBUH ORCHID" 

1235 IFZ=115PRINT"S0CIETY GARLIC OR FRAGRANT TULBAGlilA" 

1240 IFZ = 116PRINT"SCARBQR0UGI1 LILY" 

1245 IFZ=117PRINT"VELTHEIMIA" 

1250 IFZ = 118PRINT"FLAMIIJG SWORD OR PAINTED FEATHKR" 

1255 IFZ=119PRINT"CALLA LILY" 

1260 IFZ=120PRINT"ZEPHYR LILY" 

1265 RETURN 

1270 PRINT" =-> SOIL, HUMIDITY, FEEDING. — "; 

1275 IFZ=380RZ=390RZ=42PRINT"WET, HIGH, IM" :GOT01455 

1280 IFZ = 46ORZ = 80ORZ^il9PRItJT"VJET, NORMAL, 1H":G0T01455 

1285 IFZ=60PRINT"HET, NORMAL, NONE" :GOT01455 

1290 IFZ=20PRINT"DRY, NORMAL, NONE" :GOT01455 

1295 IFZ=230RZ=73PRINT"HOIST, NORMAL, NONE" :GOT01455 

1300 IFZ=79PRINT"H0IST, HIGH, SPRING" :G0T01455 

1305 IFZ=1110RZ=112PRINT"H0IST, NORMAL, FALL" :G0T01 455 

1310 IFZ=630RZ=89PRINT"DRY, NORMAL, 1H":GOT0145B 

1315 IFZ=24ORZ=26ORZ=92ORZ=106PRINT"MOIST, NORMAL, 3-4M" : G0T0145 

5 

1320 IFZ=960RZ=990RZ=113PRINT"DRY, NORMAL, 3-4M" : GOT01455 

1325 IFZ=80RZ=90RZ=170RZ=65PRINT"MOIST, HIGH, 2W":GOT01455 

133 IFZ=27ORZ=4 4ORZ=51ORZ=7 8ORZ=87ORZ=90GOTO1345 

13 35 IFZ=98ORZ=10 5ORZ=114GOTO13 45 

1340 GOTO1350 

1345 PRINT"MOIST, HIGH, 1M":GOT01455 

1350 IFZ=12ORZ=13ORZ=15ORZ=40ORZ=41ORZ=6 7GOTO136 5 

1355 IFZ=72ORZ=108GOTO1365 

1360 GOTO1370 

1365 PRINT"DRY, NORMAL, 2W":GOT01455 

1370 IFZ=16ORZ=25ORZ=7 0ORZ=71ORZ=83ORZ=84GOTO13 85 

1375 IFZ=94GOT01385 

1380 GOTO1390 

1385 PRINT"DRY, HIGH, lM"!GOT01455 

13 9D IFZ=28ORZ=3 6ORZ=4 7ORZ=4 9ORZ=75GOTO1400 

1395 GOTO1405 

1400 PRINT"DRY, NORMAL, SPRING" :GOT01455 

140 5 IFZ=22ORZ=5 9ORZ=64ORZ=107ORZ=116GOTO1415 

1410 GOTO1420 

1415 PRINT"MOIST, NORMAL, SPRING" :GOT01455 

1420 IFZ=6ORZ=70RZ=110RZ=140RZ=18ORZ=19ORZ=29G0TO1445 

1425 IFZ=31ORZ=35ORZ=37ORZ=43ORZ=48ORZ=50GOTO1445 

1430 IFZ=56ORZ=6 20RZ=660RZ=760RZ=770RZ=BlG0TO1445 

1435 IFZ=B8ORZ=91ORZ=95ORZ=97G0TO1445 

1440 GOTO1450 

1445 PRINT"MOIST, NORMAL, 2H":GOT01455 

1450 PRINT"MOIST, NORMAL, IM" 

1455 RETURN 

1460 INPUT"OUTPUT LISTING TO PRINTER, 

1465 IFP5="Y'THEN1480 

1470 IFPS="N"THENRETURN 

1475 GOTO1460 

1480 IFQQ=1THEN1500 

1485 INPUT"INPUT LISTING TO PRINTER, Y/N";R$ 

1490 RS=LEFTS(R$,1) : IFRS="Y"ORBS = "N''THEN1500 

1495 GOT01485 

1500 AA=PEEK(14312) 

1505 IFAA-6 3THENRETURN 

1510 PRINT"THE LINE PRINTER IS NOT READY 

FIT ENTER vmEN READY TO PROCEED 

lj20 IFINKEYS<>CHRS(13)THEN1520ELSEPRINTCHR5(27)CHRS(27)CHR5(27) 

CHRS(31) ; :GOT0146G 

1525 IFRS="Y"At!DW=7THENl58fl 

1530 IFP$="N"THEN1705 

1535 IFQQ=lTHEniA=10 

1540 Y1=0 

1545 IFVJ>7THENY1=3 

1550 IFG=1THENIA=INT(I+1.5) 

1555 IFG=>2THENIA=I+1 

1560 F0RYA=Y1T0IA 

1565 FORXA=0TO62:AA=PEEK(1536C+XA+YA*64) : LPRINTCHRS (AA) ; :NEXTXA 

1570 AA=PEEK(15423+YA*54) : LPRINTCHRS ( AA) :NEXTYA 

1575 GOTO1705 

1580 LPRINT"SELECTED PLANT CHARACTERISTICS" 

15 8 5 FORZA=0TO6 2:LPRINT"*" ; : NEXTZA: LPRINT"* " 

1590 LPRINT"BEST "jAAS;" - "; 

1595 IFL=1LPRINTABS 

1600 IFL=2LPRINTACS 

1605 IFL=3LPRINTADS 

1610 IFL=4LPRINTAES 

1615 IFL=5LPRINTAFS 

1620 LPRINT"HAXIMUM 

1625 IFH=1LPRINTDB$ 



[Y/N)";FS:PS=LEFTS(PS,1) 



iBASr" - 



Program Listing ! continues 



LOWEST*PRICES 



ON 



TRS-80 




OKI DATA 

EPSON MX-70 
EPSON MX-80 



Microline 80 
Microline 82 



$394 
$499 

$369 

$4 79 



$ SAVE 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 



$ 



■ See List of Advertisers on page4ia 



VERBATIM DATALIFETM DISKETTES 
5V,-inch (box of 10) $25.95 

8-tnch Double-Density, $43.95 

• Paym«f>l Money OiMt Casfi.B' s 
Ch*cl>. Ceriil>«dCn*cl( Pafwnal 
ChKto rsquir* 3 we«tis to cWv VISA. 
MASTERCMARGE — Add S"'. 
WRITE OR CALL FOR OUR COMPLETE PRICE LIST. 

CALL (602) 458-2477 

m^^ Ali prices are mail order only ^mm 

RAND'S .3s 

2185 E FRY BLVD. 
^ SIERRA VISTA. AZ 85635 

^t^ TRS-80 iS 3 liaOemark of Tandy Corporation. 
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PACKER Machine language piogiam tnat edits all or pari 

01 your Basic progtam to <iin lasrer save memoiy. ot 
ease edilmg The b options include UNPACK— unoacks 
muliiple statement lines inio single siaiemenis 
mainlaming logic inserts spaces and renumbers lines 
ShiORT deletes unnccessaiy words spaces and MM 
siaten^enls PACK— packs lines mto maximum multiple 
slalemeni lines, including all branches MOVE-moves 
line or blocks of lines to any new location on program 0" 

2 cassettes lor 16K 32K 8 4SK 

For TftS'BO Mod I or III Level II or Disk Basic . S?g % 
SYSTEM TAPE DUPLICATOR Copy your SYSTEM lormat 
tapes Includes venly routines The Model III version 
allows use of both 500 and 1500 liaud cassettes speeds 

For IRS-eO Model tor III iPvuJ It S15% 

CASSETTE LABEL MAKER A mini word processor to pnri 
cassette labels on a line punter Includes 50 peel - and 
stick labels on tractor teed paper 
For TR-80 Model I ol III level It & Printer S17 9^ 

PRIHT TO LPniNT TO PRINT Edits youi Basic program m 
seconds to change all Prints to LPnnts lexcepl Ptmtla m 
Print») or LPrinis to Prints Save edited verston 

For tB-80 Model I or III Level It SI? 95 

FAST SORT ROUTINES lor use with Radio Shacks 
Accounts Receivable Inventory Control I and Disk 
Mailing List Systems tor Model I Level II Sorts in 
SECONDS' Vou II be amazed ai the time they can save 
Supplied on data diskette with complete instructions 

FAST SORT lor Accounts Receivable Si9 95 

FAST SORI tor Inventory Control I . S)995 

FAST SORT tor Disk Ua:img List (specify data diskette ol 

cassette loi 1 drive systemi ... . SH95 

ALL THREE ROUTINES S44 95 

Prices subject to change without notice Call or write for a 
complete cat.ilog Dealer inquiries invited VISA and 
Mastercbarqe accepted Foreign order in US Currency 
(inly Kansas residents add 3 > sales lax 
On-line catalog m Wichita FORUM-SO 3I6'6B2'?I13 
Or call our 7i hnui phone (316) 683-481 1 or write 
COTTAGE SOFTWARE 
614 N HARDING 
WICHITA. KANSAS 6?20e ^233 
IHS-fl(l""'is a trademark ol lanOy Coiporatii'i 




Mercer Systems 

wishes 

to 

thank its clients 

for 

making 

1981 

its most successful year! 




Thanks 

and 

Happy Holidays 

to 

ALL ^ 

Mercer Systems, Inc. ^^ 

87 Scooter Lane 

Hicl<sville. N.Y. 

1 1801 ^104 



Progiam Listing I contmuea 

1630 IFH=2LPRINTBCS 

1635 IFH=3LPRINTBD$ 

1640 IFH-4LPRINTBE5 

1645 IPH=0LPRINTBFS 

1650 LPRINTCA$i" - "; 

1655 IFN=1LPRINTCBS 

166fl IFN-2LPRINTCC$ 

1665 IPN=3LPRINTCDS 

1670 LPRINT'DESIRED "jDASf" - "l 

1675 IFC=1LPRINTDB$ 

1680 IFC-2LPRINTDCS 

1685 IFC=3LPRINTDDS 

1690 1FC=4LPRINTDES 

1695 IFC=0LPRINT"NONE' 

1700 GOTO1540 

1705 RETURN 

1710 AA$="LIGHTING CONDITION" iAB$='DIK LIGHT" 

1715 AC$-"NORTH WINDOW :ADS""EAST OR WEST WINDOW" 

1720 AE$="SOUTH WINDOW" :AF$="ARTIFICAL LIGHTS" 

1725 BA$=-"PLANT HEIGHT RANGE" :BBS-"LESS THEN 1 FOOT" 

1730 BCS-"1 TO 2 FEET":BD5="2 TO 3 FEET' 

1735 BE?="OVER 3 FEET" :BFS="ANY" 

1740 CA$="NIGHTIHE TEMPERATURE RANGE" : CBS""4fl TO 50 DEGREES' 

1745 CCS="50 TO 60 DEGREES" :CD$="60 TO 70 DEGREES" 

1750 DA$="SPECIAL FEATURES" :DB$-"TRAILING OR CLIMBING" 

1755 DCS="FRAGRANCE":DDS="FOLIAGE COLORING OR MARKINGS" 

1760 DES-"FRUITS OR BERRIES" :DF$="ANY" 

1765 RETURN 



Program Listing 2 

' FOLIAGE PLANT INDEX ~ BY JOHN CHIPHAN 

5 W"0:Iel:Y«0 

10 CLS:GOSUB1000:PRINT"FOLIAGE HOUSE PLANT INDEX"lW-W+l 

12 IFW>5PRINT@109, "RECOMMENDED PLANTS" 

15 GOSU&1000:ONWGOTO20,40,6O,75,95,99,143,143,143«143,143 

20 PRIRT"ENTER LIGHTING CONDITION" : PRINT"1 - DIM LIGHT" 

25 PRINT"2 - NORTH WINDOW" : PRINT"3 - EAST/WEST WINDOW" 

30 PRINT"4 - SOUTH WINDOW iPRINT" 5 - ARTIFICIAL LIGHTS" 

35 GOSUB1000:INPUTL:GOTO10 

40 PRINT"ENTER PLANT HEIGHT" i PRINT"1 - 1 FT OB LESS" 

45 PRINT"2 - 1 TO 2 FT":PRINT"3 - 2 TO 3 FT" 

50 PRINT"4 - OVER 3 FT":PRINT"0 - ANY" 

55 GOSUBl0O0tINPUTH:GOTO10 

60 PRINT'ENTER NIGHTIHE TEMPERATURE" : PRINT"1 - 40 TO SB DEG." 

65 PRINT"2 - 50 TO 60 DEG. " : PR1NT"3 - 60 TO 70 DEG." 

70 GOSUB1000:INPUTN!GOTO10 

75 PRINT"ENTER SPECIAL FEATURES" : PRINT"1 - TRAILING/CLIMBING" 

BO PRINT"2 - TERRAR1UM":PRINT"3 - DISH GARDEN" 

95 PRINT"4 - FOLIAGE COLOR/MARKINGS" :PRINT"0 - ANY" 

90 GOSUB1000:INPUTC:GOTO10 

95 PRINT"ENTER YOUR DATA DISPLAY CHOICE" 

96 PRINT"1 - SCIENTIFIC NAMES" :PRINT"2 - SCIENTIFIC AMD COHHON N 
AMES" 

97 PRINT"3 - SCIENTIFIC, COHHON, PLUS SOME PLANT CARE NOTES" 

98 GOSUBlflOO:INPUTG:GOTO10 

99 FORZ=1TO103 

100 READAS,0,R,T,V 

105 IF{L=Q)+((L=3)*{Q=5))+((L=1)"(Q=2))*((H=R)+(H=0))THEN115 

110 GOT0146 

115 IF{N=T)THEN125 

120 G0TO146 

125 IF{C=V)+(C=0)+((C=l)*(V=5))+({C=2)*{(V=6)+(V=e)))THEN14O 

130 IF((C-3)*( (V-^7)+{V-8)))+({C«4) • {V>4) )THEN14fl 

135 GOT0146 

140 IFK10THEN143 

141 GOSUB100fl:INPUT"HIT ENTER TO CONTINUE LISTING"iBS 

142 I=fl:GOT010 

143 Y=Y+1:IFG-1PRINT9(176+16*Y) ,AS 

14 4 IFOIPRINTAS; " - "; : 1 = 1 + 1 :GOSUB2000 

145 IFG=3GOSUB30D0: 1=1+1 

146 NEXT2:RESTORE:IFY«0PRINT"SORRY - NO RECOtmENDATIONS" 
152 GOSUB1000 

155 Y=1:N=0 

160 INPUT"WOULD YOU LIKE ANOTHER RUN (Y/N) " iQS: IFLEFTS (QS,1) ="y' 

THEN 5 

165 CLS:£ND 

50 DATAACALYPHA, 4 ,3,2,4, ACORUS ,5,1,1, 4 , ADIANTUH ,2,2,2,2 

501 DATAADROM I SCHUS ,4,1,2,4, AGAVE ,4,1,2,0, AGLAONEHA ,2,2,3,0 

50 2 D ATAALOE ,4,1,2,0, APOROCACTUS ,4,3,1,1, AEAUCARI A ,3,4,2,0 

503 DATAASPARAGUS,3,2,2,1,A5FIDISTRA,2,3,2,0,ASPLENIUM,2,1,2,2 

50 4 DATAAUCUBA,3,4,1,7,BEAUCARNIA,4,4,2,0,BEGOIIIA,5,1,3,4 

505 DATADRASSAIA,4,4,3r0,BUXUS,4,4,l,0,CALADIUH,5,2,3,4 

Program Usllnu 2 coniinoM 
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WHOT 



II# 



ES 



80 micRocompuTinc 



DO FOR YOU? 



rr 



provides you with more information on your TRS-80' than any other single source 
gives you 20-30 new programs to use each month 

• reviews equipment and software so you l^now what or what not to buy 

• gives you the truth about the TRS-80— its good points and its limitations 
{80 Microcomputing is not affiliated with Tandy) 

• lets you save money— lots of it— by comparison shopping within the ad pages 

• clues you in on how other TRS-80 owners are using and updating their systems 

• lets you in on what is really happening in the industry 

• brings you Wayne Green's outspoken 
and often controversial editorials every 
month 

• and best of all it gives you a no risk 
subscription offer- 



Subscribe today — if you are not satisfied with 
the first issue— write "cancel" across your 
invoice and send it back. 
The 80 Microcomputing is yours to keep. 




Canadian 1 year only/US funds $27.00 Foreign 1 year only/US funds $35.00 

80 Microcomputing • PO Box 981 • Farmingdale, NY 11737 

'TRS-80 is a trademark of Tandy 
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Wages 

Is 
Here 

FORTHETRS-80 

• Wages MEETS PAYROLLS 

• Wages IS GUARANTEED 

► Wages COST ONL/ 

$35.00 FOR MODEL I 
($45.00 FOR MODEL II) 



FROM 
The Maine Software Library 

P.O. Box 194 ^^^ 

Standish, Maine 04084 

'A Trade name of Ihe Tandy Corp 



IS YOUR MICRO Ji 
ENLARGE 



:C: 




WITH 

S-100! 

t/i/ny the S ICC ('£££ 696 IJ Sos S/anoa/O' 

■ ■ \U'» lu^ yOur kItCflO 'nlQ a compote' Wf f".' 

:apeO>"iy c d UINI. 

• • './ ncla as mw-tJ MEWOflV as neeOsO (*M ■ 
? c mote 6^K RAM Dosntsi 



AMatx-'i"'i I" Qrt*- n'lj ds Ttucft HAM o/ I'd' 
py(.hi' CAPACITY .'.• yixj neea 



A J. .*^f ..;'■..<*-■■ ■. COLOP-aBAPHICS:\,i.j 
3-a-7 ,:'■ MOPE' 

^rieseOoaras i-.-' PLUG into ,o.^ s/sr»-i 
DfOviOed you '<^ve ^' S-1 00 •■■i" '• ;t-- ir : 
an.nte'laceaaapiei'': XoMPurfH v/ir. 

■" . TPSSO ' :'! & omeis 

■ . ' 5 -■, "i^r'-aTes "crn t3'0 Caia'og $' 



V) 



.oi--- 



v^-v 



„»^^ 



s*. 



VV-^- 



,11^ 



LOMPureR Wrr ^i9b 

iNCOPPOPArio 
5620 ;«'" SJ'»»f s.w 

t/nowcotf ]A'ts/^'ngion 96036 
'3061 743-4336 
(Ormpry HUH 



506 DATACALATHEA,5,2,3,6,CALLISIA,3,3,2,5,CARYOTA,3,4,3,B 

507 DATACEPHALOCEREUS,4,1,1,3,CEROPEGIA,3,3,2,5,CHAMAEDORA,2,1,3 

508 DATACHAHAEROPS,4,4r2,fl,CHLOROPHYTOH,3,2,2,5,CHRYSALIDOCARPUS 

,3,4,3,0 

509 DATACIBOTlUH,3,4,2,a,CISSUS,3,2,2,l,CODIAEUH,4,4,3,4 

510 DATACOLEUS,4,2,3,4,CORDYLINE,4,3,3,4,COSTUS,3,3,3,4 

511 DATACRASSULA, 4 ,2,1,0 ,CYATBEA, 3 ,4,2,0, CYCAS ,3,3,2,0 

512 DATACypERUS,4,4,2,fl,CYRTOHIUM,2,2,l,l,DAVALLIA,2,2,2,l 

513 DATADIEFFENBACHIA,3,4,3,4,DIZYGOTHECA,3,4,3,0,DRACAENA,3,4,3 
,4 

514 DATAECHEVERIA,4,l,2,3,ECHINOPSIS,4,l,l,3,EUONYHUS,3,3,l,7 

51 5 DATAEUPHORBI A , 4,2,2,3, FATSHEDERA, 4 ,3,1,1, FATSIA, 4 ,4,1,0 

516 DATAFICUS,3,4,3,0,FITTONIA,2,1,3,6,GASTERIA,5,1,2,0 

517 DATAGEOGENATHUS ,5,1,3,4, GREVILLEA ,4,2,2, ,GYMNOCALYCIUM ,4,1, 
2,7 

518 DATAGYNURA ,4,2,3,5, HAWORTH lA , 5 , 1 , 2 , 3 , HEDERA, 4 ,2,1,1 

519 DATAHOWEIA,3,4,3,fl,HYPOESTES,5,l,3,4,KALAHCHOE,4,l,2,fl 

520 DATALAURUS,4,4,1,0,LIGUSTRUH,4,4,1,3,LIVISTONA,3,3,3,0 

521 DATALOBIVIA,4,l,l,3,MAMHILLARIA,4,l,l,3,HARANTA,5,l,3,4 

522 DATAMONSTERA,3,3,3,0,MYRTUS,4,3,1,3,NEPHROLEPIS,3,3,2,1 

523 DATAN1CODEMIA,4,2,3,0,NOTOCACTUS,4,1,1,3,OLEA,4,4,1,0 

524 DATAOPUNTIA,4,4,1,0,OSMANTHUS,4,3,1,3,PACHYPHYTUM,4,1,2,0 

525 DATAPAHDANUS ,3,4,3, fl ,PEDILAUTHUS ,3,3,2, .PEPEROHIA, 5,1,3,0 

526 DATAPH I LODENDROH ,3,3,3,0, PHOEN IX , 3 , 2 , 3 , 3 , PILEA ,5,1,3,4 

527 DATAPIPER,3,4,3,5,PITTOSPORUH,4,4,1,0,PLATYCERIUM,5,2,2,0 

528 DATAPLECTRANTHUS ,3,2,2,1, PLEOHELE ,3,4,3,0, PODOCARPUS ,4,4,1,0 

529 DATAPOLYPODIUH,3,2,2,1,POLYSCIAS,4,3,3,0,POLYSTICHUH,2,2,2,2 

530 DATAPTERI S,2,1,2,2,RHAPIS,3,4,2,0, RHOEO ,3,3,3,4 

531 DATASANSEVIERIA,2,3,2,4,SCINDAPSUS,5,1,3,1,SEDUH,4,2,2,1 

532 DATASENECIO ,3,2,2,1, SETCREASEA, 4 ,2,3,5, SYNGON lUM ,3,2,3,5 

533 DATATETRAPANAX,4,4,2,0,TOLHIEA,5,2,1,1,TRADESCANTIA,3,3,2,5 

534 DATAZEBRINA,3,3,3,5 

1000 PRINTSTRINGS(64,42) ;:RETURN 

2006 IFZ=1PRINT"C0PPERLEAF OR BEEFSTEAK PLANT" 

2001 IFZ-2PRINT"JAPANESE SWEET FLAG" 

2003 IFZ=3PRINT"HAIDENHAIR OR VENUS' HAIR FERN" 

2004 IFZ = 4PRINT''SEA SHELLS, PLOVER EGGS, OR CALICO HEARTS" 

2005 IFZ=5PRINT"CEHTURY PLANT" 

2006 IFZ=6PRIHT"CHINESE EVERGREEN" 

2007 IFZ=7PRINT"AL0E" 

2008 IFZ=8PRINT"RATTAIL CACTUS" 

2009 IFZ=9PRINT"N0RF0LK ISLAND OR STAR PINE" 

2010 IFZ»10PRINT"ASPARAGUS FERN" 

2011 IFZ=11PRINT"CAST IRON PLANT" 

2012 IFZ=12PRINT"M0THER OR BIRD'S NEST FERN" 

2013 IFZ=13PRINT"JAPANESE AUCUBA OR GOLD DUST TREE" 

2014 IFZ=14PRINT"ELEPHANT FOOT TREE OB PONY TAIL" 

2015 IFZ»15PRINT"BEG0NIA" 

2016 IFZ=16PRINT'SCHEFFERA, OCTOPUS TREE, OR UMBRELLA THEE" 

2017 IFZ-17PRINT"BOXW00D" 
201B IFZ=18PRINT"CALADIUH" 

2019 IFZ=19PRINT"PEAC0CK PLANT" 

2020 IFZ»20PRINT"STRIPED INCH PLANT" 

2021 IF2=21PRINT"TUFTED FISHTAIL PALM" 

2022 IFZ»22PRINT"OLD HAN CACTUS" 

2023 IFZ=23PRINT"ROSARY VINE OR HEARTS ENTANGLED" 

2024 IFZ=24PRINT"PARLOR OR NEANTHE PALM" 

2025 IFZ-25PRINT"EUROPEAN FAN PALM" 

2026 IFZ=26PRINT"SPIDER, BRACKET, OR RIBBON PLANT" 

2027 IFZ-27PRINT"BUTTERFLY, FEATHER, OR CANE PALM" 

2028 IFZ=28PRINT"HAWAIIAN OR MEXICAN TREE FERN" 

2029 IFZ=29PRINT'GRAPE OR KANGAROO IVY" 

2030 IFZ=30PRINT"CROTOH" 

2031 IFZ-31PRINT"COLE0S" 

2032 IFZ-32PRINT"HAVJAIIAN TI PLANT" 

2033 IFZ=33PRINT"SPIRAL FLAG OR STEPLADDER PLANT" 

2034 IFZ-34PRINT-JADE OR SILVER DOLLAR PLANT" 

2035 IFZ=35PRINT"TREE FERN" 

2036 IF2=36PRINT"FERN OR SAGO PALM" 

2037 IFZ=37PRINT"UMBRELLA PLANT" 
2033 IFZ=38PRINT"HOLLY FERN" 

2039 IFZ-39PRINT"DEER'S, SQUIRREL'S, OR RABBIT'S FOOT FERN" 

2040 IFZ=40PRINT"DIEFFENBACHIA OR DUMB CANE" 

2041 IFZ«41PRINT"FALSE ARALIA" 

2042 IFZ=42PRINT'DRACAENA OR DRAGON TREE" 

2043 IFZ=43PRINT"ECHEVERIA OR PAINTED LADY" 

2044 IFZ-44PRINT"PINK EASTER LILY CACTUS" 

2045 IFZ=45PRINT"WINTER CREEPER" 

2046 IFZ=46PRINT"CRO(n] OF THORNS OR DRAGON BONES" 

2047 IFZ=47PRINT"TREE OB ARALIA IVY" 

2048 IFZ=48PRINT" JAPANESE ARALIA" 

2049 IFZ=49PRINT"BENJAMIH OB WEEPING FIG OR RUBBEB TREE" 

2050 IFZ=5flPRINT"H0SAIC PLANT' 

2051 IFZ»51PRINT"GASTERIA" 

2052 IFZ=52PRINT"SEERSUCKER PLANT" 

2053 1FZ-53PRINT"SILK OAK" Program conm.e. 
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program continues 

2054 IFZ=54PRINT-PLA1D OR CHIN CACTUS" 

2055 1FZ-55PRINT"PURPLE OR JAVA VELVET PLANT" 

2056 IF2=55PRINT"HAWORTHIA" 

2057 IFZ=57PRINT"EHGLISH IVY" 

2058 IFZ = 58PRINT"SEtlTRy PALM" 

2059 IFZ=59PBINT'FRECKLE FACE OR PINK POLKA DOT PLANT" 

2060 IFZ=60PRINT"KALANCHOE' 

2061 IFZ=61PRINT"SWEET BAY OR LAUREL" 

2062 IFZ=62PRINT"WAX LEAVED OR TEXAS PRIVET" 

2063 IFZ-63PRINT"CHINESE FAN PALM" 

2064 IF2=«64PR1NT"C0B OR GOLD EASTER LILY CACTUS" 

2065 IFZ-65PRINT-GOLD STAR OR PINCUSHION CACTUS" 

2066 IFZ=-66PRINT"PRAYER PLANT OR ARROUROOT" 

2067 IFZ=67PRINT"CUT OR SPLIT LEAF PHILODEHDRON" 

2068 IFZ=6BPRINT"HYRTLE" 

2069 IFZ-69PRINT"SWORD FERN" 

2070 IFZ=70PRINT" INDOOR OAK" 

2071 IFZ=71PRINT"BALL CACTUS" 

2072 IFZ=72PRIHT"OLIVE TREE" 

2073 IFZ=73PSINT"BEAVERTAIL OR BUNNY EAR CACTUS" 

2074 IFZ-74PRINT"FALSE HOLLY" 

2075 IFZ=75PRINT"HOOHSTONES OR SILVER ALMONDS" 

2076 IFZ=76PRINT"VEITCH SCREW PINE" 

2077 IFZ-77PRINT"DEVIL'S BACKBONE OR REDBIRD CACTUS" 

2078 IFZ-78PRINT"PEPEROHIA" 

2079 IFZ"79PRINT"PHILODENDRON" 

2080 IFZ=80PRINT'HINIATURE DATE PALM" 

2081 IFZ-81PRINT"ALUMINUH PLANT OR SILVER TREE" 

2082 IFZ=82PRINT"SAFFRON OR BLACK PEPPER" 

2083 IFZ-83PRINT"JAPANESE PITTOSPORUH" 

2084 IFZ=84PRINT"STAGHORN FERN" 
2035 IFZ-85PRINT'SWEDISH IVY" 

2086 IFZ=86PRINT"PLEOHELE" 

2087 IFZ-87PRINT"CHINESE PODOCARPUS" 
208B IFZ-88PRINT"HARE'S FOOT FERN" 

2089 IFZ=89PRINT"VICTORIA OR BALFOUR ARALIA" 

2090 IFZ-90PRINT"TSUSSIHA HOLLY FERN" 

2091 IFZ=91PRINT"TABLE OR BRAKE FERN" 

2092 IFZ-92PRINT"LADY PALM" 

2093 IFZ=93PRINT"HOSES IN THE CRADLE OR BOAT LILY" 

2094 IFZ-94PRINT-SNAKE PLANT OR BOWSTRING HEMP" 

2095 IFZ-95PBINT"DEVIL'S IVY OR POTHOS" 

2096 IFZ=96PRINT"BURRO'S OR DONKEY'S TAIL" 

2097 IFZ=97PRINT"GERMAN OB PARLOR IVY" 

2098 IFZ=96PRINT"PURPLE HEART" 

2099 IFZ=99PRINT"ARROWHEAD VINE" 

2100 IFZ-1O0PRINT"RICE PAPER PLANT" 

2101 IFZ=101PRINT"PIGGY-8ACK PLANT, MOTHER OF THOUSANDS" 

2102 IF2-102PRINT"INCH PLANT OR WANDERING JEW" 

2103 IFZ=103PRINT"WAHDERING JEW" 

2999 RETURN 

3000 PRINT" --> SOIL, HUMIDITY, FEEDING. -- "; 

3001 IF(Z"2) +(Z=35) PRINT"HET, NORMAL, 6M" 

3002 IFZ=32PRINT"HET, HIGH, 3-4M" 

3003 IFZ = 3PRINT"V;ET, HIGH, 6H" 

3004 IFZ=12PRINT"H0IST, HIGH, 6M" 

3005 IF(Z=16)+(Z=60)PRINT"DRY, NORIIAL, 6M" 

3006 IF(Z=l)+(Z-13)+(2-19)+(Z-50)+(Z=86)+{Z=89)PRIHT"HOIST, HIGH 

, 3-4H" 

3007 IFZ=7PRINT"DRY, NORMAL, FALL" 

3008 IFlZ=21)+(Z=25)+(Z-27)+(Z-37)+(Z-63)+(Z=8O)+(Z=92)THEN3010 

3009 GOTO3011 

3010 PRINT"WET, NORMAL, SPRING" 

3011 IF(Z=11) + [Z = 17}+{Z = 24)+(Z3.30) + [Z-41) + (Z = 43} + (Z = 58)THEN3015 

3012 IF(2-61) + (Z>=66)+(Z = 67)+(Z=6 9)+(Z = 70) + (Z-74) + {2=77)THEN3O15 

3013 IF(Z=67)+(Z=9C)+{Z=10O)THEN3015 

3014 GOTO3016 

3015 PRINT"MOIST, liORHAL, SPRING" 

3016 IF(2=29)+(Z=34)+(Z=4O)+(Z-53)+CZ-76)+tZ-78)THEN3020 

3017 IF{Z-95)+(Z»96)+(Z=98)+(Z=lO2)THEH3020 

3018 GOTO3021 

3020 PRINT"DRY, NORMAL, 3-4M" 

3021 IF(Z=6) + (Z=28)+(Z-3 8)+{Z-39)+-(2=42) + (Z=48)+(Z = 49)THEN3025 

3022 IF(Z-59)+(Z=84)+(Z=88)+(Z=91)THEH3025 

3023 GOTO3026 

3025 PRINT"MOIST, NORMAL, 6M" 

3026 IF (Z-9)+( 2-10) +( 2=15) +(Z=18)+{Z=20)+CZ»26)+(Z-31)THEN3035 

3027 IF(Z=33) + (Z = 45)+(2=47) + CZ''52)t{Z-55)4-(Z=57)+(2=7 9)THEN3035 

3028 IF (Z-81) + (Z"82) + { 2 = 85) ■t-(2''93)+{Z = 97]+( 2 = 99) +(Z = 101)THEN3035 

3029 IF{2"1O3)THEN3035 

3030 GOTO3036 

3035 PRIHT"HOIST, NORMAL, 3-4H" 

3036 IF(Z=4)+(Z=5)+{2=8)+(Z=14)+(Z-22)+(Z=23)+(Z.36)THEN3045 

3037 IF(Z-44)^(Z-46)+(2-51)+(Z=54)+{Z=56)+(Z=64)THEN3045 
303 8 IF{ 2=65) +(2=68) +(Z=71) +(2=72) +(2-73) +(Z«75)THEN3045 

3039 IF(Z=83)+(Z-94)THEN3045 

3040 GOT03999 

3045 PR1NT"DRY, NORJIAL, SPRING" 

3999 RETURN 



EPSON Printers 



MX- 100 $749 

MX-80F/T $569 

uses roll lanfold or single sheet paper 

MX- 80 $469 

topseiiinadoi m.itn. piii>iRr 



C.ITOH 
Starwriter Printers 



25cps parallel $1380 
45cps parallel $1755 



Typ'' 



i(rr jLj.il'ty U\..\\ 



OKI DATA Printers 



Microlino80 $398 

Microline82A $584 

Microline83A $895 



Mif lohiie SJA & B3A tf.n..ri's 
l?Ocps 9i9dol matf'i HUP lowei dc^ 


eniteis 


UDS Mode." lOJ LP 
UDS Motlcm 103 JLP 
LtXICON Modem LEX-11 


S 175 
$215 
$125 


Scotch 3M Diskettes 

8 SSSD 10/: -2 IM 
■_. u SSSD 'O'i je-rl 





J.(I[]at9tPon 

PO Bo« ao5 

M.ibsapequ.i, NY 1W!>B 

.<£• mc and 1% 
ORICES SUSJEd TO CHANHF 



I TRS-80' i 

m 




SAVE fl BUriDLE 



When you buy your 
TRS 80TM equipment! 

Lsc our loll frct: ntimhcr lo 
^^ clit:ck our prkt: hciorc >(>u hu> 
"' aTKSS(li'^...ain>*licrc: 



r l»ndT iMifi—tMa- 



/„ Don't delay. . .CALL TODAY il 








y^i^-i 



.^I^H 



^ See List of AUvertiaers on page 418 



SALES COMPANY 

M12 WEST FAIRFIELD DR 

PO BOX 8098 PENSACOLA FL 3250% 

904/4386507 

naltonvwide 1 BOO 874 1561 
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"... It's becoming very clear now. . . 
Your microcomputing life is going to be very 
exciting. . .Money! I see much 
money for you. Perhaps it is the 
money you w\\\ gain when 
Instant Software's new 
business applications 
guide your financial 
endeavors. I see 
travel. . you will 
ourney to distant 
worlds in distant 
times. You will build 
kingdoms from des- 
erts and armies 
from slaves. Never 
will you be bored, 
adventurous one! Your 
programming burdens wilt 
lighten with new utilities— new 
tools. I see color! Many 
bright colors! I see new 
pacltaglng for all these trea- 
sures .. everything new! 
And... yes, a tall, hand- 
some stranger who will 
guide you to these won- 
ders. It will be your In- 
stant Software dealer— 
a wise one indeed. All 
awaits you — all is 
yours for the asking. 
Soon. . very soon!" 



Get a glimpse of the future today— at your nearest 

Instant Software dealer. 



THE CObPUTtP SHOP GBAde^ 


ATjN'ACaMPVItfHMAnT A||ai[a 


nuflAi AMERICA ENTERPRISES *i«sh*n 


TWENTY URSI CfiNTUPY SHOP C-*»t'"rnri 


WI5COHUN 


OLEr<<SXY BH05 MotiJff 


BAafSCOWPUTEHSHOP Ai^gut1« 


JIM COMPUTERS Brm-iyr, Cflnier 


irtANNfl PLAl Cirw.r^nali 


BITE SHOP Gfipft^'wd 


4LUKA 


DELTA DATA OVNAUlCS TuC-or 


MISSISSIPPI 


OKLAHOMA 


BYTE SHOP Milatw-** 


COMPUTCH T*L"I A^l-o.m^ 


ENERliY LOQIC Golumbua 


CCOM JactMn 


COMPUTtPSTORF JNiT 'ul^i 


COMPUTE P ipVORLD A[«i»lon 


AHlZOlU 


FLEWiNG [»*UGCO Wfeni 


r>Yf R'S >Ni: kVHi PairiE 




COMPUTER WORLD G>H" Ba. 


C(>*f PikUAnti 


HAWAII 


SOFTV^AHErtOUSt JK-h^ 


WW DflViS DiftA PROFILE MNtW" WOt^ 


COMPtTER^AND Mad4on 


COMPUTEH STOHf »««<i.j 


'-K>lOLU,L tlECrnONiCS iii»no4mu 


■HBSOUH 


PfcD-C SHACK ASSOC STORE Ou^^fV 


COMPJTERLAND Milw«iAva 


ME^ EL.EC'Ai:M'<:.^ tnw 


MPlkS litCTHOHlCS HjN-mi 


CCNT^Rw HEJIT COUPUtf HS C^ifHuA 


StViNDS ETC Mfiopo* 


COMPUTERLAND HautMi 


urn FTS ELECTBONKS, Bieu 


RADKJ SHAC" ASSOC STOHE Montfuhf 


COMPUTER CENT Efl J<Wrfi 


OAEGOK 


COMPUTE RLANO OF fqji nvfR VALLEY 


PCHSOHAL CDW^TEH PIXIE Mflu 


IDAffO 


COMPUTUS '"irt.art 




Ott^o*" 


SHurTEK. IiiCHVt 


con A NELSON Vo«c» 


CHC COMPUTERS JOV^ 


COMPUretLAMD Of POftTLAhO Ti«vd 


lAAGlC lANTf BN COMPUTER MpJupn 


TOV eOl. Svft Vqia 


DENNfS STONE f NTEWl*5tS F-^4»« 


D5 Cwon 


tan ELECTRONICS Gi*nT Pah 


LWEGA MICROS Mji>»jbaa 


IUcWcSlPTJTefl STST(«S «« Sp-i 


ELECI>*0«<C SPECIALTIES BoW 
iDAMO MCHOCO**n/TER Bum 


HOUSE OF COMPUlfRS JM*r, 
MOORE SOFTAARI Pvhnllv 


PIONSER ELECTRONICS SanUy 


PETTED MtPOSTSTEUS Mii»Au*aa 


CAUFCHHU 

AOVAlVOe l4Al]IO(Ri^ DEALER GrUBVBPlfly 


".I^""""™"""' 


SOFTWARE SMAC" BwrQ.1 
■OHTUU 

COMPUTER ^TOHE Bkiiingi 


ALLIED ><DBBlES P^rlMlalph,A 


COMPUTER CONCEPTS Cnwft"'^ 


J^frVAHCED COMPUIER PPOCXrCTa, Unn An* 


COIhlPREHFN$rvE MICRO SY^fEMS Ciira^i^ 




BELL ELECTRONICS EQtrK-yLh 


AUSTRALIA 


ALBANY TYPEWRIT FH, #lbV^ 


NEBRAaRA 

GPFA ■ RACE H0S6. PiACE Lmco"' 
HATCKCOMPUTEK AniA-Vf 
lEJCTE S'LChO Og#llAU 
MFCROAGF COMPUTER STORE. 0«wj 
NEVADA 


Setl. ELECTRONICS GiPi-fl 
COMPUTERLAND GrQaDria 


ClSA MiCROCOHPUTINtj S-drkTr 

36 F-DHEST SOFTWARE Nunawading, VIC 


AUCO ElECTflOhlC SUPPLY, Azuu 


COMPUTfR JUNCTION Eimn,g<3i 


COMPUTERLAND OF HARRISBLiRG 


CANADA 


A&ilP COHPUrEHS Bigrul Hill 


lX>MPUTeR STOflE HcKHrDfC 

CREAlivt nfOORAMUir^i crtuwiicn 
<^RCiA t ASSOCIATES Cri.caL>D 
ILLINOIS CLiSTOU COMKjr£p»S ^ft-Wvi 
iNLCOMPUllRS'STEMS Qowwi C^d4 
MfDWtST li*Cto COMPUTERS Lo"«»nj 


Wtcnan-ctbuFfi 

EHif COMPUTffi E'lP 
JAE COMMUNICATIONS Allpivu 
MAE EX ASSOCUTf S. ««»*»tnrt 
PCFi^UNAL COMPUTER CORP . PfPH 




gVTE kNIXlSTnLES lUWO 

CAPITOl. COU^JTEH SYSrEIC S«:i*"»nlff 
OA£CO COMPUTERS El HonI* 
COASl ELECTHOHlCE VWro B4) 


Di»liil]>J10' 

MICRON DISTRIBUTING 

Ttxonla CM 


-URLEY ELECTTOFflCS Lai «>«» 


PFf^ONAL SO*TWAR( Nl-Bi Lid Msk-v^ 
PiTTSeUHG COMPUTER STORE PiTlifhj'a 
STEVENS KAJ>D SHACK DEAJER PrhdAf^mBV 
RUVF^LSTllShlN TOY 5-OP Kt- Hct« 




COHPUSUP UfUM* 

COtriVlEP hlAHl or CHlFOtWA INC 


ThE PIIO' -<Xfit. OiAUlm 
■IHIUU 


MEW HAIIPSniAE 

SitSNeYTfS COMPUTER CtNlEft CorKf-fl 

COMPUCRAFl IU«^ 


ALLIED COMt^JTEH CQlTRE ^rvOa Om 
C-<l«nc 


COMt^TEP Pi. US S-jnrr«** 

COMPUTER WOflLD HHlJnii9|«< 
OCROSEAA APCI.I'INCE k KEPArR. Aaa^rvHle 
CHUENSlOHAL SOFTWAJIE. San DiegQ 


ASC HOBHY Eoxi-xie 
DAD ELfCTnONiCS a^^^a 

DKJITAL TECMNOlOGY iM'mfVK* 

Game mut siuKitingTon 
GAME PRFSERVt. 'rufid'^AEtiii A 


COVEP CRAFT AnihwBi 
PQflT^OUTH COMF^JKR CEHTfA 

Po-iimoi^n 


PUERTO mco 

WICPC COMPUTER S'ORE CtDW'M Tt"«» 

COLONIAL tNTERPRlSt^lR/S DEALERS 


ARKON ELECTHOHCS TorvniD Doiai^j 
BITS i BYTES CtormicmirT H S 

Ou«n<: 

COMPVCORNEH smiTrwi ac 


H VI electhk;, rtonnnoa* 
f XATROU Sanit Clnt 
OAUE-O-RAMA SanlA Hihrb*r« 
QOOOFAiftfi NATURAL FOODS. LD<n[« 
HOeav WORLD ElECTI«MICS, rnmnDgi 
MUNUHGIOtl COMPUTING^ CvHtP'" 
WftAHD ELECTWJMlCS. «»•»-« 
hUUJBI> laaVXOliAjTVIl^ ll*h(v 
HAnFAHCO 5*1 .>g** 
HlCFlOCOI'^JlIHa, Conwvi 


PROFtSblONA4 MICROCOMPirlED 
SOPTWAHt UuikTiE 

TMf BOARDROOV in(1b«iiaf<^iH« 

IOWA 

Ltmwooc svSTE«>is Chub Pnn* 

MEMORY &ANK IM; 6«B|»iaD»* 
SIRhlll LEISUflE CENTER C»n* 


RiDfH RAI>iOiR;S DEAL£R^ 

Pilartm-ouflri 

SlLIRDIVANT AfJ&OUN-g CDt^-.ay 

NEW JERSEY 

AWlMANSSTATiONfRYCO Ur-o.' C*y 
BARUkrN 8«Ot-*fc**S *ml TT*rt<-i 
Ci^ANNEL 1 RADiOS'tACK MtHjiofi: 
COMPUTER FORUM R»lbanh 
COMIVTER UADMflESS Engl^Mo*-^ 


SOUTH CAROLINA 

OMNI ELECTBONIC5, Clarlesro" 

ACt MINP SYSTEMS Ci*>i<'i» 

CMATTANOOQA COMPUTER CENTER 

OvnokDog* 

COMPUTER WORLD Nasn-^V 

Man ELECT fli3P»tCS TjfiUXi*- 


COMPUTER BARN Sarma, Onla'.O 
COMPUTER CI RQJi' LooOon Oniar« 
COMPUTER INNOVATIONS Oii'i^a. Otla'i-i 
COMi^'EPSHDPLTO CAifl*-* AFtMHj 

COMPUTERLAND OF BURUNGTON 

CRtAt4VF COM*VTERS VicitfiA.SC 
OATATEC COMPUTER SYSTEUS LTD, 
SHAaJq^n S«*A 
EI.ECTfb>*CS 2V W^ttr^atm.Onia^ 

A««n4 


NtT PftJ*IT COUFVIERS, TcnTvu 


UI«A« 


COHPUTERWANJA Pflifiv. 


TEMAS 


□PAUPnrOThiCAL BOOKS. Ua AngvV* 
Qt'PORnjNlTltS FOA L.EA4IIHC CUIIavT^ 
PC COMPUTEHS, El Cvriio 


AMATEUR RADIO EOUPVENT WicIMa 
CENTRAL HJLNSAS COMPlJI^fQ J-Knnghm 
COMUUhlCAnONB CEMTEP, LnviHn 


COMPUTE PWUfll 0* WESTFi*LC At^rhM 
DAVE'S ELECTRONICS NC Pp<-nq.|ii« 


CODEDaTA INC A-uiginf 
COMPUTER CONCEPTS Bmufwi 


RAC PBOCUCTS. S»" Jh>« 


MfiTCH COMPUTER CEMSR Ail.a-ite 


ELECTRONIC IVOtllD IMpIlia 


COMPUTER PRCCRAMMMG ASSOC L,jE>»cIi 

COMPUTER PORT Arllnglon 


RISCO DU DUEBEC Su Fo), OiWlMC 

LYONSLDQIC LTD Larson, On|ar<a 


R*OlO 5HACB £l tjjt-i 


HIGH 'ECHNOLOGY VftcHpla 


J&J ELECTPONlC rtORLD, MflnlUfl 


WICROMATiON Toronio Cmt-iO 


FtACMO SHACK San [Magci 

RKV SOUND 4»VSC1EALE>«, Fi^wnB 


KEHTUCHY 


LASHFN ElECTRUNlCS ihC fkii^vliw 


COMPU'EHSAlEB A SERVICE Furl WQTh 


MICROSHACK SftSkaiODf SaaA 


cbm inc. niinatnf 

IX4IKITEH MAGIC, Lou.B'Hle 


MlDAS OA'a SYST6M&INC M#riH3-- 


COMPUTER SOLUTIONS S*n Ancomo 


MICRO SHACK, RoQiria. Saaf 
MfiwCOMPU'ERS M't^iiuugt Onl«rta 


RADtO SHACK ASSOt STORE VmrsBlcwn 


COMPUTERLAND OP SW HOUSTON Houirci" 


SA.LI^AS MOBB' CENTER SVinu 


PERflYS COMPUTE n Bfemen 


lUDIOS UhLiMrTED, SOrncHl 


COHPU'ERS BY O'NEiL'- L««* JiiKkw 


NfPl 'UCH VARIET-, LDnOOi. OnlaiiQ 


SHAVED RADIO &MP Ju* 




SOFTWARE C|TV Pm* b'-x* 


COMPUTtRS TDOO A„B[,n 


SAULT OFFICE MAdUiES SauiE Si *Avf 


SIJ-VER SPUN tlECtHQh»CS C^-np 


ACME BOOK CO B*in" RcvQ* 


SOF rwARt CTt 4lrv*r EOB* 


COU)>UTEli AVfHlw 


SOfTVlfARt P1.1I5. ei lO-O 


COWPUlEP SE»<V1CfS OF Si^HEVEPOflT 


HCWMEUCO 


CORSAiB f 1 WivP- 


Onlaiifi 




Sni«*qt>tfT 


AUTEL tLFCTRO»*PC5 CO . AtvQWObV 


GATEWAY ELECTRON.es HouMO^ 


STATUS COMPUTER STSTt MS ST Cam»w*4 


STACETS BOOKStDHE, 5«n FivcAce 


COW^TER SriOPPE. ueTA^« 


JtW EUTEPPRiSES Oti-* 


THE -BlBBY CENtf R A^ivw 


Om^q 


STRAHrLOWEPELECTROBCSfniSDtALEn. 


■AM 


yCBOAGE COHPLITEP STORE 


HA ELECT43NICS P#u#4 


Tot At COMRJTER SYSTEMS A». OnlViQ 


hur yocKiiUi 


FEnEBUHqiCOHFVITR CENTER FrHb^C 


Aibuiu*'a<w 


MACS tV FaTt^tfl 


WfST WOH-D COMI^TEBS EOivWin. 


TNF COMK/lER STO*«, Svl> Hv-nia 


MAINE COMRJIRONiCS Bai^gcp' 


MJTCHE 11 MUSIC C^rifUd 


MAPI MAC iNftjSTR ES ^ftS DtAlERi 


A««r]a 


THE FEDEHAIED G VUP Cmviwc* 


WAIHE HUCnO SVSTFWS INC A^^burr. 


ThtOMASE CARP ^EWELEH AUrrxJOOfOa 


Ho«5-'Hjn 




THF SO^'TWAHt %TOftt H^i.-^ion BvKri 


MID-MAINE CCMPUlER COMPANY AuOui" 


■VABGAUES west AiEbquvquV 


MICRO COM^TfPCONCEPTS P*no 


rrALY 




mAKfUkHO 


NEW VOKH 


PAN AME*nCAN ELECTBONkCS rWS D*ALf ffl 


BITS* BYTES M»Lar, 


AASASH APPLE, Ei Tvd 


COMU CEMTEfl LauFfl' 
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M.uion 


FRAHCt 


^tNNRH BUSIMEBSSYS1E(T*£, Urt flIlDi 


PROGRAM S'ORE, ail\\m>-^ 


Nff*Y™l. 


R^ COLE'S ELECTRONICS Sai Anronio 

afiSOFTAARE SB-iAnloniQ 

TOTAL COMPUTEP STORE Baauinonl 

WAGHAtTER BOOKS INC Houiion 


jGS Compcujpl? Pani 


COtOftAOO 

APPAKAI Danvfr 

FISTEL'S MICRO ELECTRONICS Df^TtP 


LANOOf ELECTRONICS Lr"" 


A5D HOME COMPUTER CENTER 

BFRtlNER COMPUITER CENTEB 
Nt* Hy^ PjPl. 


«OH»L*NDB.«LG,.» 


POOflRICnARDSCAI,CULAT0R5 f un CoHin, 




cowiEcncvT 


MARK OOHOON COMPUTERS C*"ibnfJa* 


COMPUTER CORNER Wli4« Plw^ 


kTTAH 


SOFTWARE IMPORT a^WSAN' 


BVTE ME COMPUTtP ^HOP Nv* Lo^dDr, 


MiOntBORO MUSIC IR^ DEAL E Pi 


COMPUTER PeSOU«C(S Will4"«5iniW 


COMPuTEftLAND Sbie Lane Cilv 


COMPUTEP l>a hn Londni^ 


Mmmatxro 
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COMPUTER TPEf L'^mt- 
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QUALirr TECHNOLOGY S^q LflAaC^t 


E.rfl^O-W NfffP. 
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OMNIT^K SYSTEMS r«.«4bi> 


COMPUTERLAND CAfi" P^fc* 


VEHHMT 




TECMMXOGT STSTEMS, evNH 


SOUND COMPANY ^mglW 


COMPUTERIAND O* NYC Hrm Y[if. 


TEuF^^CO r4S H aL£i*t BrBni«faiP4 


COM*^IER CCrLLECllEf Art^lBrOAm 


ThfCDUIVTEHSTOHt SlvntoKl 


ST Aff COM^J TiNG Fr^niAgrufn 


DrGiBYTE SVSTEtfS Nm Yon 


vmo—w 


MICRO COMPUTING. Kromman^ 


DtUkmum 


rHE GAlIt SHOP Ea^r At;u>^ 


tt MICROCOMPUTER SERviCtS Ctf«rt 


COMPUTER SOLUTIONS LM5*T,»fl 


MICRO DtNAMICS Einnncn^n 


HiCnO PRODUCTS WitoTui^on 


WCHIOMI 


PUnjPE VIRIONS COMPUTER STORE Ht^ii* 


COmFtjTEH WOBKS (NC Ha'irEC^&uHg 


MUSICJ'RINT CHIP Aflm 


DBT1VCT or CDI.UIHH 


ALL FOR LEARNING, Vh flUxiTi'iviO 


MiCnXUT B'H»-I>n 


FHAME GALLERY H^m^Jon 


dVEL GONNE DikMwi 


Thf PADl*AAM STqjHE Aasntngroi^, [> C 


ALTERNATE SOlRCF LdP-Vn^ 


MOOtRN 'En SHOPS Jpylf" 


"CaiE COMPUTER CENTER 'NC 


RAi MICROCOMPUTERS Tha Maguf 


fLOHDA 


AM ELECTRONICS Ann A^Dc 


MR COMPUTER Waflinnfle'i FaiIi 


VjgifiH* BflAcn 


HEW AALAND 


ALl SYSTEMS <J0, Wi-I*" G*rMn 


COMIC KINGDOM Delioir 
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VISCOUN' ELECTRONICS Palmar alar. .Nortn 


Ayf HJ0F4OCOhPUTEi| CENTER, TimtJ 
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SWEDEN 
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COMPUTER MART Fiml 
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C*J ELECTRONICS Ricnka-^a 
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COMPUTf RLANO SouiriT4Xl 


WORLD OF COMPUTERS Port Civ&lfi- 


COMPU'EHlANC F*^,'rtay 


CALiSTO COMPUTERS B^imtt^f^oi 


COMPUTE RUMD j^ckKHHii* 


CCM»*J'KHBCS MmrAixi 


HOATH CAftOUN'L 


COUPUIERLANO Sikp>«[v 


The SOFTWARE i^XVSE londVi 


COURJIEHLA^ID. SwnolA 


EKlHT BIT CO^JER IA4fepv 


RAreuRhM-CRU-iiLfcCTnONlCS.STV-B 
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OHIO 


EMPIRE ELECT F*)N CS Siir.f.,s.<»e 




CREATih/E coui^nMa Ormu 


»toeBT HOUSf. B«ntq Cj«Wi 


AftACUSii Tc^Hki 


J e ^ALtS SftoSom&iP 






LEAW-iNQCENTERLrC Ai^r, a.Dqh 
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OATA UNLJMITED HMbUuiJH 
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CINCINNATI COMP^JTEP SIDFlE Cinc-ni^i 


Pf FQONA4^ COMPUTERS **£ Soo>B.-4 
UNFUERSlTV VILLAIN MuSlC Saar<l* 


YOUR NAME COULD 




r«EAM4N COMMUNKIAnONS Gi«™i RapiQ? 


COMPUTER STORE To«o 


UBS ENTERPRISE Kifklvfi 




xoer^ noHNEP, PpiBKo^i 


'flI-COLiNTY ELECTRONICS & BQlJNCi 


COMPU'ERL'ND Cfliumd*-! 
COMPUTE Rl>ND Mflr^fl4d Hvi^ril) 


WESTERN »(IICB0C0MPUTER CENTER 
FHHnnyriann 


BE HEBE. CALL: 


MICROCOVPUTERSYSTFHSINC Itmpji 

WiNh CONCtPIS, HoIlT HbH 


CENTER, F«nlOP 
WEATHtPWAX nPU^ SrUolilvn 


i:0*<lPUTERUHD Hoi" Dtn»fM 


WEST VIRGINIA 

COM PUT EP CORNER Mo-^"1h>.¥1 


1-800-258-5473 


UlCFIQ DATA BASE, L^kaivd 
RAT^B AMATEUR RADIO OaarBalar 




JEBPYSCOMPUT£R C4.4lArm 
JDfiAP ENTERPRISES Mflo^slniiiT 


COwPUTtP STORE HunlinotDn 




YE OLDE 'EACMERSSHOPPE Yp*,i.ni. 




RtOfSTV DuU 


MlhHUOTA 


ViCROAGL Coiurntqji 


WieeldrtD 




&CIUNCI 10CA5 Ow««lk* 
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MH^HOCOMF-jTEftCSNTE* C^i,:.v,i,t 


SOUND t ELECT RONK: SPECIAL 'f 5 




SOUThi EAST WCnO DATA. O^udo 


LANTOS COMPU'FR wO"' V.^^^mix- 'i 


ViCft7!LF'J'HONiC5 INC Cc-^-Tftrt 
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Find out what you're missing. 

You heard the lady. Your microcomputing life is going to be very exciting. But don't 
leave It to chance— leave it to us! We have a brand new catalog full of packages and 
valuable coupons to help make it happen. It's free . if you fill out the coupon and mail 
it today. (Or make a photocopy and spare your magazine). 



NAMIE: 



ADDRESS: 

CITY: 



.STATE:. 



ZIP.. 



Instant Software Inc 



Peterborough. N.H 03458 603-924-7296 -A80 



APPLICATION 



A microprocessor highballs the mainline. 



The 80 Limited 




Ben iatamore 
Desktop Computer Staff 



A70-car freight train clears the Pitts- 
burg yard on the long trek to Hoboken. 
Four heavy diesels pound the track and 
shake the hills with their tull-throated roar. 
As the freight, with its heavy load o( steel, 
picks up speed on the multi-track mainline. 
a sleek bright colored stainless steel pas- 
senger train passes westbound at 80 mph. 
Ahead, an unscheduled local freight is 
shunted onto a siding. The block signals 
turn green, and the huge diesels continue 
down the track into the night. 

It's typical mainline train action, but 
these trains run in a building in Union, NJ. 
The track of the Hudson, Delaware and 
Ohio IS the HO scale layout of a train group 
called simply "The Model Railroad." The 
Hudson, Delaware and Ohio, one of the larg- 
er model railroads, is known among model- 
ers tor its experiments with computers. 

Today, a homemade microcomputer de- 
scribed by fwlichaei Nesladek, the line's 
electrical superintendent, as being "like a 
TRS-80.' keeps track of the lines inventory, 
schedules, waybills (determining the desti- 
nation and car assignments) and other 
paperwork, 
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This computer attracted the attention of 
the model railroad world. The custom-built 
machine was designated to automate con- 
trol of 30 engines on the busy layout. The 
computer, built and successfully tested but 
never fully installed, was created a full 
decade ago when computers were huge 
mysterious machines and the computer 
chip was still a laboratory anomaly. 

The Model Railroad Club's computer was 
the brainchild of Paul Mallery, a Bell 
Telephone technician and lifelong model 
railroader. Few others would attempt to 
construct and install a small dedicated 
computer using pre-chip technology but 
Mallery considered it the most practical 
answer to the cab control problem. 

With only one train running on a single 
loop track, the operator has no problem 
withcabcontrol. When two trains run on the 
track the operator needs to control each 
separately Despite recent advances in mi- 
crominiaturized radio control systems and 
other cab control systems, the most popu- 
lar answer is blocking. 

The track is divided into sections, each 
insulated electricalty and powered sepa- 



rately from the others. Each train operator 
uses a transformer connected through a 
switch system to power any single block. 

When only two trains and a few blocks 
are involved, the switch system is fairly sim- 
ple, although it still requires good reflexes. 
When two trains end up in the same block 
the operator must shut the system down 
and separate the trains by hand. With up to 
30 trains and 1 ,000 blocks, cab control is a 
first class problem. 

The Hudson, Delaware and Ohio had this 
problem in the early 1970's. At that time no 
practical alternatives to blocking existed. 
Radio receiving equipment, too large lor the 
small HO engines, offered very few control 
channels. Pulse power, in which each en- 
gine's power is sent in distinctive pulses, re- 
quires computer chips, and was unknown 
at the time, 

Mallery was left with only one choice: He 
decided to computerize the system with a 
custom-built machine. 

Mallery's computer might be called a 
dedicated train processor. According to 
Nesladek it is hard wired for its function. It 
needs no programming, more like an elec- 
tronic game than a microcomputer. 

Two kinds of sensors were to keep track 
of the trains. Photodetectors at the ends of 
each block would signal when a train en- 
tered or left that block. Electrical current 
detectors inside each block would inform 
the computer about electrical activity. 

The computer would "initialize" each 
train when it started operation and keep 
track of which trains each operator con- 
trolled. It would signal to the engineers lo- 
cated on a balcony above the layout what 
track conditions were ahead. A green light 

ReaOei Service for tacmg page ^399 — 



JUST LAUNCHED! 
VOYAGE OF THE VALKYRIE 

BY LEO CHRISTOPHERSON 






ADVANCED 
OPERATING 

SYSTEMS 

450 St. John Road 

Michigan City, 
Indiana 46360 

Available now at 

leading software 

retailers or call 

1 800-348-8558 to 

order. {Indiana 

residents call 

1-219-879-4693) Disk 

version: $39.95, 

Tape: $34.95. 

VISA and MasterCard 

accepted. 



The ancient Norse lords bravely sailed their ships across new waters in search of 

adventure. No obstacle was too great to overcome nor any force powerful 

enough to prevent their mighty acTvance.BNow you're in command. You are 

the pilot of the attack ship Valkyrie. Your mission: to wrestle the island Fugloy 

from the grasp of an army of laser-wielding war birds and secure the gofden 

treasures hidden within the walls of the island castles. Success of the mission 

depends solely upon you. The castle Drage appears on the horizon when 

suddenly the air is alive with the flutter of giant wings. Your prize is in sight . . . 

do you dare accept the challenge and go on?BYou can put yourself at the 

controls of the Valkyrie thanks to the genius of Leo Christopherson. As 

absolutely flickerless birds sail smoothly across the screen, strains of Wagner's 

"Ride of the Valkyries" are heard. The game offers 10 levels of difficulty which 

provide a challenge for players of all ages and skills. The game also provides 

one of the finest examples of computer cartoon-graphics presently available. 

Voyage of the Valkyrie is available for 'TRS-80 and -Apple Microcomputers. 

Brave old worlds and battle new adversaries when you accept the 

challenge of the Va kyrie. 

' Trademark ot Tandy Corp. 
tTrademark of AppIt Computer, mc- 



"Mallery was left with 
only one choice. 
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would signal clear track; a yellow light 
meant the train was overtaking another and 
would have to slow down; and a red light 
would signal a blocked track. The system 
allowed manual override for blocks with 
switches at signal towers. Tower control- 
lers could determine which train approach- 
ing the switch point would have right-of-way. 

Mallery built the computer and tested 
controlling one engine on a short stretch of 
track. When AT&T transferred him south 
the club had noonecapableof finishing the 
project. The sensors were never installed, 
and the computer never became fully opera- 
tional. The club depends on manual block 
switching for cab control. 

The Model Railroad Club faces that Issue 
again as it plans to expand the 40 by 40 foot 
layout to 110 by 40. The larger layout will in- 
crease cab control problems. 

Nesladek said the club probably will not 



computerize the layout, however. He favors 
radio control. Today's small radio systems 
offer 99 control channels. "With 99 chan- 
nels you can do anything," he commented. 

While the Hudson. Delaware and Ohio 
may never tw computerized, the experiment 
may prove prophetic. HO, viewed in the 
1950's as a very small scale for electric 
trains, is now considered fairly large. N 
scale, popular now due to its compactness, 
bears the same general size relationship to 
HO that a narrow gauge engine bears to a 
full-sized one. Z scale, offering trains about 
half the size of N scale, is gaining in 
popularity. 

Despite advances in chip technology, it is 
hard to imagine a radio control system com- 
pact enough to fit into an N or Z scale 
switch engine. For these small-scale lines, 
therefore, blocking remains the primary cab 
control system. 



A computer can perform other functions 
in model railroading. One railroad journal 
recently carried an article about a sophisti- 
cated topography analysis program to de- 
sign the layout of a model train system. This 
program was designed originally to aid 
engineers in planning superhighways and 
mainline train trackage. 

Once you have a computer running your 
blocking system, you may be tempted to 
automate other aspects. A computer can 
run some trains outright when not enough 
people are at the club. You can identify cars 
with a iatieiing system and automate your 
train yard. Specify what cars you want on 
each train; the computer will find and con- 
nect them to make the train. 

Nesladek said, however, that approach 
has no place on the HD&O. "We don't want 
the computer to run our trains," he ex- 
plained. "We want to run them ourselves."B 



SAY MERRY CHRISTMAS 



i^^ 




with 




microcomputing 



Give all your friends who own a TRS-80* the best possible Christmas present— 
80 Microcomputing. 80 Microcomputing is the only Journal devoted to the TRS-80* 
and (ts users the only |ournal packed with reviews, programs, applications and hun- 
dreds of dollars worth of software. 80 Microcomputing— the best Idea for Christmas 
yet. for only S25 00 a year. 

Bill: llUt MC ;.VI8A JAE 

Card • - Expire Date 

Sionalure _________^ inteft)an*\ a ..^_^^__-_„ 




My Name ,., 

Address ^.^_^_____ 

City 

Please enter a on« year gift subscription to: 

Name . . 



sut« 



_2»p. 



state 



Ztp 



Tradwnarh TtMlr Corp. 



Canadian S27/1 year only. US funds Foreign $3S/1 yeer onl>, US fundi. 

All Christmas Gill Subaerlptlona will begin wllh the January 1961 issue. 

ao Microcomputing e PO Box 981 a Farmingdale NY 11737 
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Send Your Business To Europe via 
Wayne Green International 

You can introduce your products to the European market without leaving your office. All you 
need is a phone and the best advertising haison between here and Europe— Wayne Green 
International. We represent four of the largest microcomputing magazines in Europe that will 
help you introduce and make your product known in the European market. 



MICRO DIGEST 

MICRO DIGEST Is the newest resource for American 
businessmen to rely on for the best exposure overseas. 
The first dealer-oriented computing publication in 
Europe. MICRO DIGEST caters to dealers, reps, OEMs 
and importers of micro and mini products. MD is the 
organ of the European Microcomputer Publishers Asso- 
ciation (EMPA). It is published in four editions (English. 
French. German and Ualian). reaching a market of 312 
million people. As the publishers of West Germany's 
CHIP and several other popular computing periodicals. 
EMPA is in the best position to determine the make-up 
of the computerist market. The list of people receiving 
MICRO DIGEST has been put together by EMPA. As a 
result. MDs present circulation of 8000 reaches the 
most prominent computerist community in Europe — a 
community that's waiting to hear from American 
businessmen. Make MICRO DIGE:ST your best ally in 
the European micro market. 



Special 10% discount 
to charter advertisers 



CHIP 

The German-speaking market has an exceptional sales 
potential. CHIP, the leading German magazine for 
desktop computers, will help you to make this market 
your own. Over 65% of the CHIP readership deals with 
computers in their business or profession. With its 
reputation for excellence and a paid circulation of 
62.913*. CHIP is your direct line to the German 
microcomputer market. 
•IVW Auditing (ABC Equivalent). 2nd quarter. 1981 



COMPUTING TODAY 

Britain's COMPUTING TODAY offers the advertiser a 
well-balanced publication with very competitive rates 
and a rapidly rising paid circulation of 34,000. 
COMPUTING TODAY is the only microcomputing 
magazine in England audited by ABC. It provides solid 
penetration across the entire microcomputing market 
and is an elTectivc sales medium for hardware, soil- 
ware, peripherals and publications. Whatever your 
product range, there is simply no better way to build 
microcomputing business than through the pages of 
COMPUTING TODAY- 



MICRO & PERSONAL COMPUTER 

MICRO & PERSONAL COMPUTER is the ideal media 
for introducing and marketing computer products in 
the Italian market today. With a monthly circulation of 
30.000 M&PC is in the hands of virtually everyone in- 
volved with computing in Italy. In the last two years, 
the Italian economy has grown, in real terms, by a 10% 
rate— a growth rale second only to Japan's. The total 
EDP market in Italy in 1981 has totalled 5.000 million 
dollars. It Is this level of trade that is waiting to be taken 
advantage of. It can be yours, with the help ofMICRO & 
PERSONAL COMPUTER. 



TO RECEIVE FURTHER INFORMATION 
ON THESE MAGAZINES. WRITE OR 
CALL: „. ^, ^. „ , .. 

Picrgiorgio Saluti 
Wayne Green International ^ 531 
Peterborough. New Hampshire 03458 
(603)924-7138 D<-p(,-A75 




WINCHESTER 
HARD DISK 

for 

TRS-80™ 

Add 6.3 meg to 1 9 meg to your TRS- 80 



Integral Winchester 
Business System includes 
48K MODEL III, DOS, 
DISK ll^^ 6.3 MEG 
HARD DISK (internal). 

$4995 




$2895 

6.3 MEGABYTE 

WINCHESTER 

HARD DISK SUBSYSTEM 

With Chassis, PS, DOS. 

9.5 MEG $3395.00 



VR Data Winchester HD 
Subsystem Features: 

• TRSDOS Compatible Operating System 

• State-of-the-Art Circuitry 

• Full Calibration, Test and Burn-in 

• Up to 4 drive configuration 

• Heavy duty Power supplies 

• Warranty-120 days-parts & labor 

• 115/230 VAC, 50/60 Hz. 



Optional Mod III Configurations: 

9.5 Meg HD (internal) add $500.00 

80tk 1 sidefloppy add$120.00 

80 tk 2 side floppy add $240.00 



Optional Winchester Subsystem 
configurations: 

2x6.3 meg drives 
2x9.5 meg drives 



$4495.00 
$5495.00 



Model III Communications 



COMING SOON 

D-coN $299. 

integral Modem 
NEEDS NO RS232 
— Direct Connect 
Programmable Dialing 
AUTO ANSWER/ORIGINATE 
Easy Installation 



HERE NOW 

VR-RS232C $75. 

Direct Replacement For R.S. RS232 
Fully Tested & Burned-ln 
Easy Installation 
120 Day Warranty 
Programmable Pincut 
Prototype Area 



Phone 800-345-8102 • in PA 215-461-5300 
XZffZ^dJB. VR Data Corporation 
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100% Compatible 



Model III Disks 



Complete Business 
System includes: 
48K TRS-SO'" IModel 
III, Disic lir- 2 Drive 
System, TRSDOS 
and Manual. 



$1882 




DISK III Single 
drive assy 



$599 



^ DISK III singlttdrive assembly includ«s:ono 40 tracK 
5''«" double density drive, power supply, conlroller, 
mounling hardware, and applicable cables 



DISK III Two 

drive assy 864.00 
DISK III Assy 

w/out drives 435.00 
TRSDOS^" & 

Manual 21.90 

External drives 

(3&4) 275.00ea. 



IMMEDIATE DELIVERY - COMPARE AND SAVE 

VR Data's DISK III features: 

• Completely compatible with TRSDOS 

• State-of-the-art circuitry 

• Fully tested, calibrated & burned-in 

• Up to 4 drive configuration 

• Heavy duty linear power supply 

• Warranty 120 days - 100% parts and labor 

• Installation with simple hand tools 

• Optional 80 tk and 2 sided drives 

• READ 40 - Pgm. to read 40 tk. Diskettes 

on 80tk. Drives $25.00 



Peripherals 

Epson MX-80 500.00 

Epson MX-80 FT 615.00 

Epson MX-100 800.00 

Centronics 739 700.00 

Starwriter25{P) 1395.00 

RS-232 95.00 

Lexicon modem 105.00 



MODEL I/E;I 
EXTERNAL DRIVE 
W/ PS & ENC 

Fully Compatible 
120 day warranty 
Easy installation 
80tkor2sided 
80tk&2sided 



$275 




$419.00 
549.00 



IF YOU DONT SEE IT ADVERTISED CALL US AND ASK FOR IT 

PUBLISHED PRICES REFLECT CASH DISCOUNT. 

ALL PRICES ARE SUBJECT TO CHANGE WITHOUT NOTICE 

TRS-80 and TRSDOS are trademarks of Tandy Corp 

DISK III IS a trademark ot VR Data Corp.' Dealership available 



OTHER PRODUCTS 

SUPERBRAIN 64K 
PARALLEL PORT — 

SUPERBRAIN 
DISK & MYSTERIES 
BASIC & MYSTERIES 
NECRibbons{min.6) 
Epson Ribbons 
NEW— 
LDOS Operating 

System 
COMING SOON!! 
Internal MODEM for MOD III 



2990.00 

99.95 
22.50 
29.95 
5.95 
12.50 



149.00 



CABLE "VRDATA ' • TELEX 845-124 
777 Henderson Boulevard • Folcroft, PA 19032 



''See UslofAaveflisefSonpage4l6 
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APPLICATION 



LOAD 60 



It means Computer Operated Inventory for Numismatics and Such. 



COINS 



Robert James Lloyd 
341 Vj Elkton Rd. 
Newark, DE 19711 



One area microcomputers are ideally 
suited to is inventory control. 

After experiencing the fun of micros, I 
decided to merge computers witfi anotfier 
of my hobbies, coin collecting. It started 
many years ago during my days as a news- 
boy, when 1 amassed a targe bag of loose 
change and decided to start a coin collec- 
tion. 

However, the task of keeping a manual 
inventory up-to-date was soon forgotten 
and not having an orderly system to control 
my collection resulted in duplicate coin 
purchases. 

Since ) was unable to locate any soft- 
ware programs on numismatics, I de- 
veloped one armed with a TRS-80 Level II 
16K and the Level II Basic Manual. After 
much trial, error and frustration, CX3INS 
emerged. 

Counting Colna 

COINS allows 175 Items to be stored in a 
file, with each item consisting of five 
fields: Coin Description, Date, Mint, Grade 
and Value. Each file is coded with a File 
Identification Code, Date and as a user op- 
tion, a reference used to determine coin 
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grade and value. 

Once a file has been created, it may be 
stored on a cassette for future use. You 
may. If you wish, output the file to a line 
printer. The printout makes a nice reference 
as you do your corn shopping. It is also use- 
ful when trying to obtain insurance on your 
collection. 

Key-in the program as shown. Once 
done, display the program. If all is well, 
save It and make a backup copy. 

Before running COiNS, It is advisable to 
make a list of all abbreviations you plan to 
use In the different fields. For example, a 
Washington Quarter may be abbreviated 
as WASH QUART. 

The mint may be coded as it appears on 
the coins— S for San Francisco— D for 
Denver, etc. Coin grades become VG or 
VGOOD for Very Good, UNC for Uncir- 
culated, EXF for Extremely Fine, etc. 



CoinDttScrlptlon~11 Alpha num«rtc characters 
Data — 4 Numeric characiera 

Mint— 5 Alphanumeric characters 
Grade— 6 Alphanumeric characters 
Value- NdI greater than S9999.99 



Fig. 1. Allowable Field Lengths 



It doesn't matter how you abbreviate, if 
you are consistent and stay within the 
maximum length restrictions placed on 
field length. 

Type RUN. The screen will clear and the 
menu should be displayed. Just press the 
desired option. COINS uses the INKEYS 
function. Enter need not be pressed when- 
ever a flashing cursor appears. 

Without a file In memory, your only op- 
tions are A (create file), E (Input file), and K 
(end program). Should you accidentally try 
another option, "You do not have a file in 
memory" will flash and the menu will 
return. 

As long as a file is residing in memory, 
all menu options are available except the 
create file option. That prevents wiping out 
a file by accidentally pressing A. 

CrMte File 

After selecting menu option A, you will 
be prompted to enter a File Identification 
Code. An ID code must be entered or an In- 
put error will appear on your screen. Max- 
imum code length is six alphanumeric 
characters. Next, enter the date the file is 
being created. Do not use commas when 
Inputting the date. Try something like 
03/23/80 or Mar 23 1980. Maximum length 
of the date is 12 alphanumeric characters. 
Finally, enter the reference to determine 
the coin's grade and value. Maximum 



length for the reference is 25 alphanumeric 
characters. The screen will clear and you 
will see: "(Item #1) Enter coin, date, mint, 
grade, value?" 

Enter the fields, but be sure to separate 
each with a comma. See Fig. 1 for allow- 
able field lengths. 

The Value field will accept input in 
several ways. An amount of $125 may be 
entered as 125, 125., or 125.00. You do not 
need a trailing decimal for whole amounts. 

When you type CLOSE, 1,1, 1,1 you will 
close the file and return the menu. 

If you violate the maximum length, you 

will be given another chance to enter that 

item. 
Once you have reached the maximum 

number of entries, "This tile is full" will 

flash on your screen, and the menu will 

return. 

When prompted by the menu, press B. If 
you do not have a tile in memory, an error 
message will flash and the menu will be 
returned. Should a file be in memory, the 
screen will clear and the file will be 
displayed. 

Only 10 items will be displayed at a time. 
A flashing cursor means press C (Continue 
Listing) or M {Return Menu). 

Once the tile has completed listing, the 
total value of the coins in the file will be dis- 
played and you will be asked to press M. 

Printer List File 
Press C when prompted by the menu. 



". . . during my days as a newsboy. . . 
/ amassed a large bag of loose change 
and decided to start a coin collection." 



The printout of a file is formatted to 
aVi-inch-by-l 1-inch continuous fanfold. 
When the printer is ready, press P. If you 
should press P while the line printer is 
offline, you will be told the printer is not 
ready to receive information, and the menu 
will again be displayed. The file will be 
printed using the same format as a screen 



listing. While each item is being printed, 
its number will be displayed on the screen. 
See sample run. 

Select menu option D. The video display 
will clear and you will be asked to press R 
when the recorder is set up. Each item's 
number will be flashed on the screen as it 
is recorded. A file of 175 Items takes about 







COIN INVENTORY LISTING 






DATE: 












REFERENCE: 












ID CODE: MERGE 










FILE CONTAINS 15 ITEMS 










ITEM# 


COIN 


DATE 


MINT 


GRADE 


VALUE 


1 


BARB DIME 


1895 


O 


GOOD 


t 50,00 


2 


WASH QUART 


1976 


S-SIL 


PROOF 


S 3.00 


3 


JEFF NICKEL 


1940 


NONE 


VFINE 


S 0.20 


4 


LINC PENNY 


1909 


S-VDB 


UNC 


$275,00 


S 


ST GAU $20 


1914 





UNC 


$340.00 


6 


LRGCENT 


1621 


NONE 


VGOOD 


$ 11.00 


7 


ROOS DIME 


1959 


D 


EXFINE 


$ 0,BO 


8 


TWENTY CENT 


1875 


cc 


GOOD 


$ 40,00 


g 


BUST QUART 


182B 


NONE 


FAIR 


$ 19,00 


10 


HALF EAGLE 


1038 


D 


FINE 


$500.00 


11 


IND. EAGLE 


1913 


S 


VFINE 


$225,00 


12 


JEFF NICKEL 


1938 


D 


VGOOD 


$ 1.10 


13 


LINC PENNY 


1965 


DBLDI 


UNC 


$450.00 


14 


PROOF SET 


1«67 


NONE 


PROOF 


$ 6 25 


15 


HALF CENT 


1794 


NONE 


FAIR 


$ 50.00 


TOTAL VALUE OF THE COINS LISTED IN THIS FILE IS $1,971.15 










Fig. 2. Sample Run 







5,000,000/20,000,000 BYTES 

From Micro Mainframe 

10 MEGABYTE HARD DISK DRIVES, with REMOVABLE Cartridges, For Models I / II / III ($5,995/58990). 

SERIES III H. Model III with 5,000,000 byte hard disk drive(s) (S6,995/$9,095) or add to your Model I/Ill ($3,795). 

SERIES III F. Model III with a controller board (available separately) and operating system which allows you to start 
with, or move up to, dual-headed or eight-inch floppys. 

From AT-80 
GLSfl — $149 — Radio Shack General Ledger 1.1 with over 30 added features; including a general ledger, classified bal- 
ance sheet, check register and options to use an "automatic" account number or re-do an entry or document. 

AHBfl — $199 — Radio Shack Accounts Receivable 1.2 with automatic posting of standard monthly amounts. 

GL/Mi _ $49 — Convert your General Ledger 1.1 to GL80. Typical user comment; "Takes half as much time." 

AR/Ml — $49 — Convert your Accounts Receivable 1.2 to AR80. Typical user comment; "Saves hours." 

GL/Ml and AR/Ml require proof of purchase of the original programs, or, send a disk copy of the original programs for 
conversion at no additional charge. Documentation (apply to purchase) — $5.00 each. 

FTDEMOBO — $12 — Displays and Executes the NEWDOS/80 Appendix A programs/ keyboard entries. Requires 32K. 

NEW00S/80-$135 LDOS - $135 EPSDN MX-70/80/FT - $Call FRICTION KIT - $49 

AT-80 3827 Dismount Dallas, Texas 75211 (214)339-0498 



- See List of Ailverlisers on pag€ 4 18 
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''A file of 175 items 

takes about 15 minutes to save." 



15 minutes to save. 

During the menu display, press E. Enter 
the ID code of the desired file. Next, 
prepare the recorder and press R. If the file 
wanted and the file found on the tape do 
not match, the file ID found will be 
displayed. 

The time to input a 175 item file Is also 
15 minutes. 

Option F is used when items are to be 
added to an existing file. 

To add an Item within a file, press W. 
Next, enter where the new item is to be 
added. For example, if you want the new 
item to be number 15, you would input 14. 
The new item will appear after the item 
number entered. If you enter a number 
larger than the total number of items in the 
file, an error will occur. However, zero may 
be entered since the new item would 
become item one. After an error, you will be 
given another chance to add the item. 

Only one Item maybe added within a file 
at any time. As the file is being rearranged 
to accommodate a new item, a small arrow 
will move across the screen. (This was 
done to tell if the program got hung-up.) 

Items may be added to the end by choos- 
ing option E when in the Add mode until 
either the file is full or you close the file. 
The format is the same as creating a file. 

Select menu option G. Enter the item 
number you wish to delete. If you enter 
zero, or a number larger than the total 
number of items in the file, an error will oc- 
cur. Re-enter the information. Here again, 
an arrow will travel across the screen. You 
will betold when the item has been deleted 
and returned to the menu. 



Edit File 

Sometimes it is necessary to edit a file. 
Press menu option H. To edit the file 
codes, press F. Three options will be 
shown— I to edit the ID code, D to edit the 
date and R to change the reference. Make 
your selection and follow the instructions 
displayed on the screen. 

When you press I, you will be aslted 
which item is to be changed. Again, you 
must not enter zero or a number larger 
than the file. The Item will be displayed as 
it appears In the file. When prompted, 
enter the corrected Item. It will then print 
on the screen. 

Should you decide to search the file, 
press I when the menu is displayed. You 
will be given a choice of conducting a 
search by any of the fields. The program 
allows only an exact match. 
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COINS 






Varlabfes 




Strings 


Double Precision Variables 


IS 


INKEYS Input 




B# File Value 


JS 


File ID Code 






KS 

u 


File Date 
File Reference 






Dimensioned Arrays 


NS 
Y$ 
ZS 
ASt 

est 

DSS 


Input File ID 
PRINTUSING Format 
PRINTUSING Format 
COIN Search 
MINT Search 
GRADE Search 


B Coin Date 
AE Coin Value 
AS Coin Description 
C$ Coin Mint 
D$ Coin Grade 
MS DATA Storage 


Integer Variatiles | 




A 


Number of File Entries 




C 


Cursor Character Position 




D 


Display Information Loop 




F 


Item Number 




Q 


Item Number In Search Routln« 




H 


Add/Delete Hem Number 
Number of Items to be merged 




J 


Number of items in memory 




L 


Line Count tor Screen Display 




M 


Input Error Flag 




N 


Page Number (or Hardcopy 




P 


Pointer Change Loop 




Q 


Printer List Flag 




R 


Time needed to Re-arrange Memory 




S 


Screen Location tor PRINT® 




T 


Time Delay Loop 




U 


Screen Display 




B5 


DATE Search 




ES 


VALUE Search 




A1-A2 


Computes String Length and LSB 




CI -02 


& MSB of string value starting 




D1-D2 


address tor Coin Description, 
Coin Date and Coin Grade 




B1-B2 


Computes LSB & MSB of address 

for Coin Data 




E1-E2 


Computes LSB, Next MSB, MSB, 
and Exponent address for Coin 






Value 

Table 1. 



Program Listing 



1 REM * VER. 1 DATED 7/9/8B BY ROBERT JAMES LLOYD * 

2 CLEAR4050;POKE16424,66:POKE16 425,0:DEFINTA-D,F-Z:DIMAS(17 8} ,B{17 

8),C$(17e),D$(17 81,E(17 8),MS(27);S"33B!A=17 8:ZS-"Sirtll,l»».l 
I" :YS='"S*, III .li":FORD-lT026:READMS(D) iNEXTD 

3 DATA<A> CREATE FILE,<B> SCREEN LIST FILE,<C> PRINTER LIST PIL 

E,<D> RECORD FILE,<E> INPUT FILE,<F> ADD ITEMS, ^O DELETE 
ITEM,<H> EDIT FILE,<I> SEARCH FILE,<J> MERGE 2 FILES, <R> 
END PROGRAM, 183, 14 5, 32, 18 3, 187, 32, 187,183,32,151, 16 4,14 9,15b 

,186,1 

Program continues 



Program continued 

31 

4 L=10:BI=0:N-1:H=0:Q=0:CLS:PRINTTAB(24) "'; :F0RD=12TO26 :PRINTCHRS( 

VAL(MS(D) ) ) ; : NEXTD: PRINT : PRINT: PRINTTAB [ 5) "COHPUTER OPERATED 
INVENTORY FOR NUMISMATISTS AND SUCH" : PBINTSTRINGS (62 , 140 ) :PRI 
NTSTRINGS(15,13B) ;" **** m E N U •••* "; 

5 PRINTSTRINGS(15,13 3) ; PRINTSTRINGS (62 , 131 1 : FORD=1T05 : PRINTTAB (11 ) 

M$(D) ;TAB|351HS(D + 5) : NEXTD: PRINTTAB | 22 1 MS (ID : PRINTe854 , "SELE 
CT OPTION "; :G0SUB114 

6 IFASC(IS)=650RASC(IS)=690RASC(IS)=75CLSELSEIFASC(IS) <650RASC(lS) 

>7 5G0SUB111 :GOT06ELSEGOSUB88 

7 CLS:ONASC(lS)-64GOT08,16,29,32,33,36,51,6a,71,84,87 

8 IFAS{1)<>""GOTO107 

9 JS="":PRINT"INPUT FILE ID CODE UP TO 6 ALPHA/NUMERIC CHARACTER 

S. . . .':INPUT" (DO NOT USE COMMAS ) " ; J S : G0SUB91 : I FM= 1M=0 : CLS : GOT 
09 

10 KS="" :PR1NT: PRINT'INPUT FILE DATE (DO NOT USE COMMAS )": INPUT" ( N 

OT MORE THAN 12 ALPHA/NUMERIC CHARACTERS] " ;KS :G0SUB91 : IFM=1M- 
0rCLS:GOTO10 

11 LS="":PRINT:PR1NT"INPUT REFERENCE USED TO" : PRINT"DETERMINE COIN 

GRADE AND VALUE" : PRINT" (NOT t*3RE THAN 25 ALPHA/NUMERIC CHARA 

CTERS) ":PRINT" (NO COMMAS )": PRINT: PRINT" IF THERE IS NO REF 

ERENCE, PRESS ENTER" : INPUTLS:G0SUB91 : IFM=1M=0 :CLS :G0T011 

12 FOBF=1T0176:CLS:IFF=176GOT099 

13 GOSUB112:IFM=1M=0:GOTO13 

14 IFAS(F)="CL0SE"A=F:G0T04 

15 NEXTF 

16 IFQ=1GOTO17ELSEPRINTTAB(20) "COIN INVENTORY LISTING" :PRINT"DATE: 

";KS;TAB(25) ; "REFERENCE: " ;LS : PRINT" ID CODE: " ; JS;TAB ( 25) "F I 
LE CONTAINS ";A-1;' ITEMS" :GOSUB102 :G0T018 

17 LPRINTTAB(29) "COIN INVENTORY LISTING" : LPRINTSTRINGS (3 , 10 ) :LPRIN 

TTAB(10)"DATE: "; KS :LPRINTTAB( 10 ) 'REFERENCE: " ;LS:LPRINTTAB(1 
B)"ID CODE: " ; JS: LPRINTTAB (10) "F ILE CONTAINS" ; A-1 ; "ITEMS" :LPR 
INTSTRINGS(3,10) :GOSUB102 

18 FORF = 1TOA-1:GOSUB104:B# = BI+VAL(STRS(E(F) ) ) :U = A-1 : IFQ=0GOTO21ELS 

EPRINT@128,"ITEM •";F;" IS BEING PRINTED" : IFPEEK C 16425) O60GO 
T024 

19 LPRINTCHRS(ll) :N=H+1:LPRINTTAB(5)"FILE ID: " ; JS ;TAB( 23 ) "DATE: " 

; KS : LPRINTTAB (60)" PAGE : " ; N : LPRINT 

20 IFF=A-1GOTO23ELSEGOSUD102:GOTO24 

21 IFF=A-1G0T025 

Program cor) li noes 



mm 

i HOW LOW 

Can we GO? 

8 Premium 
16K Dynamic RAluis: 

$19.95! 

These top quaiity, high speed, low power 
RAMs expand memory in TRS-80* l/ll/lll 
and Color Computers, Heath H89. Apple, 
newer PETs, etc. Backed by one year limited 
warranty. Add $3 fof two dip shunts and 
conversion instructions for TRS-OO* I. 

Why pay mora. . .w« stock th« rtghl parts 
at tha rtght prica. 



.1 i"* $h,upina <ir«5^ 



CompuPro" 

BOK 2355. CAKLAND MRPORT, CA WSM 



^^ELECnWNICS^ 



^76 



Combine accurate flight characteristics with the best In animation graphics 
and you'll have SubLOGIC's 

T80-FS1 night Simulator 

fortheTRS-80 



SubLOGIC s T80-FS1 is the smooth, realistic 
siinulator that gives you a real-time, 3-D, 
out-of-the-cocl(pit view of flight. 

Thanks to fast animation and accurate repre- 
sentation ot flight, the rwan-pilot can now learn 
tjasic flight control, including take-offs and 
laixlings! And experienced pilots will recog- 
nize how thwroughly tfiey can explore the 
aircraft's characteristics. 

Once you ve acquired flight proficiency, 
you can engage in the exciting British Ace 
3-D Aerial Battle Game included in the 
package. Destroy the enemy s fuel depot 
while evading enemy fighters. 

Computer and aviation experts call the 
T80-FS1 a marvel of modern technology. 
You'll simply call it fantastic! 



Special Features: 

• 3 frame-per-second flicker free 
animation 

• Maximum transfer keyboard input 

• Constant feedback cassette loader 

Hardware Requiren>ents: 

• Radio Shack TRS-80. Level 1 or 2 

• 16K menwry 

• Nothing else! 

my ^ W 




Only 



See your dealer or order direct. For 
direct order, include S1.25 and Specify 
UPS or first class mail Illinois residents 
add 5% sales tax. Visa and Mastercard 
accepted. 








LOGIC 

Communications Corp. 
BoxV, Savoy, IL 61874 
(217)359-8482 
Telex: 206995 ^150 



K- Sm List ol Advertisers on psg»418 
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". . . an assembly language routine 

would be Ideal, but I have 

a limited knowledge of the low-order language." 



Program continued 

22 IFU-L<0GOTO24 

23 IFF/L=1GOSUB27:CLS;GOSUB102 

24 NEXTF:IFQ=1G0T026 

25 PRINT: PRINT-TOTAL VALUE OF THE" : PRINT'COINS LISTED IN THIS FILE 

IS ";:PRINTUSINGZS;B#:GOT069 

26 LPRINT:LPRINTTAB(7) "TOTAL VALUE OF THE' !LPRINTTAB(7 ) "COINS LIST 

ED IN THIS FILE IS " ; : LPRINTUSINGZS [Bl :LPRINTCHR$ (II ) :G0T04 

27 PRINT-PBESS C TO CONTINUE LISTING— PRESS H TO RETURN TO MENU "j 

:G0SUBH4 

28 IFASC(IS)=67L=L+10:RETURHELSElFASC(IS)-77GOTO4ELSEGOSUBlll!GOTO 

28 

29 PHINT-PBEPARE PRINTER" : PRINT:PRINT"WHEN READY, PRESS P " ; : GOSUB 

114 

30 IFASC[IS)=B0CLSELSEGOSUBlll:GOTO38 

31 IFPEEK(14312)<>63PRINT"THE PRINTER IS NOT READY" iGOTOlBBELSELPR 

INTSTRINGS[3,10) :0=1:GOT016 

32 GOSUB109:CLS:PRINT"FILE ID, DATE AND REFERENCE ARE BEING SAVED" 

:PRI[;Tt-l,A, JS,KS,LS:CLS:F0RF=lT0A-l:PRINTei2e,"ITEM l";F;" I 
S BEING SAVED":PRINT#-1,AS(F) ,B(F) ,CS(F) ,DS(F) ,E(F) :NEXTF:G0T 
04 

33 IFLEtUASd) ) >0GOTO107ELSECLS:PRINT'ENTER IDENTIFICATION CODE":I 

NPUT-OF DESIRED FILE" ;NS :GOSUB101 : IFM=lM=fl :GOT033 

34 CLS:GOSUB109:CLS:PRINT"FILE ID, DATE AND REFERENCE ARE BEING IN 

PUTTED-:INPUT»-1,A,JS,KS,LS:CLS:IFJS<>NSPRINT"FILE ■";NS:"' N 
OT LOCATED. ..FILE '";JS;"' FOUND" :GOT069 

35 F0RF=1T0A-1:PRINT?128,"ITEM l"fF;" IS BEING INPUTTED" : INPUT#-1 

AS(F) ,B(F) ,CS(F) ,DS(E) , ElF) :NEXTF:G0T04 

36 IFA=176G0T099 

37 PfilNT-DO YO(J WISH TO j": PRINT: PRINT" <W> ADD ONE ITEM WITHIN THE 

FILE":PRINT"<E> ADD ITEMS AT END OF THE FILE" : PRINT:G0SUB11 
3 

3 8 IFASC(IS)=69CLSELSEIFASC(IS)=87CLS:GOT043ELSEGOSOB111:GOT038 

39 FORF=AT0176:CLS:IFFi:176A=F:GOT099 

40 GOSUB1I2:IFM=1M=0:GOTO40 

41 IPAS(F)='CL0SE"A=F:G0T04 

42 NEXTF 

43 INPUT"AFTEB WHlCEi ITEM DO YOU WANT TO ADD IT" ;H :G0SUB96 :GOSUB10 

6 

44 FORF=ATOH+lSTEP-l;PRINTes,CHRS(94) : FORP=2TO0STEP-1 : Al-PEEK (VARP 

TR(AS(F) )+P) :A2=PEEK(VARPTR;aS(F+1) )+P) :C1=PEEK (VARPTR (CS (F) ) 
+P) :C2=PEEK(VARPTR(CS(F+1))+P) : D1=PEEK ( VARPTR (DS ( F) ) +P) :D2>PE 
EK(VABPTR(CS(F+11 )+P) 

45 POKE (VARPTR (DS(F) ) +P) , D2 : POKE (VARPTR (DS (F+1 ) ) +P) ,D1 : POKE (VARPTR 

(CS(F) 1+P) ,C2:P0KE(VARPTR(CS(F+l))+P) ,C1 : POKE(VARPTR (AS (F) ) tp 
) ,A2; POKE (VARPTR (AS (F+1 1 ) +P) ,A1:NEXTP 

46 FORP=1TO0STEP-1 :B1=PEEK (VARPTR (B(F))+P) :B2»PEEK (VARPTR (B(F+1) ) + 

P) :POKE(VABPTR(B(F) )+P) ,B2 :POKE (VARPTR (B (F+1 )) +P) ,B1:NEXTP 

47 FORP>3TO0STEP-1:E1=PEEK (VARPTR [E(F))+P) : E2-PEEK (VARPTR (E (F+1) ) + 

P) :POKE(VABPTR(E(F) ) +P) , E2 : POKE (VARPTR ( E ( F+1 }) +P ) ,E1:NEXTP;PR 
INTes,CHRS(32) : S = S+1 : IFS'=341S-330 

48 NEXTF 

49 F=H+1:GOSUB112:IFM=1M=0:GOTO49 

50 A-=A+1:IFA=176GOTO99ELSEGOTO100 

51 INPUT"WHICH ITEM IS TO BE DELETED" ;H:GOSUB96 : IFH=0H=1 :GOSUB94 :M 

=0:CLS:GOTO51 

52 GOSUB106 

53 FORF=HTOA:PRINTIS,CHRS(94) : FORP=0TO2:A1=PEEK (VARPTR (AS (F) )+P) :A 

2'=PEEK{VARPTB{AS{F*1I)+P) : CI = PEEK (VARPTR (CS (F) ) +P) :C2 = PEEK(VA 
RPTR(CS(F+1))+P) :D1=PEEK (VARPTR (DS(F) )+P) :D2»PEEK (VARPTR (DS (F 
+1))+P) 

54 POKE (VARPTR (DS IF) ) +P) ,D2 : POKE (VARPTR (DS (F+l) ) +P) ,D1 : POKE (VARPTR 

(CS(F1)+P) , C2: POKE ( VARPTR (CS (F+l ))+P) , CI : POKE (VARPTR (AS (F) ) +P 
) ,A2: POKE (VARPTR (AS (F+l) } +P) ,A1:NEXTP 

55 FORP-0TO1:B1-PEEK (VARPTR (B(F) J+P) :B2-PEEK (VARPTR (Bl F+l )) +P} :POK 

E (VARPTR (B{F))+P) ,B2: POKE (VARPTR (B( F+l )) +P) ,B1:NEXTP 

56 F0RP=flT03:El-PEEK (VARPTR (E(F) 1+P) :E2"PEEK (VARPTR (E(F+1 )) +P) :POK 

E ( VARPTR {E(F) ) +P) , E2: POKE(VABPTR (E (P+1) )+P) ,E1 :NEXTPsPRINT«S, 
CHRS(32) :S=S+l:IFS=341S-330 

57 NEXTF 

58 A-A-1:PRINT:PRINT"ITEM l";H;" HAS BEEN DELETED. ": IFA<2AS (1 )-"" ; 

JS»"":KS="":LS-"":A'=151 

59 GOTO100 

60 CLS:PRINT"DO YOU WISH TO EDIT: ": PRINT: PRINT"<F> FILE ID, DATE, 

OR REFERENCE":PRINT"<I> ACTUAL ITEM INFORMATION ": PRINT;GOSU 
B113 

61 IFASC(IS)=70CLSELSEIFA£C(IS)-73GOTO67ELSEGOSUB111:GOTO61 

62 CLS:PRINT"WHAT IS TO BE CHANGED: " ;PRINT: PRINT"<I> FILE ID'sPR 

1NT"<D> FILE DATE":PBINT"<B> FILE REFERENCE" : PRINT:G0S0Bll3 

63 IFASC(lS)-=73CLSELSEIFASC(lSl=68GOT065ELSEIFASC(lS)-82GOT066ELSE 

GOSUBlll:GOT06 3 o™,™™ „„„ 

Program continues 



Select the appropriate field by pressing 
A, B, C, D or E. Enter what you are trying to 
locate. The program will search the file 
and display those items that match your 
request. Note a vaiue search wlii list all 
items equal to or less than the amount 
entered. If you entered $10, all coins hav- 
ing a value of $10 or less will be displayed. 

Once the search has been completed, 
you may return to the menu by pressing M. 

Option J allows two flies to become one, 
as long as the total number of Items does 
not exceed 175. A file must be In memory 
to use the merge feature. When prompted, 
enter the number of items in the file to be 
merged. Next, set up the recorder and 
press R. 

As each item Is merged, its numt>er will 
t>e displayed. Upon completion, the menu 
will be returned. List everything in the 
merged file on the screen and check it. 

Notice the file ID code Is now MERGE, 
and the date and reference are blank. You 
may use the Edit option to label the new 
file created by WERGE with an ID code, 
date and reference. 

When you wish to exit the program, 
simply press K during the menu display. 
Write the File ID Code and date on the 
cassette for future use. The code is 
necessary when trying to load a file. 

The Program 

Memory requirements for COINS are ap- 
proximately 8.5K for program storage and 
14.5K for execution. 

Due to large memory requirements, 
COINS was written with only one REM 
statement, and all line numbers are in- 
cremented by one. 

Beware of increasing the program size 
beyond its present length. There is little 
memory left while this program Is ex- 
ecuting. If you wish to change it, I recom- 
mend changing arrays A$, B, C$, D$ and E 
to 153, and all 176'sto151. 

The areas I consider the heart of the pro- 
gram are lines 44-48 and lines 53-57. These 
sections use a neglected feature of Basic— 
VARPTR. (See Level II Reference Manual for 
a description.) 

What happens Is the address value of 
each item Is computed and one added or 
subtracted from It. This eliminates the 
need for the computer to periodically per- 
form memory management, when the com- 
puter seems to "hang". Nothing Is wrong 
with that since new strings are not created 
to make room In the file during an add/ 
delete option. 
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I 




f FIELD PROVEN!! 

I 10 MEGABYTES and MORE for the TRS-80* Model II 

; plus SHARED ACCESS to HARD DISK DRIVE 

I Hird/Soft Disk Syslam (HSOS) Softwira allows access as single drive. You can have that 10 Megabyte continuous file - that 50.000 name maillisi of inventory' 

S Of a directory with 1 000 entries' All completely compatible with TRSDOS 2 BASIC You can mix floppy and hard disk drives. Includes special utilities including 

1^ HPURGE- DCS Directory Catalog System HZAP Hard Disk Superzap. and many special tormatting optmns. Three to eight limes faster than floppy' RACET quality 

5 HARD DISK DRIVE 4 CONTROLLER $5995. Second User $595. HSDSSoftware $400. (Note: HSDS now also available for CORVUS drives") 

^ KFS-80 (1-drive 32K Mm - Mod II 64K) Mod I and III $100. Mod H $175 

y Assembly language ISAM facility' Interfaces with BASIC. Very fast access to records in large files. Access/insert times 1-4 seconds 

J B-Tree directory structure eliminates record search. No file reorganization required Sector buffering reduces media and drive wear while increasmg performance 

^ Can be used for primary and secondary file database applications. Records are kept in sorted order on disk by alpha key. Deferred write option Comprehensive 

^ file maintenance and debugging utilities are included. Attsntion applications programmers ■ Save time m implementing your custom database application software 

u MAILLIST (1 -drive 32K Mm - Mod II 64K) Mod I and III $75, Mod II $150 

ec This ISAM-based maillist minimizes disk access times. Four keys — no separate sorlmg. Supports 9-digit zip code and 3-digit state code Up to 30 attributes 

I Mask and query selection. Record access/ update time 1-4 seconds" 

^ DISCAT (32K 1 -drive Mm) Mod I and III $50 

g This comprehensive Diskette Cataloguing/Indexing utility allows the user lo keep track of thousands of programs in a categorized library. Machine language program 

y. works with all TRSDOS and NEWDOS versions. Files include program names and extensions, program length, diskette numbers, front and back and diskette 

free space. RS232 drivers and other features. 

S LPSPOOL(32Kl-driveMin)Modl$75 

I LPSPOOL — Add mufti-tasking to permit concurrent printing while running your application program. The spooler and despooler obtain print jobs from queues 

« maintained by the system as print files are generated. LPSPOOL supports both parallel and serial printers, 

i BASIC LINK FACILITY 'BUNK' (Mod I Min 32K 1 -disk) Mod I $25; Mod II $50; Mod III $30 

1 Link from one BASIC program to another saving all variables! The new program can be smaller or larger than the original program in memory, The chained program 
H may either replace the original program, or can be merged by statement number The statement number where the chained program execution is to beoin mav 
^ be specified! 

£ INFINITE BASIC (Mod I & Mod III Tape or Disk) Mod 1 $50; Mod III $60 

I Extends Level II BASIC with complete MATRIX functions and 50 more string functkjns. Includes RACET machine language sorts! Sort 1000 elenwnts in 9 seconds" 

2 Select only functions you want to optimize memory usage 

^ INFINITE BUSINESS (Requires Infinite BASIC) Mod I A 111 $30 

P Complete printer pagination controls — auto headers, footers, page numbers. Packed decimal arithmetic — 1 27 digit accuracy + , - , ' / Binary search of 

^ sorted and unsorted arrays. Hash codes 

^ COMPROC (Mod I & Mod III — Disk only) Mod I $20: Mod lit $30 

c Command Processor Auto your disk to pertorm any sequence of instructions that you can give from the keyboard. DIR. FREE, pause wait for user input BASIC 

I Ho of FILES and MEM SIZE. RUN program, respond to input statements. BREAK, return to DOS. etc Includes lowercase driver software debounce and screenprint' 

^ 6SF (Mod I & III Tape or Disk - Specify Memory Size) Mod 1 $25; Mod II $50; Mod III $30 

Generalized Subroutine Facilities The STANDARD against whicfi all other sorts are compared' And then compare prices! Machine language — last and poweriui' 
^ Multi-key multi- variable and multi-key character string Zero and move arrays Mod II includes USR PEEKS and POKES Includes sample programs 

g DSM(ModlMin32K2-dnvesystem Mod II 64K 1-drive Mod III Mm 32K 1 -drive) Mod I $75: Mod II $150; Mod III $90 

g Disk Sort/Merge for RANDOM files All machine language stand-alone package for sorting speed Establish sort specification m simple BASIC command File 

! Execute from DOS Only operator action to sort is to change diskettes when requested' Handles multiple diskette files! Super tast sort times — improved disk I/O 

■ times make this the fastest Disk Sort/Merge available on the TRS. 

1 UTILITY PACKAGE (Mod II 64K| $150 

I Important enhancements to the Mod II The file recovery capabilities alone will pay for the package in even one appltcatmn' Fully documented m i?4 page manual' 

^ XHIT, XGAT. XCOPY and SUPERZAP are used to reconstruct or recover data from bad diskettes! XCOPY provides multi-fiie copies, wild-card' nusk select, 

g absolute sector mode and other features SUPERZAP allows examine /change any sector on diskette including track-0. and absolute disk backup/copy wtth 1/6 

< recovery DCS buiWs consolidated directories from multiple diskettes into a single display or listing sorted by disk name or file name plus more Change Disk 
, ID with DISKID XCREATE preaitocates files and sets LOF' to end to speed disk accesses DEBUG!! adds single step, trace, subroutine calling program looping 

(o dynamic disassempiy and more" 

I BASIC CROSS REFERENCE UTILITY (Mod II 64K) $50 

d SEEK and FIND functions for Variables. Line Numbers. Strings. Keywords Air options available for bne numijers and variables Load from BASIC — Call with 

3 'CTRL'R. Output to screen or pnnteri 

g DEVELOPMENT PACKAGE (Mod II 64K) $125 

< Includes RACET machine language SUPERZAP, Apparat Disassembler, and Model II mteriace lo the Microsoft 'Editor Assembler Plus' software package including 
I uploading services and patches for Disk I/O. Purchase price includes complete copy of Editor Assembler + and documentation for Mod I. Assemble directly 

at into memory. MACRO facility, save all or portions of source to disk, dynamic debug facility (ZBUG). extended editor commands. 

DC DEALER inquiries invited. System Houses - check for special pricing on hard drives and software. 
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Program continuea 

64 CLS: INPUT'EHTER NEW FILE ID CODE " ; JS :G0SUB9B : IFH>1M=B :GOT064EL 

SEPRINT'FILE ID CODE IS NOW ";JS:GOTO1B0 

65 CLS: INPUT'ENTER HEW FILE DATE" ; KS :GOSUB90 : IFH=1H=0 :G0TO65ELSEPR 

IN'T'FILE DATE IS NOW ■;KS:GOTO100 

66 CLE: INPUT'ENTER NEW FILE REFERENCE" ;LS :GOSUB90 : IFH-lM-fl :GOT066E 

LSEPRINT"FILE REFERENCE IS NOW ";LS:GOTOie0 

67 CLS; INPUT'ENTER ITEM NUMBER TO BE EDITTED" ;F : H=r ;GOSUB96 : PRINT; 

PRINT'lTEH »";ii;" APPEARS IN FILE AS FOLLOWS :" r PRINT : GOSUBl B 2 
:GOEUB104:FORT=lTO10aO:NEXTT:CLS 

68 GOSUB112:IFIF=lIE=0:GOTO69ELSEPHINT:PRINT"THE ITEM NOW APPEARS 

AS FOLLOWS:": PRINT: GOSUB102:GOSUB104 

69 PRINT:PRINT"PRESS M TO RETURN TO MENU ■';:G0SUB114 
7 IFASC(IS)<>77GOSUB111:GOTO70ELSE4 

71 ASS^"ZZZ":BS— 1:CSS'"YYY":DSS="XXX" :ES— 1 ; CLS : PRINT" SEARCHES MA 

Y BE COHDUCTED BY ANY FIELD ": PRINT: PRINT"WH ICH FIELD DO YO 

U WISH TO CONDUCT THE SEARCil BY ': PRINT: PRINT" <A> COIN <B> DA 
TE <C> MINT <D> GRADE <E> VALUE" : PRINT:G0SUB113 

7 2 IFASC[IS) <650RASCUS1 >6 9G0SUB111 :GOT072ELSECLS :ONASC (IS ) -64GOTO 
74,74,74,74,73 

73 PRINT"DURING A SEARCH BY THE 'VALUE' FIELD, ANY ITEM WORTH":PRI 

NT'THE AMOUNT INPUTTED OR LESS WILL BE DISPLAYED .": INPUT" ENTE 
R THE AMOUNT TO BE SEARCHED FOR" ; ES :GOT07 9 

74 PRINT"WHAT DO YOC WISH TO SEARCH FOR " ; : ONASC ( 1 SI -64GOT075 ,76 ,7 

7,78 

75 INPUTASS:GOT079 

76 INPUTBS:GOT07 9 

77 INPUTCSS:GOT079 

78 INPUTDSS 

7 9 PRINT: PRINT" SEARCHING FILE " :GOSUBlfll :GOSUBlfll : FORF-lTOA-1 : 

IFASS=flS(F)ORBS-B(F)0RCSS=CS(F)0RDS$=D$(F)ORES">E(F)CLS:G0SUB 
102ELSENEXTF:GOTO81 

80 FORG=FTOA-1:IFASS='AS(G)ORBS = B(G)ORCSS-C$[G)ORDSS-DS(G)ORES->E(G 

)F=G:GOSUB104:NEXTG:GOTO82:ELSENEXTG:GOTO82 

81 PRINT:PRINT"A MATCH CANNOT BE FOUND" 

62 PRINTjPRINT'PRESS S TO CONDUCT ANOTHER SEARCH--PRESS M TO RETUR 

N TO MENU ";:G0SUB114 
83 IFASC(lS)=83GOT07lELSEIFASC(IS)"77GOT04ELSEGOSUBlll :GOT077 
B4 G0SUB8B:PRINT"CAUTI0N: WHEN MERGING FILES, THE TOTAL NUMBER OF 
ITEMS MUST":PR1NT"N0T EXCEED 17 5 . " :PRINT: INPUT'HOW MANY ITEM 

S ARE IN THE FILE TO BE MERGED" ; I :J=A: IFJ+I-1 M76PRINT: PRINT" 

TOO MANY ITEMS MERGE CANNOT BE DONE" :GOTO100 

85 CLS:GOSUB109:CLS:PRINT"CHECKING THE LENGTH OF INPUTTED FILE 

":INPUTI-1,A, JS,KS,LS:IFJ+A-1>17 6PRINT"T00 MANY ITEMS " :G0 

SUB101:GOSUBlfll :GOSUB101 :G0T04ELSECLS :F0RG^JT0J+A-2 :PRINTe320 

,"ITEM •";G;' IS BEING INPUTTED" 
B6 INPUT#-1,AS(G) ,B{G),CS(G),DS(G1,E{G) : NEXTG: JS="MERGE" :KS="" :LS- 

"": PRINT: PRINT"MERGE COMPLETE" :A-A+J-1 :GOTO1B0 
87 PRINT'IF A FILE WAS CREATED, BE SURE TO PROPERLY MARK THE CASSE 

TTE":PRINT"WITH THE CORRECT FILE ID CODE AND DATE FOR FUTURE 

REFERENCE. ":PRINTSTRING$( 10, 10) : END 
ee IFASll)=""0RA<2CLSELSERETURN 

89 FORD=lT05:PRINT§4Bfl,"YOU DO NOT HAVE A FILE IN MEMORY" :GOSUB101 

:PRINTe400, STRINGS (32,32) : GOSUBl 01 : NEXTD:G0T04 

90 IFLEN(A$(F) ) >110RB(F) >99990RLEN (CS (F) ) >50RLEN (DS (F) ) >60RE(F) >99 

99.99IE'=1:AS{F)="":B(F)=0:CS(F)="" ! DS (F) -"" : E (Fl -B:G0T094 

91 IFLEN(JS)<10RLEN{JS) >6M=1:JS = " :GOT094 

92 IFLEN(KS) >12KS-"" :M=1ELSEIFLEN (LS) >25LS='" : M=l :COT094ELSERETURN 

93 1FLEN(NS)<10RLEN(NS)>6NS='" :M-1 

94 IFM=lC={256*(PEEK(16417)-60)+PEEK(16 416)-2)+66ELSEBETUBN 

95 FOBD=1TO5:PRINT0CC, "INPUT ERROR RE-ENTER" :GOSUB101 : PRINT^C, 

STRINGS (24, 32} :GOSUB101 : NEXTD: RETURN 

96 IFA<51R=12BELSEIFA'C101R=16 5ELSER=210 

97 IFH>A-lFORD-lTO5:PRINTe400, "THERE AREN'T "jH;" ITEMS IN THIS FI 

LE"ELSERETURN 

98 GOSUB101:PBINT§400,STRINGS (50,32) :GOSI3B101 : NEXTD : H=0 :G0T04 

99 FORD-lTO5:PRINTe408,"THIS FILE IS FULL" :GOSUB101 : PRINT§408 ,STRI 

NG5{17,32) :GOSUB101 ; NEXTD :G0T04 

100 FORT=1TO500:NEXTT:GOTO4 

101 FORT=1TO100:NEXTT: RETURN 

102 IFQ=0PRINT"ITEN f.-TABdS) "COIN" , -TAB ( 25 ) "DATE" ; TAB (35 ) "MINT'iT 

AB(45) "GRADE"; TAB (56) "VALUE" : RETURN 

103 IFQ=1LPRINTTAB(7) "ITEM I"; TAB (20) "COIN" ; TAB ( 32 ) "DATE" ; TAB (42) " 

MINT";TAB(52) "GRADE" ; TAB (6 3) "VALUE" : RETURN 
1B4 IFQ=0PRINTF;TAB(10)AS(F) ;TAB(24)B(F) ;TAB (35 ) CS ( F) ; TAB(45) DS (F) 
; TAB (54) ; : PRINTUSINGYS ; E (F) : RETURN 

105 IFO=lLPRINTTABi9)F;TAB(17) AS(F) ;TAB(31)B(F) jTAB ( 42) CS (F) ;TAB(5 

2)DS(F) ; TAB (61) ; : LPRINTUSINGYS ; E (F) : RETURN 

106 CLS:PRINT"JUST A MOMENT PLEASE ": PRINT: PRINT"MEMORY IS BEIN 

G RE-ARRANGED":PRlNTei92,"IT COULD TAKE UP TO" : PRINTe216 , "SEC 
0NDS.":F0RD=1T04:PR1NT3211,B: GOSUBl 01 :PRINTe211, " ": GOSUBl 
01 : NEXTD :PRINTe211 , R : R=a ; RETURN 

107 PRINT'THERE IS A FILE ALREADY IN MEMORY" : PRINT: PRINT" <D> DELE 

TE FILE AND RE-RUN PROGRAM" : PRINT" <M> RETURN TO MENU":PRINT: 
G0SUB113 

108 IFASC(IS)'68GOT02ELSEIFASC(lS)=77GOT04ELSEGOSUBlll :GOTO10B 

109 PRINT"PREPARE RECORDER" :PRINT: PRINT"WHEN READY, PRESS R " ; : GOS 

UB114 

110 IFASC(IS)=82RETURNELSEG0SUB111 :GOTO110 

111 C=256*(PEEK116 417)-60)+PEEK(16 416)-2:GOTO115 

112 CLS:PRINT" (ITEM l";F;") ENTER COIN, DATE, HINT, GRADE, VALUE" 

:INPUTAS[F) ,B(F),CS(F),DS(F),E(F) :GOSUB90 ; RETURN 

113 PRINT"SELECT OPTION "; 

114 C = 256* (PEEK (16 417) -60 ) +PEEI: ( 16 416 ) 

115 PBINTgC,STRINGS{2,14 3) ;:GOSUBlfll : IS=INKEYS: IFIS-" "PRINTec, " " 

;:GOSUB1B1:GOTOU5 

116 PRIKT9C, " ■;IS; : F0RT-1T05B tNEXTT: IFASC ( IS) <65COT0115ELSERETURN 



Execution time to add or delete an item 
in the first version of this program is about 
30 minutes, vs. 3 minutes using VARPTR. 
There may be faster ways to rearrange a 
file and more than likely, an assembly 
language routine would be ideal, but I have 
a limited knowledge of the low-order 
languages. 

Bugs 

I have tried to make COINS as bug-free 
as possible. That is not to say there aren't 
any. If you should encounter any prob- 
lems, go back and check the listing. I used 
a Line Printer III to produce mine, and it 
slashes all zeros. My golden rule is to dou- 
ble check everything and then do it again. 

After Spending several hours con- 
solidating your collection and keying it in, 
you are ready to save it on cassette. Sud- 
denly, you accidently press Break. Simply 
type G0T04 and your file will still be intact. 
This may be done any time a problem 
arises, but, if you type RUN, you will lose 
the file. 

I find it tedious sitting at the keyboard 
for several hours. Frequent breaks seem to 
alleviate this. Therefore, I create many 
small files, say 25 to 50 items long and 
then later, using the merge function, make 
several large files of 175 items each. 

Sometimes when saving a file on tape, I 
forget to mark the cassette with the File ID 
code. The answer is simply to execute the 
input file function. When asked to enter 
the ID code, just press Enter. Once the ID 
code of the recorded file is read, an error 
message will be displayed giving the 
proper file ID. 

My last caution concerns the cassette 
tape. Due to the questionable reliability of 
cassettes, I do not use anything larger 
than a 30-minute tape. One 175-ltem file 
will fit with a little tape left over. It is 
preferable that only one file be stored on a 
tape. I would rather lose one file than five 
or six. 

001 NS was written with the amateur col- 
lector in mind. If you have a large collec- 
tion, I suggest changing the tape I/O 
routines to accommodate a disk. If you en- 
counter a problem you cannot remedy, 
send me a letter. 

Since COINS was written, my collection 
has been drastically reduced. I still keep 
what's left in a safe and recommend safe 
deposit boxes. An inventory significantly 
reduces the risk of theft, since the collec- 
tion is not displayed. 

I hope collectors giving COINS a trial 
run will find it as useful as I have. ■ 
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MODEL 



MODEL III 




BUY 
DIRECT 




26-4002 

64K 1 Drive 

*3288.00 

26-4160 1 Drive Exp $1034,00 

26-4161 2 Drive Exp 1574 00 

.41623Drive Exp 2114,00 

4150Hord Dfiv» -1 39<»4,00 + 

4151 Hard Drive 2 3144 00 + 

■4530Scrip5itll 265.00 

-4512 Profile I! 162 00 

-4511 Visicak II 265 00 

■4501 Gen Ledger 180 00 

■4506 Moil L.St 72.00 



26 1061 4KI 

26 1062 16K III 

26 1066 48K III 

W 2 Drives RS232. . . 

COLOR 



S609.00 
M4.00 

2069.00 



PRINTERS 




CEHTRDniCS 
BEST PRICES 

Text Quality Centronics 
739-1 Printer $729.00 



DISCOUNT 

TRS-80® 

COMPUTER SPEOAUSTS 

CALL US. . . 
SAVE MONEY 

We carry the full line of TRS-80 Computers. All 
other software, furniture, and accessories at dis- 
count from catalog price. We stock most items 
to assure you fast delivery and save you money. 

We Offer The Total Package. . . 

—SATISFACTION - Thousands of satisfied 
customers since 1978 

—FAST DELIVERY - We ship all in-stock items 

within 24 hours 26-3001 4K S318.00 

26 3002 16K E-l. Basic . . . 4S8.00 
—LARGE INVENTORY - Largest in Southeast U.S.A. 2^.3003 32K Exi Bosic. . . . 57».00 

26-3010 Color Video 353.00 

—HONESTY ■ No gimmicks ■ No worry mail 261206 Recorder 34.00 

order ease 

—TOLL FREE PHONES - Doesn't cost you a 
penny to call us 

WE ARE THE BEST! 




J^^^ 




Pocket Computer 

26 3501 1.9K P C $188 00 

26-3503 Cassette IF 45 00 

14-812 Recorder 72.00 

26 3505 Mini Printer 134.00 



WRITE US FOR A 
FREE CATALOG 
THOUSANDS OF SATISFIED CUSTOMERS 




ALL POCKET AND COLOR 

COMPUTER SOFTWARE 

SOLD AT DISCOUNT 



1-800-841-0860 ToII Free Order Entry 



[UCHQ inflMflDEinEMT SVSTEinS, JMCf 



No Taxes on Out Of DOWNTOWN PLAZA SHOPPING CENTER 



State Shipnnents 

Immediate Shipment 
From Stock on Most Items 



DEPT. #/i 
115 C. SECOND AVE. S.W. 

CAIRO, GEORGIA 31728 

(912) 377-7120 Go. Phone No. & Export 

TmSO ll ■ r*gli(*r*d trodvfnark of th* Tandy COfp. 



A copy of the monutocturer's war- 
ranty con be obloined free upon 
specific written request to the 
Electronic's Department of our 
Cairo, Georgio Retail Store. 



^See Lisi oi Advertisers on page 418 



80 Microcomputing. December 1981 • 141 

Scanned by Ira Goldklang - www.trs-80.com 



STYLE 



In praise of perjorative prompts. 



Let's Get Rude! 




Richard Ramella 

1493 Mountain View Ave. 

Chico, CA 95926 



Ventriloquist Edgar Bergen was the 
soul of good manners, but his wooden 
sidekick, Charlie McCarthy, was cheerfully 
rude to anyone who came near, including 
long-suffering Mr. Bergen. 

I sensed an analogy between a ventrilo- 
quist's dummy and a computer the first tinw 



I tried out a friend's microprocessor. He 
wanted me to try a little game he'd man- 
aged—a high-low opus which must have 
used all of fifty bytes. 

The screen flashed, "I'm thinking of a 
number one to 10 which you must guess. 
Ready to play?" 

"OK," I typed, and hit Enter. 

The screen replied, "No, stupid. Answer 
yes or no. OK, bozo?" 

I gave my friend a furrow-browed, 
sidelong glance. He shrugged. 

I got up and walked away. "That's a 
nickel more of that than I needed. Care for 
a game of chess?" 

My friend was crestfallen. "But you 
didn't even try it." 



100 REM ■ NOVEL BY RICHARD RAMELLA' 

110CLS:CLEAR260 

120 PRINT'I AM THE DJIN OF THE PRINTED CIRCUIT " 

130 PRINT -I HAVE JUST CONCOCTED THE PLOT OF A NOVEL" 

140 PRINT-CAN YOU ASK ME YES OR NO QUESIKDNS' 

150 PRINT' AND FIGURE OUT THE STORY-J-: PRINT 

160 PRINT:PRINT"DONT BOTHER WITH QUESTION MARKS " 

170 PRINT'OR WORRY ABOUT SPELLING I UNDERSTAND."; PRINT 

180 ; N PUT' QUESTION 'iBS 

190AS = MIDS(BS.g.1) 

200 IF(AJ = "A-jOHIAJ = -E-KlHlAS = -fKJRiAS = ■■0'>PHINT"YES':GOTO180 

210 IF{A$ = ■■U")OR(AS = "L-lOmAJ = '■S-)OR(AI = "TIPHINT "YES':GOTOiaO 

220 IF(AS ^ '■Y")OR{AS = ■'K")OR(AS = ■■M")PHINT ■■MAYBE":GOTO180 

230 PRINT ■NCGGTOieo 

240 END 



Program Listing 1 



"I am not stupid, and I am not a bozo," I 
said. And that was that . . . until I got my 
own microprocessor. 

Soon my little computer developed a 
smart-ateck screen and would insult and 
hector anyone who dared hit Enter. In time, 
I realized this was bad computer mental 
health and I wiped the mean aspects away 
from numerous programs. I believe that, 
even when the computer challenges, it 
should remain an essentially agreeable 
entity. 

Still, the human bent for deviltry is such 
that it's admittedly fun to have the com- 
puter toss a zinger now and then. 

Accordingly, I offer two little programs 
which are total tricks. Each has sufficient 
grace and humor that your victims will be 
willing ones. 

Novel and Tantarfan Takeaway 

Novel is a program in which the com- 
puter claims to have concocted a plot 
which the player must guess in a series of 
questions answered by yes, no or maybe. 
In truth, answers are based on a letter 
within an alphanumeric string produced 
when the player asks a question. The 
player unconsciously makes up his own 
plot. It is neatly played when adapted to 
readout, which you, of course, present to 
your totally charmed victim. 

Tanterian Takeaway is a removal game, 
the concept for which probably originated 
about five minutes after people learned to 



142 • 80 Microcomputing. December 1981 



ft 



your victims 
wiil be wHiing ones." 



count their fingers. Here, it is dressed as players will insist on subsequent runs 
science fiction and has a humorous end- even after the computer tells them it's a 
ing. It doesn't take long to play, and most no-win situation. ■ 



100 REM *TANTERIAN TAKEAWAY* BY RICHARD RAMELLA 

110 CLS 

120 PRINT "HUMAN RAPSCALLION I 1 " 

130 PRINT 

140 PRINT "I'VE CAUGHT YOU STEALING THE" 

150 PRINT "100 JEWELS OF PLANET TANTER," 

160 PRINT 

170 PRINT "ORDINARILY, THE PENALTY" 

180 PRINT "IS SEVERE AND TERMINAL..." 

190 PRINT 

200 PRINT "BUT I'M A GAMESMAN." 

210 PRINT "FOR YOUR LIFE AND THE JEWELS" 

220 PRINT "YOU MUST MATCH WITS WITH ME" 

230 PRINT "AT TANTERIAN TAKEAWAY." 

240 PRINT 

250 INPUT "HIT ENTER FOR RULES"; 

260 CLS 

270 PRINT "WE TAKE TURNS MOVING 1 TO 10 JEWELS" 

2B0 PRINT "FROM THE BLUE BOX TO THE RED BOX." 

290 PRINT "THE ONE WHO MOVES THE 100TH JEWEL" 

300 PRINT "IS THE WINNER OF LIFE AND TREASURE." 

310 PRINT 

320 INPUT "HIT ENTER TO START") 

330 CLS 

340 PRINT "I GO FIRST, MOVING 1 FOR A TOTAL OF 1, 

350 FOR N=l TO 100 STEP 11 

360 INPUT "HOW MANY ARE YOU MOVING" jX 

370 CLS 

380 IF X<1 GOTO 420 

390 IF X=<11 GOTO 440 

400 PRINT "THE HUMAN CHEATS 1 TAKE 10 OR FEWERI" 

410 GOTO 360 

420 PRINT "YOU MUST MOVE AT LEAST ONE," 

430 GOTO 360 

440 PRINT "YOUR TOTAL IS AT"iN+Xi"BY TAKING" )X 

450 PRINT "I MOVE"ill-X;"FOR A TOTAL 0F";N-H1 

460 PRINT 

470 PRINT 

460 IP N-t-ll=100 THEN 500 

490 NEXT N 

500 PRINT "I WIN, MY DOOMED FRIEND." 

510 GOSUB 680 

520 PRINT 

530 PRINT "AND NOW FOR A CONFESSION:" 

540 PRINT 

550 PRINT "THE GAME IS RIGGED SO I ALWAYS WIN," 

560 PRINT "THIS SHOULD TEACH YOU TO" 

570 PRINT "NEVER TRUST A TANTERIAN " 

580 GOSUB 680 

5 90 CLS 

600 FOR Z=l TO 320 

610 PRINT -HA 'i 

620 NEXT Z 

630 GOSUB 680 

640 X=0 

650 CLS 

660 PRINT"LET'S PLAY AGAIN." 

670 GOTO 340 

680 FOR A»l TO 1500 

6 90 NEXT A 
70 RETURN 
6990 NEXT A 

Program Listing 2 



BUGOUT 




THE ULTIMATE BUC CJlTCHUt* 



THREE POWERFUL MACHINE 
LANGUAGE MONITORS 

UNEQUALLED ASSEMBLY 
LANGUAGE INSTRUCTION 

A lew montris ago we published a lesl Kcrs-on ot 
BUGOUT The response was oveiwhelming' We 
received numerous exclamations similar lo Ihe fol- 
lowing from R E in Philadelphia 

Aithougt"- I am lusT a beginnei al Assembly/ 
Macfiine Language I found the p'ogram and book 

encelleni I car- Truly say Ihal I leamed mote m two 

hours witti your manual Ihan I *as able 'o lea'n m 
irie previous lnvo moniris i say this wiiri 'lO t->ag 
geralion Thanks tor an eiceileni program Its 
worifi twEce (he price'" 

Now. after considerable enchange ot ulcas wiiri 
BUGOUT owners we are proudly introducing ("le 
following new proOucIs lo compliment our inilial 
ottering The products sliown hplow will provide a 
Choice of power accorOmg (o yoii' neeils 

BUGOUT/BEG 

The original BUGOUT MONITOR It does most 
things belter than any other mnnitoi on (he market 
An Ideal product (or Ihe biidgel- minded begmner 
who wants to grasp machine language as rapidly 
as possible with a modpsl inveslment 
INCLUDES ONE '1) BOOK BUGOUT ASSEMBl Y 
LANGUAGE COURSE 

Order No BUGWIT TAPE »2* 9S 

Order No. BUGVID DISK 129 95 

BUGOUT/INT 

An intermediate version of BUGOUT containing 
most of Ihe features of BUGOUT PRO described 
below l( IS tor the begmner who wan[s all (he 
power he can get at ar intermediate price or 'or 
those working enciusively in a '6K environment 
TfMs product IS NON-RELOCATABLE ano resides 

in higfi 16K memory The disk version owertays 

DOS 

INCLUDES TWO (3) BOOKS ASSEMBLY COURSE 

& ADVANCED MANUAL 

Ordw Mo. BUGVZT TAPE 144.95 

Order Mo BUGV2D DISK S49 95 

BUGOUT/PRO 

The ULTIMATE debugger We have taken the 
best >deas from other monitors, combined (hem 
with our best and the best from BUGOUT owners 
to create a truly professional debugging/teaming 
package No other monitor can give you the fie>- 
ibiliiy. ease of operation and POWER offered by 
BUGOUT-'PRO BAR NONE' Order (he DEMO 
TAPE if unceriain Vou WILL become a believer' 
INCLUDES TAG (2) BOOKS ASSEMBLY COURSE 
S ADVANCED MANUAL 

Order No. BUGV3T TAPE W4.95 

Order No BUGV30 DISK W9.95 

DEMO- TAPE and DETAILED INFORMATION 

PACKAGE $ S.M 

(Refundable on purchase of any BUGOUT version] 



UPGRADES from VLO lo VI.O 

or V2 a lo V3 Q 

UPGRADES from V1.0 lo VJ.O 



I foreign orders, please add 

C O D or other special tiandlmg, 
please add 



S19.9S 
S39.M 



S 5 00 
S 500 



We accept Master Charge Visa Monec Orflers or 
Checks — kVasfiifigron Slafe lesiOents please add 
5 3% sales fax 

THE SOFTWARE PLANTATION 

P O BOX 44623 

TACOMA WA 98444 

(2061 531 1&06 



DEALER INQUIRIES 
INVITED 
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SOFTWARE FOR TRS-80 

UNITERM DOS PLUS OPERATING SYSTEM 

'The Universal Terminal Program' a lasl, easy lo use, and bug-tree operating system tor ihe TRS-80 MotJel i 

The FIRST dnO ONLY terminal program for Dolti ttie Model I and Model 111 and HI This system is a must lor business and hoDby users Easy lo use. 

TflS-80 computers Written by Pete Roberts this program will soon become supports Single and Double density m the Mod ill, (Mod I witti Doubler) In- 

Ihe slanoaro o) terminal software Unique teatures includes a Handsome eludes a $100 reward for an error if you can locate one (See Micro Systems 

binder with over 7b pages of msttuclions and examples Free upgrade policy Software ad tor details | 

using 'ocal Bulletin Poards and MicroNtT Expanded functions such as Type DOSPLUS 3 38 (Mod 1 Single Density) $99,95 

!o buffer Display Buffer Define Auto logon, polling, signon, and connect DOSPLUS 3 3D (Mod I Double Density. Doubler required). $99.95 

messages' Requires 32K disk system Only $79.95 DOS PLUS 3 3111 (Mod III Sing/Doub Density), $99.95 
ST80III. OMMITERM, SMART80, SMARTIII owners'" Upgrade to 

UNITERM' Send your ORIGINAL program disk and receive UNITERM' for NEWDOS/80 OPERATING SYSTEM 

only $29 95" The Hottest Disk Operating System tor ine THS-80 Model i and m Version 

2 wiin full single anO-double density support, allows itie use of and com- 
CONNECTION-80 BBS bmation ol Oisk dtfves types and densities Full Double density support when 
Run your own Computer Bulletin Board This software package when combm- used with a Doubler. On the Model I, you can read and write Model 111 corn- 
ed with your Model I or Model HI TRS-80 and an Auto Answer Modem will palable data disks On the Model III, you can wnie Model I single or double 
convert your computer into a mim-times share system Functions include density data disks for use on the Model I Includes Expanded directories, 
message leaving, both public and private, message retrieving. Bulletins. dynamic basic merge and delete, selective variable clearing, enhanced basic 
Downloading merchandise, product ordermg. chat, etc This is a full feature editing, Enhanced chaining functions, Superzap utility. Disk enhanced editor 
system, and well known for excellence anong modem users. Only $199.95 assembler and disassembler, and much more Special Price, $139.95 

UTILITY PACK M-ZAL 

This package includes three of the mosi useful programs available for the This is the most powerful Editor Assembler for the TRS-80 ever wrillen. 

senouE TRS-80 user, by Mike Friedman Features a full screen editor, a menu driven asembler, and an interactive 

1) Spooler: Very fast, allows page parameters and perferation skip over I'fker which allows the linking of /CMD and /RLO dies Files can be loaded 
aulomaticaliy you can even switch DOSs without interupling printing' to Disk or Tape' Assembly Language programets like Dick Balcom. and Pete 

2) Erase: Super Purge utility with multiple modes of operation Allows you to RoDen claim that this is the best Editor Assembler on the market' Special 
display DIR and position cursor over file to be killed, and then a key stroke P^ice, $129.95 

and Its gone' You will never use KILL' againi 

3) Map: Places a sector map (LUMP map for NEWDOS/80) of your disk on OTHER MYSTERIES 

the screen Shows tree, used and locked out grans We carry the full line of IJG Other Mysteries books at discount prices Tnese 

ENTIRE PACKAGE ONLY, (Specify Mod I or ill), $49.95 books are a must (or computer users. 

TftS— 80 Disk and Other Mysteries i^2.50 $19.95 

COPY III Basic Decoded and Other Mysteries $?« 95 $26.96 

This Model III Utility, written by Dick Balcom, allows you to load system tapes Custom TRS-80 and Other Mysteries %2T^ $26.95 

into your computer at either 600 or 1500 Baud and then copy them onto a Baste Faster & Better $29 9\ $26.95 

new tape at either 500 or 1500 Baud Includes 10 page instruction manual. 

$9 95 MX-80 RIBBON RELOADS 

Don't throw away your worn MX-80 ribbon cassettes We carry endless loop 

THE COPYRIGHT KIT ribbons to replace the worn ribbon in your MX-80 ribbon cassette and save 

A selt-instruction Oooklet on copynghlmg the computer software you write money. Installation takes about 3 minutes each Special otter $3,5fl/ea.. 

Includes step by step instructions, sample forms, as well as discussions of $35.M/doz. 

copyrights, patents and trade secrets your rights secured by copyrights. CASOP 

legal remedies upon infringements, material not copyrightable and MUCH The CASOP utility by Paul SpoHore allows you to copy system tapes, find load 

MORE' Written by Attorneys Published by National Attorneys Publications locations, check for hidden messages modify program blocks, relocate pro- 

and distributed exclusively through B T Enterprises IF YOU EVER WROTE A g^^^ ^^^^^^^ g^,;, ^g^ge two tape programs together. A sort ot 'SUPERZAP' 

COMPUTER PROGRAM YOU NEFD THIS BOOK' $11,95 ,0^ ,apg ^gg^s, $24.95, 

AVAILABLE AT 

BrM-ie Computing MIcio lm>s» All SyM>n» Go CPU Compute Coip Progiam. Unllmtl.d Son John E*>t«rp(l*« 

y o il..^ ion \il.< IM 2M, Ho,Ki H).'. W Plaiw S»f^i M!, Mj,ri Sit^.'I ^1' !■-;■■-■ --P^.- P '> t^'- ■; ' ' ,^ ,_, 

B,'.UI.v M:4SII7' IkishiTi., NV \IV'A WmWi Garden H- S27HI Chail^-loTi. MA U2I2'1 J...Kh.i ^Yll/.'.^ \-,e^-m„m (..A'M!i.*f< 

Conlempoxtv Comm Cotp Steven. Rxllo Sh.ck Soft Secto. M.ArtIng 0™ni 5y«t«n.. Awocl.te. Bobi TV. Compute S.f* of Duibuiv 

■■.S.4^ L...^W.^. ■^'.^^ ^^^'l K"dU bJfMI Mid.lli' Btlt Ruad P O Bo-, b.ij ''-I 1?. Hbih D,,'.^ P O Bo- '■" t 

MasU-ii MUWMli Hlitwn^xvill.- PAl'MW GrtnVn Ciiv Ml 4Kl.ir. W. CM^e'A ^J 07IHX. W.o.,dhd.tii NY 114^1 Danbuii, (. T (K-Sld 

,.,,y, ((,, ,,|.,„ . im«|, MMi27'l \MM iiliiO^n 12011 i;i?t.'>1Kf> (212) -111 2«07 i2(V!l 744 ^.F.lt. 
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Dealer Inquiries Welcome 

Add $2 (K) S & H 
NYS res add appr tax 
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'THE SYSTEM' 




New TRS-aO Model III 

Model III, 48K 2 Siemans Disk Drive system, $1799.00. (plus 
shipping and handling) includes Dos Plus HI operating system. 

ADD DISK DRIVES 

Internal Drive #1— Includes Micro Mamlrames Controller board, 
Dual Drive Power Supply (for 2 internal disk drives). Mounting 
Hardware (for 2 internal disk drives), 40 Track Siemans Disk 
Drive, $629.95 

Internal Drive #2— Includes 40 Track Siemans Disk Drive ^2 ms 
Disk Drive, $299.95 



Memory Upgrade, 150ns, 
32K. $79.95 



Prime Chips. Add 16K, $44,95, Add 



SPECIAL!!! 

Internal Drive #1 $629.95 

Internal Drive #2 $299.95 

32K RAM Memory Chips $79.00 

All Together "iTOO^riS^ 



Includes Complete Installation Instructions! 



$849.95 



External Drive #3— Includes case (as shown above, dual power 
supply, cable, mounting hardware for 2 external drives, $429.95 
External Drive #4— (same as Internal Drive #2) 40 track disk 
drive. $299.95 

External case (no drives)— Includes case, powers supply (tor 2 
drives) cable, mounting hardware, (shown above) $179.95. 

SPECIAL!!! Dual External Drives & Case, $629.95 

NOTE: Dual Sided Drives— add $99.00 per drive 
Flippy Drives (single sided only)— add $19,95 per drive. 
Dos Plus III (3 3} Operating System, $99.95 alone, $49.95 with 
drive purchase. 



ACCESSDRIES 
Put Your Printer on a Pedestal! 

This printer stand allows you to place a stack of paper under the 
printer for neat paper stacking— Available for most printers. 

(MX-80, MX-80F/T, LPIV, etc ) $24,95 

LargersIand(MX-100, Anadex. etc.) $29.95 

Extra Shelves (Shown Above) $9.95 

MODEL I DISK DRIVE CASES 

Clear Cases lor your model I disk drives, complele with power 
supply for b-1/4 inch disk drives 

Single Drive Case $79.95 

Dual Drive Case $109.95 

Triple Drive Case $139.95 

Quad Drive Case $169.95 

Smoked Plexiglass Cases, Add $5.00/oer flrive. 

LYNX MODEMS 

The finest Auto Answer/Dial Modem on the market' This is a 
direct connect modem for your model I or III Does not require an 
RS232-C interface in your computer! Season Special. $299.-9& 

$249.95 
AMBER EASE 
Amber filter for your computer Amber has been shown to be the 
easiest on the eyes. Easy to install (Shown on computer above ) 
Season Special, All TRS-80 Models, $19.95 

TIC-TOC-80 MICROCLOCK 

A microclock tor your TRS-80 Model I Gives your computer the 
correct time and date on powerup Clock is maintained on a 
Itlhium battery for long life Plugs onto the I/O Buss of the TRS-80 
Model I and does not require any modifications for most com- 
puters Complete with extensive documentation and a disk with 
utilities. SPECIAL NOW AVAILABLE IN KIT FORM' 
Complete assembled and tested ... $99.95 

Kit with P/C board, parts and instructions $59.95 

KitwithP/C board, parts list and instructions $19.95 
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INTERFACE 



A Basic program allomng you to reach out and touch someone. 



The Communicator 



HMthklt Assembly Languaga 

Programming Course 

Th« Heath Co. 

Bsnton Harbor, Ml 

S50 

Richard C. McGan/ey 

221 Hirsch Field Dr. 
Williamsville. NY 14221 



After you have mastered Basic, you may 
decide to try a second language. The 
cheapest and most powerful language 
available to TRS-80 users is the Assembly 
language. 

Heathkit offers an 8080-based training 
course (Model 1 108) on Assembly program- 
ming for $50. It makes no assumptions 
about previous knowledge and starts with 
the absolute basics of digital computer pro- 
gramming. It is well arranged and takes 
everything in nice, easy steps. At times I 
found it too slow, and every now and then I 
felt insulted ttiat I was taken for a dummy. 
But that is what I needed. With previous 
courses I lacked the opportunity to ask 
questions. The Heathkit course answered 
those questions before I had to ask them. 
This time I was really learning Assembly 
programming. 

The Course 

The Heathkit Assembly Language Pro- 
gramming Course is divided into 10 concise 
lessons. Chapter one is an introduction to 
digital computers. After completing chap- 
ter one you are started on your way to 
building a working Assembly program. 
Each chapter introduces new instructions, 
explains how they work and exactly what 
they can do. They are then incorporated in- 
to the program you are building. You are led 
along the logic trail and learn the mathe- 
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matics behind what is happening without 
being aware of it. 

This approach to Assembly program 
ming is what makes the course so suc- 
cessful. Along with the lessons is a 
workbook that is indispensible. The 
workbook lets you practice what you are 
learning. 

which contain information on number sys- 
tems and mnemonics. The appendices are 
great reference tools; I still use them 
regularly. 

Another important feature is the final ex- 
am. You might think that having the book 
would make the test easy, but that isn't the 
case. In fact, the test is written with the 
book in mind. The answers require that you 
know, in intimate detail, what is happening 
behind the instructions. 

The Lesson Plan 

Each individual lesson is arranged in the 
same format as the overall course. This for- 
mat aids the student in following the course 
and also provides a clear starting point 
after the student returns from a study 
break. 

Each lesson opens with a table of con- 
tents. It breaks the lesson down into ap- 
proximately nine major parts. The first part 
of each lesson is the introduction. This tells 
what the goal of the new lesson is and what 
you should have learned from the last les- 
son. It also previews the way in which the 
old material will be integrated into the new 
lesson. It there are any points of major in- 
terest that will be assumed in the new les- 
son, the introduction tells the student and 
directs him to the correct place in the 
course to get the brush-up he might need. 

The second part of the lesson is the unit 
Objectives. This simple, but important, pad 
of the lesson enumerates what you will 
learn in the coming lesson. Usually four or 



five points long, the unit objectives section 
tells you what the course considers most 
important. Invariably you will find items 
from the unit objectives section of one 
lesson listed as important points to know in 
the introduction section of the following 
lessons. 

Next comes the unit activity guide. This 
breaks the lesson into major topics and 
lists them in order. It also allows you to 
record the time you spend on each section. 
The unit activity guide is a great aid in keep- 
ing track of your progress and also in 
locating a starting point when you return 
from a study break. 

The meat of each lesson is the course 
material. Each lesson starts off slowly, with 
an explanation of what you are learning and 
how it is used. The lessons are designed to 
accept interaction with the student, so you 
can study at your computer. 

Any part of a lesson that introduces a 
new or exceptionally important concept is 
highlighted by its own subsection. A topic, 
such as flow-charting, can be introduced in 
the middle of a lesson without losing the 
thread of the lesson. This approach is used 
frequently in the course and is very well 
handled. Since computer programming re- 
quires so much background knowledge, the 
average student many become bored with 
other courses before he ever reaches the 
actual programming lessons. This is not the 
case here since the Heathkit course is de- 
signed to interject the background material 
when it is necessary to know it. 

In many sections, the student is asked to 
write the required program section without 
help from the course. The lesson will then 
show how the author would write the pro- 
gram, but stresses that as long as the stu- 
dent's program works it is correct. 

Not only is the program written from 
scratch, it is improved once it is working. 
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MOD-II HARD DISKS 

AVAILABLE NOW 

WHY WAIT FOR RADIO SHACK 

Micro Mainframe riDw supports the- Modt'1-II* Computer s>'stc'm with our hi^h qualit\' add nn 
Winchester disk systenxs. ?^ch of the disk s\'stems a\'ailahlL' offers the same hijih quahty Krror 
Correctinji omtrollers used in our Modei-I' and Model-Ill" systems. 

Features 

• 5 Mejiabyto to 120 Megabyte s>stenis supported (formatted capacity!. \\"ith total system 
capacities from 10 Me^ab\tes to 480 Megabytes. 

• Oasis* operating system available (Model-II* only) 

• TRSDOS* compatible operating systems available (all models) 

• ModeM* and Model-Ill* unit prices include operating system. 

• Error Correction on all controllers for years of trouble h-ee operation (up to four bit burst). 

• Simple interface to the host computer through one of our host adapters. 

• Models a\ailable soon for Apple* and other computer systems. 

• Support for more Winchester systems than any other manufacturer. 

System Pricing 
Removable Cartridge Winchesters 

MMF-lOORl Model I or Model-Ill version S5350.00 

MMF-100R2 Model-II version $5395.00 

MMF-IOOA Apple Version $5350.00 

5 Megabyte Desktop System 

Prices Reduced 

MMK-3H, 48K system w/Floppy backup $5995.00 

Other Systems 

10 Megabyte Fixed Hard-disk systems begin at $5295.00 

120 Megah\1e Fixed Hard-disk systems begin at $7995.00 

Model-Ill* Fhjppy Controller w 'installation kit $279.95 

Why become kK'ked into a proprietary sj-stem from one manufacturer, when Micro Mainframe 
supports a total of 15 drive manufacturers. When a new drive become.^ available, you need only to 
purcliase that dri\e and controller to upgrade your system. The software and Host Adapter works 
with the new drive package, thus allowing minimum upgrade cost. 

Call for the location of your nearest Micro Mainframe Dealer. 
Dealer inquiries invited. 

MICROMAINFRAME .. 

714 Alhambra Blvd. • Sacramento. Ca 95816 
(916)447-7048 

* (»asisisit..pvnilti! nir'tiastOnvSyili-ms 

■ MimIvU 1, 11,^ III are Tandy Itadf marks 

■ AppWisattadunuikiil .XppltCiirp. 
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After the goal program is written and work- 
ing, the course puts on the bandages and 
gingerbread. Bandages correct program 
routines to make them more efficient, and 
rewrite routines are not duplicated but used 
over each time new parameters are en- 
countered. Gingerbread Is the dressing up 
stage that makes the program more Interac- 
tive with the computer operator. 

An added benefit is an excellent Assem- 
bly number base conversion program and a 
monitor program that simulates CPU opera- 
tion so you can see what is going on in the 
computer. You iearn while writing and de- 
bugging these programs, and you continue 
to learn while using them. 

After the lesson content has been de- 
voured, there is a section of exercises. 
These are short problems that review mate- 
rial covered in the lesson just completed. If 
you cannot solve the exercise, you can go 
back to the lesson and get what you 



missed. Each exercise section has a cor- 
responding section in the workbook. If you 
successfully complete both exercise sec- 
tions, you know your stuff. 

The unit exams are short and to the point. 
If you completed the lesson and the exer- 
cises you will do just fine on the exam. You 
can always look back into the lesson if 
something is not clear. 

If all else fails, you can look at the unit ex- 
am answers. Once you see what you are do- 
ing wrong, the haze will clear. These are the 
answers to the questions any student 
would ask after taking the lesson. 

Each lesson has an appendix. This is usu- 
ally 3 listing of the program the student is 
working on as it should appear up to that 
point. The appendices also contain subrou- 
tines that are of interest in the program that 
is under construction. Use of the appen- 
dices allows the student to catch up on the 
program under construction if he has fallen 



ACI(B2) 

ADCU 

ADC r 

ADD M 

ADDr 

ADI(B2) 

ANAM 

ANAr 

ANHB2) 

CALL 

CC<82MB3) 

CM(B2)(B3) 

CMA 

CMC 

CMPU 

CMPt 

CNC<B2)(B3) 

CNZ(B2X83) 

CP(B2KB^ 

CPe(B2XB3| 

CPl(B2) 

CPO(B2)(B3) 

CZ(B2XB3) 

DAA 

DAOB 

DADO 

DAD H 

DADSP 

DORM 

OCRf 

OCXB 

OCXD 

OCXH 

DCXSP 

Dl 

El 

HALT 

IN(B2) 

INRM 

INRf 

INXB 

INXD 

INX H 

INXSP 

JC<B2XB3| 

JM(B2)(B3| 

JUP(B2)(B3| 

JNC(B2XB3) 

JNZ182)(B3| 

JP1B2XB3I 

JPE(B2KB3) 

JPO(B2KB3) 

JZ{B2)(B31 

LDA(B2XB3) 

LOAXB 



Z-SO 

AOCA.n 
ADC A.(HL) 

ADCA.f 

ADD A,(HL) 

ADD A,i 

ADD A,n 

AND(HL) 

ANDr 

AND n 

CALL fin 

CALL C.nn 

CALL M.nn 

CPL 

CCF 

CP(HL) 

CPr 

CALL NC.nn 

CALL NZ,nn 

CAU P,nn 

CALL PE.no 

CPr 

CALL PO.nn 

CALL Z:.nn 

DAA 

ADD HL.BC 

ADDHL.DE 

ADDHL,HL 

ADD HL,SP 

DEQHL) 

DECr 

OeCBC 

DECOE 

DECHL 

DECSP 

Dl 

El 

HLT 

IN A,iti| 

INC(HL) 

INCr 

INC 80 

INCDE 

INCHL 

INCSP 

JP c.nn 

JPM.nn 

JP nn 

JPNC.nn 

JP NZ.nn 

JP P,nr 

JP PE.nn 

JP PO.NN 

JPZ,nn 

LD A,(nn) 

LD A.(BC) 



8080 



LDAXD 


LD A,{DE) 


LH LD(B2)(B3) 


LO HL(nn| 


LXI B(B2)(B3) 


LD BC.nn 


LD<D(B2)(B3) 


LD DE nn 


LXI M<B2)(B3) 


LD HL,nn 


LXI SP(B2HB3) 


LD SP.nn 


MOV M,r 


LO|HU,r 


MOV r.M 


LD r.(HD 


MOV r 1 ,r2 


LD f ,r1 


UVI M 


LD(HLl.n 


MVI r.|B2] 


LDf.n 


NOP 


NOP 


ORAM 


OR(HL) 


ORAr 


ORr 


0RI(B2) 


ORn 


OUT(B2) 


OUT(n),A 


PCHL 


JP(HL) 


POPB 


POPBC 


POPD 


POPDE 


POPH 


POPHL 


POPPSW 


POPAF 


PUSH B 


PUSHBC 


PUSH 


PUSHDE 


PUSHH 


PUSH HL 


PUSH PSW 


PUSH AF 


RAL 


RLA 


RAR 


RRA 


RC 


RETC 


RET 


RET 


RLC 


RLCA 


RM 


RETM 


RNC 


RETNC 


RN2 


RETNZ 


RP 


RETP 


RPE 


RETPE 


RPO 


HETPO 


RRC 


RRCA 


RST 


RSTP 


R2 


RFTZ 


SBBU 


SBC A,|HL) 


SBBr 


SBCA.r 


SHLD(B2XB3l 


LD(nni,HL 


SPHL 


LD SP.HL 


STA|B2)(B3) 


LDlnn).A 


ST AX 8 


LD(BC|.A 


STAXD 


LD<DE|,A 


STC 


SCF 


SU8M 


SUB(HL1 


SUBr 


SUBr 


SU<(B2| 


SUBn 


XCHG 


EX DE.HL 


XRAM 


XOR (HL| 


XRA r 


XORr 


XRI(B2) 


XORn 


XTHL 


EX(SP),HL 



Table 1. 



behind. Also, after a break in the study rou- 
tine, a review of the appendix of the pre- 
ceedlng lesson will help bring the student 
up to date. 

The Final Exam 

When you get the course you also receive 
a sealed final exam. It is tough. The final is 
as comprehensive as the course. Once you 
finish the exam you can mail it to Heathkit 
and have it scored. If you pass you receive 
Heathkit continuing education credits. 

How Long Does the Courae Take 

I spent approximately 15 hours with the 
course before I felt I had completed it. 
Almost anyone could finish the course in 
less than 30 hours, most in less than 20. 
How much Assembly experience you take 
Into the course will be a factor. The impor- 
tant thing is that you really don't have to 
rush. 

Problems 

There are two major problems with the 
courses. Problem one is that the Heathkit 
course is not Z-80 Assembly rather, but 
8080/8085 Assembly. Z-80 is an upgraded 
version of 8080 and 8080 will work just fine 
on the Z-80 system. However, the 
mnemonics are different (i.e., 8080 JMP for 
jump is JP in Z-80), and a compiler that 
handles 8080 is necessary. 

If you have a disk Editor/Assembler (Ra- 
dio Shack Microsoft), you can compile 8080 
mnemonics with no problem. If not, it will be 
necessary to convert 8080 to corresponding 
Z-80 mnemonics before compiling. Table 1 
is a conversion chart. 

Once you have overcome the mnemonics 
problem, you may wish to use the greater- 
powered Z-80 instructions that do not have 
any corresponding 8080 instructions. When 
you understand Assembly instructions, you 
can simply add the new Z-80 mnemonics to 
your vocabulary and pick out the tine points 
of their operation from the numerous Z-80 
publications. 

Problem two is no more formidable than 
the first. Since you are likely to be working 
on a computer other than a Heathkit, you 
will find some incompatibilities. The course 
points out what they will be, but you must 
find the solutions. An example is video out- 
put. The Heathkit computer uses a port out- 
put for getting data on the screen. TRS-80 
uses an addressed screen (memory 
mapped). I refer you to 80 Microcomputing 
for the answer. If you look in back issues 
you will see articles about TRS-80 ROM sub- 
routines. If you set up the video output the 
same as in the lesson and then substitute a 
Call to a video subroutine (i.e.,33H) for the 
Out (port) instruction in the program, your 
problem is solved. 

You will run into this problem in other 
areas such as with keyboard scan, but the 
answer is the same. Simply use a ROM 
routine or write your own subroutine. 

Heathkit certainly deserves credit for 
publishing this fine course, but the real 
credit goes to the author, Williard I. Nico.l 
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WE WILL NOT BE UNDERSOLD 



DISK DRIVES 



FOR TRSSO* Model I 

CCMOO 5V4',40Track(102K) $299 

ADD-ON DRIVES FOR ZENITH Z-89 
CCI-189 5'-«'",40TracKil02K| J389 

Z- 87 Dual 5 'u ' system $995 



External card edge and power supply included. 90 day warranly/one 
year on power supply 

CORVUS 5mg $3089 lOmg $4488 Mirror $«99 

RAW DRIVES 8-SHUGART801R $399 

5 %- TAN DON $CALL POWER SUPPLIES $ CALL 




DISKETTES - box of to 

5V«' Max*ll $40 

r Maxell $45 

PLASTIC FILE BOX-Holds 50 5V4' diskettes 
PLASTIC LIBRARY CASE SV*' $3.00 

HEAD CLEANING DISKETTE 
FLOPPY SAVER $10^ 

16K RAM KITS 

200ns tor TRS-80.*Apple II, (specify); 

COMPUTERS/SYSTEMS 

ALTOS ACS8000 Series 

ZENITH 48K, all-in-one computer 

ATARI 400 $ 359 

MATTEL INTELLIVISION 

APPLE PERIPHERALS 

TERMINALS 

ADOS Viewpoint 

ZENITH Z19 

TELEVIDEO 910 $ 55» 920C $729 

IBM 3101-10 



BASFf Verba ttm 
BASF/ Verbatim 

8" 

RINGS 



$28^ 
VXJOO 
$19.00 
$ 4.00 
$25.00 
$ 6.95 



2 tor $37 $19 

Jumpers $2.50 



800 



950 



$CALL 
$2149 
$ 789 
$ 259 

$CALL 



SCALL 
$ 725 
$ 929 

$1189 



S-100 CALIFORNIA COMPUTER SYSTEMS 



MAINFRAME 
64KRAM 



$349 
$569 



Z80CPU $ 239 

FLOPPY DISC CNTRL $ 339 



PRINTERS 




NEC SPINWRITER 

7710 R.O. Par 
7710 R.O. Parw/tractor 
7720 KSR w/tractor 
7730 R.O, Ser 
7730 ROSer w/tractor 
NEW 3500 Series 
MX-80 MXSOFT 



EPSON MX-70 

PAPER TIGER 

IDS 445 Graphics & 2K buffer 

IDS 460 Graphics & 2K buffer 

IDS 560 Graphics 

ACCESSORIES 



ANADEX 

OKI DATA 
MIcroline 80 
Microline 62 
Microline 83 



DP-8000 $849 



MXlOO 



DP -9500/01 



Friction & pin feed 
Friction & pinfeed 
120 cps. uses up to 15" paper 
Call for new Microline series! 
CENTRONICS 739, new model with graphics 



C. ITOH 
Starwriler I 
Starwriter I 
Starwriter i 
Starwriter I 

AXIOM 

DATA SOUTH 

MONITORS 

BELL& HOWELL 
LEEDEX 

SANYO 

ZENITH 



25 cps, parallel interface 
25 cps, serial interface 
45 cps, parallel interface 
45 cps, serial interface 
GP80IVI 
180 cps 

9'B&WBHD911 



12' BS W 

13' Color 
9" B & W 

12" BS W 
13 ' Color 



$129 
$329 
$149 

$219 
$349 



$2395 
$2595 
$2795 
$2395 
$2595 
$CALL 
$CALL 

$ 639 

$ 799 

$1049 

$CALL 

$1389 

$CALL 
$CALL 
SCALL 

$ 739 

$1525 
$1620 
$1950 
$2075 
$ 319 
$CALL 



S156 

12' Green Screen $155 

12' Green Screen $238 
13" Color $399 

12' Green Screen $129 



TELECOMMUNICATIONS 



PRENTICE STAR MODEM 1 year guarantee $125 
UNIVERSAL DATA SYSTEMS UDS103LP $149 UDS103JP $215 

NOVATION CAT $139 DCAT $149 

AUTO-CAT $199 APPLE CAT II $339 

D.C. HAYES SMART/STACK MODEM $235 

MICRO-MODEM II $295 

CCI Telnet Communications Pacloge $135 

APPLE ACCESSORIES AND SOFTWARE 



INTEGRATED SYSTEM W/INTERNAL CABLES. TESTED $1975 

2P + 2SI/0 $ 269 

4 PORT SERIAL I/O $ 249 

4 PORT PARALLEL I/O $ 179 

CABLES 5CALL 

CASIO CALCULATORS 

POCKET COMPUTER FX702 $199.00 

DESK PRINTER /CALCULATOR FRIOO $ 79.95 

SCIENTIFIC CALCULATOR FX8100 $ 49.95 

GAME WATCH CA90 Plastic $ 49.95 

GAME WATCH CA901 Steel $ 69.95 

SPORT WATCH AX210 Calendar $59.95 

BUSINESS SOFTWARE 

WORDSTAR tor Apple II $ 329 

WORDSTAR for Zenith Z89 $ 329 

For tast delivery, send certified checl^s, money orders or call to arrange 
to three weeks to clear. All prices are mail order only and are subject 



Mtr byMictosoti - Mountam CompuU"^ 
VISICALC $159.00 

VISITERM $119.00 

Z-80 SOFTCARD $259.00 

KEYBOARD ENHANCER $110.00 
APPLE JOYSTICK $ 49.00 

SUPRMOD $ 25.00 

APPLE CARDS $ CALL 

SUPERCALC $199.00 

CPS MULTIFUNCTION CARD 

ENTERTAINMENT 

Mfr by On Line 



Pi-',sO'ial Software 
$159,00 



Vulex - CCS 
VISIDEX 
VISIPLOT S1 39.00 

VIDEX BOARD $249.00 

16KCARD $159.00 

SUPRFAN $ 39.00 

CCS CARDS $CALL 

ASCII EXPRESS $ 59.00 

ALF9 VOICE BOARD S149.00 
$199.00 



BroderDund 



Sinus 



California Pacific 



FLIGHT SIMULATOR $29.00 

WIZARD & PRINCESS S28.00 

MYSTERY HOUSE $24.00 

HIRES FOOTBALL $35,00 

RASTER BLASTER $25.95 

SPACE EGGS $17,95 



SARGON n 
ABM 

GORGON 
MICROPAINTER 
APPLE PANIC 
MATTEL GAMES 



$29.00 

$21.95 
$34.95 
$29.00 

$27.95 
$27,00 



direct bank wire transfers. Personal or company checks require two 
to change without notice, Call tor shipping charges. 



DEALER (NATIONAL/INTERNATIONAL) INQUIRIES INVITED Send foT FREE Catalogue 



The 



TO ORDER CALL TOLL FREE 1-800-343-6522 

TWX: 710-348-1796 Massachusetts Residents call 617/242-3361 



5 Dexter Row, Dept. M12IV1 
Charlestown, I^assachusetts 02129 
Hours 10AM-6PM (EST) Mon.-Fri. (Sal. till 5) 

'SeeUsiol ACierl^serson [)age4W 



Technical Information call 617/242-3361 
Massachusetts Residents add 5% Sales Tax 
Tandy Corporation Trademark/' Digital Researcti 



^^^^^^ 


■||HHH|H 


'master charge 


1 V/SA 
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APPLICATION 



Take your pocket rocket for a spin down the vegetable aisle. 



Sharp Marketing 



Walter J. Atkins, Jr., Ph.D. 

Otrs 4410 A 

USAF Academy. CO 80840 



The TRS-80 Pocket Computer has ush- 
ered in a new era in personal com- 
puting. This is the first full feature com- 
puter that can be used almost anywhere. 
I designed this program to simplify the 
weekly trip to the supermarket. The com- 
puter is used as a programmable calcu- 
lator; you may total purchases and auto- 
matically add sales tax. An added feature 



Is a comparison shopping function that 
allows comparison of products on a price- 
per-unit basis. 

The Program 

The program is 51 lines long and uses a 
little more than two-thirds of the Pocket 
Computer's memory. It was designed in 
modules for easy debugging. 

Lines 10-60 are the main body of the 
program. In line 25 numerical values were 
assigned to the letters C, T. and H so they 
may be used to choose different program 
functions. These letters can be entered at 
any time the computer prompts you for the 
amount. Entering H causes a branch to the 
instruction display module. Pressing C 
causes a branch to the comparison shop- 



:o 

13 

20 

25 

30 

35 

40 

45 

50 

55 

eO 

65 

70 

200 

210 

220 

230 

400 

410 

420 



Program Listing 

R-EM SHOPPEPHELPER 

REM "CCiPYRIGHTEMWl* 

REM *y,:.fln Ih(S* 

PftUSE" CHOPPER" :C— 1234567 ;T«-765432t;H"0iH—l mil 

IF ^.'i)PPINT"i:URRENT TOTRL IS »". S : IWJT" CLEAR TOTAL ■'Y/N,' ?";!$ 

IF U--Y-LET S=!J;iJ-0: ll'-N" 

PAUSE' "iPAUSE "FOR IHSTRXTIOHS" :P«JSE "TYPE H" 

PFdJSE "FC* T« fihOUHT.- 

INF-UT"i=lMOUNT -/ ^ »" .N;NH^-100: IF N— 1111.11 THEH 700 

IF H"-12345.6?G0SUB 500;GOTD 5C 

IF N«-76543,21 GOSUB 40u:GOTO 50 

HJSUB 200 

iiQTO 50 

REM ♦FtDt'fU^D'XE* 

S-S+H;IF M>0 LET O-Q+l 

IF hKO LET Q-&-1 

RETURN 

REM 'SUM* 

P«0:INPUT"flHY SALES TAX <YH''' " . I« 

IF 1»-"Y" THEN 450 



Program contmuas 



ping subprogram. Pressing T will cause 
the program to go to the totaling routine, 
where either a subtotal or a final total com- 
plete with sales tax added can be 
displayed. 

Lines 200-230 are the add module. This 
part of the progranr> will add the amount 
entered to the subtotal and count the 
number of items that have been entered. 

Lines 400-490 are the sum module. This 
part of the program will display a subtotal 
or a final total including sales tax. It also 
gives the user the option of clearing the 
total to zero at any time. 

Lines 500-570 are the comparison shop- 
ping module. This module allows the user 
to compare goods on a cost-per-unit basis. 

Lines 600-620 are used to count the 
number of items that have been entered. 

Lines 700-760 are the program instruc 
tions which are displayed whenever the H 
option is chosen. 

Lines 800-850 are used to find the total 
number of ounces to be used in computing 
the price per unit. 

Program Use 

The program is essentially self-prompt- 
ing. Whenever It asks for the Amount, any of 
the program options may be chosen. It is 
also possible to enter an operation. For ex- 
ample, if you buy four cans of peas for 22 
cents each, you can enter the amount as 4 " 
22 and the Pocket Computer will compute 
the product before adding it to the total. I 
have designed the program to accept In- 
puts in cents; this saves the trouble of 
entering a decimal point. You simply have 
to enter an amount and press Enter to have 
it added to the total. If the amount you enter 
is a negative number, it will be subtracted 
from the total and the number of Items In 
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NEC Color Monitor 

JC 1201 $319 



NEC Green 12 inch Monitor 

JB1201 $179 



NEC Friction Tractor Printer 
100 CPS (Graphics, Bi-directional) $635 



INTERTEC SUPERBflAIN 64K RAM $2799 

QD SUPEHBHAIN S2999 

NEC 5S10 SPiNWRITER (7710) S2345 

NEC 5520 SPINWRITER (7720) $2695 

NEC 5530 SPINWRITER (77301 S2345 

NEC 12" MONITOR $ 169 

NEC COLOR 12 MONITOR $ 339 
NEC PC B023 Printer 

100 CPS Tractor 4 Friclion $ B39 

OKIDATA MICROLINE-80 S 379 

OKIDATA MICROLINE-82A $ 529 

OKIDATA MICROLINE-83A S 749 

DIABLO 530 $1995 

WE CARRY THE COMPLETE 



$1139 



525 
449 
469 



APPLE II PLUS48K 

APPLE DISK w^3 3 DOS ConlroHer 
APPLE DISK wo Controller 

EPSON Mx-eo 

Interfaces 

IEEE 555 TRS-80 CABLE $35 

APPLE INTERFACE & CABLE $90 

RS-232 $70 
HAZELTINE 1420 S 799 

NORTHSTAR HORIZON II 32K OD $2925 
ANADEX DP-95O0'9501 $1199 

TELEVIDE0 912C S 699 

TELEVIDEO920C $ 729 

TELEVIDEO 950 S 929 

LINE OF ATARI SOFTWARE, PERIPHERALS AND ACCESSORIES. 



CBM 8032 COMPUTER 
CBM 8050 DISK DRIVE 
CBM 4032 COMPUTER 
CBM 4040 DISK DRIVE 
CBM 4022 
CBM ViC-20 
LEEDEX/AMDEK 100 
LEEDEX.AMDEK lOOG 
LEEDEX/AMDEK COLOR-1 

13" Color Monitor 
MICROTEK 16K RAM BOARD 

for Atari 
MICROTEK 32K 



$1149 
$1349 
$1029 
$1029 



649 
269 
139 

169 



$ 329 



79 

149 




EPSON MX-80 



DIABLO 630 



we Accept C.O.D. s • stock Shipments Same Day or Next • No Surcharge for Credit Cards • All 
Equipment Factory Fresh w/MFT warranty • we carry the complete line of Personal Software. 



EAST COAST 
1 -800-556-7586 

OMEGA SALES CO, 

12 Meeting St 

Cumberland, Rl 02864 

1-401-722-1027 



OMEGA SALES CO. 



WEST COAST 
1-800-215-5581 

OMEGA SALES CO 

3533 Old ConejO Rd «102 

Newbury Park. CA 91320 

1 805 499-3678 

CA TOLL FREE 1 800 322 1873 



^3sg 



• Sm Lilt of Aav*nis»rs on page 41S 
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"... a comparison shopping function. . . 
allows comparison of products 
on a price-per-unit basis." 



c 


— Flag to select comparison 9nopDlr>g routlna 


D 


— Number of ouoces 


H 


— Flag to select Instructions 


L 


— Number of pourtds 


N 


— Cost ot an itarri in cents 


P 


— Sales tax percentaoe 





— Number of Items entefsd 


s 


— Total cost of Items entered 


T 


— Flag to select totaling routine 


Z 


— Price per ounce 


AS 


— Unil of measure (pound or ounce) 


IS 


— Yes or no response 




Variable Table 



the Item count will be decreased by one. 

Also included in the program Is the op- 
tion of using the Pocket Computer's per- 
manent memory. This means you can inter- 
rupt your shopping, turn the computer off, 
and still maintain the total cost of items 
entered. When you again turn the com- 
puter on, the program will display the cur- 
rent total and ask If you want to clear that 
total to zero. ■ 



Program cor^unupd 




43 Q 


ll-(PtJT"iJHfiT PERCENT 'V.)' ".P 


44 


:P«f lOii 


450 


;"6»!5*P) 


460 


:PkINT-TOTML "J",USING"t«t» . M" S 


470 


INPUT"CLEl¥f TijTPLrV-H;-? " I» 


48 Ci 


;1F 1*-"V" LET S"0;&-0 


4110 


:GOSUB 600; RETURN 


500 


:R£n ♦Ctt1Pf*IS0N* 


510 


,INPUT"IJHftT PRICE ^ " N:N-N^100 


52 ii 


;If*»!JT-IS UNIT LB » OZ ■■ "R* 


530 


:IF fi«-"LE" GOSije 300 


540 


:1F ft«--OZ" 1*UT"H01.J rffri DZ ^ VC 


550 


:2-H--D 


560 


:M<INT'PRICE--OZ=", USING "Ml.fll'.Z 


570 


;N-0;RETURN 


600 


ilfEM •ITEMCOUNT* 


clC 


;FflUSE" NUMBER OF ITEMS-VQ 


620 


; RETURN 


70O 


;REI1 ♦IHi.TRUCTICPNS* 


71[) 


:FRUS£"TO ftW) fiH FlMOUNT" ;PfiUS£"T'.'PE THE RMOUHT" 


720 


;PRU3E"IN CENTS, ' 


730 


:PFPUSE-E,G, »12,95 ISVPFlUSE"ENTEPED ftS 11^5" 


74 1 


:PftUSE"rO DISPLRY TOTAL" iPfiUSE" ENTER T" 


750 


:P«JSE-TO DO COST COMFftftE" ;PflUSE-TYPE C" 


760 


;.30T0 50 


800 


:R£M*P0UNt'SOlJHCES* 


310 


;PFiUSE"VrXl tHRY ENTER L6. ": PAUSE "rtHC' OZ," 


820 


:INPiJT"HOU nflWv' LBS. ": " , L 


83 u 


.INPUT-'HOJ tWKr 02, ^ " Y 


64D 


;[f-L*16*t' 


650 


; RETURN 



CONVERT YOUR SERIAL PRINTER TO PARALLEL 



NEW MODEL UPI-3 SERIAL PRINTER INTERFACE MAKES II 
POSSIBLE TO CONNECT AN ASCII SERIAL PRINTER lO THE 
PARALLEL PRINTER PORT ON THE TRS-80. 

Sotlware compatibilitv problems are total Iv eliminated because 
the TRS-80 THINKS" that it has a parallel printer attached, 
NO MACHINE LANGUAGE DRIVER NEEDS TO BE LOADED 
INTO HIGH MEMORY BECAUSE THE DRIVER ROUTINE FOR 
THE UPI-J IS ALREADY IN THE TKS8U ROM! S( KIPSIT. PENCIl , 
RSM 2, ST80D, NEWDOS, FORTRAN. BASIC eK jll work as ,i .) 
parallel -jrinter was in uSf 

The UPI-3 IS completely self contained and ready to use, A 34 
conductor edge card connector plugs onto the parallel printer 
port of the model I Expansion Interface or onto the parallel 
printer port on the TRS-SO 111, A DB25 socket mates with the 
cable from your serial printer. The UPI-3 converts the parallel 
output of the TRS-80 printer port into serial data in both the 
RS232-C and 20 MA. loop formats. 



bd 



SPEEDWAY ELECTRONICS 

Division m Binjiv D»%hfs 

nSfaOTIMBERLAKE LANE 
NOBLESVIllE, IN 46060 
(3T 7) 842-5020 

TRS &0 IS a tiartemark nl T jrxlv 



.^275 



VISA MasterCard 




Switch selectable options include: 

• Linefeed after Carriage Return 

• Handshake polarity (RS232-C) 

• Nulls after Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per Word 
■ Parity or No parity 

• ODD or EVEN Parity 

UPI-2 for TRS60 Model II 

UPI-3 for TRS80 Model I or 3 

UPM lor use with Model 1 and RS Printer 

Interface Cable (no expansion interface required) 

Manual only (may be applied to order) 

fen day return privilege — 90 day warranty 

Shipping and Handling on all orders 

Specify BAUD rate 50-9600 BAUD 



NOW 

AVAILABLE 
FOR 
MODEL II 



S149.95 
$14995 

$15995 

$ 5.00 

$ 4.(K) 
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PROFESSIONAL 




INCOME TAX SYSTEM 

FOR TRS-80* MODEL I, II or 

For four successive years! 



Our system, running on the magnificent line of TRS-80 computers, has 
prepared thousands of lightning-fast, error-free tax returns a day in 
accounting offices nationwide. 

Now we introduce! 

SYSTEM THREE! 

SYSTEM THREE is an improved, still more interactive version — Totals W-2's and 
computes PICA overpayment — Includes "QWIKTAX," a fast tax calculator for tax 
planning — Has automated Client Billing — More! 

And, as always— 

1. Full interactive user control, in tax-form language only, line-by-line. 

2. Screen display of full 1040 and all schedules, prior to printout. 

3. All formats IRS and State approved. 

4. Schedule amounts automatically entered on Form 1040. 

5. Your Preparer's Information automatically printed at bottom of Page 2, Form 1040. 

6. Built-in Validation Check tests entire system, hardware and software. 

7. special printer adjustment routines: Margin Offset. Text Position, etc. 

8. Fills in pre-printed forms (we supply) or use overlays. Your choice. 

9. AUTOMATICALLY COMPUTES; Tax — Earned Income Credit — Maximum/Minimum Tax — Least Tax 
Method — All Percentage of Income Limitations — All Fixed Limitations. 

DOES INCOME AVERAGING IN EIGHT SECONDS! 

10. Full support through the tax season, no charge. 

11. Inexpensive yearly updates in accordance with tax-law changes, 

SYSTEM THREE comes in four modules. You select the ones you need. There is no 
system like it, for any computer, and the cost is literally nothing. In one season, our users 
have paid, out of savings, for the software and the computer. 

35-page Descriptive Manual - $7.50 

(Refundable on order) 

MINIMUM SYSTEM REQUIRED: Model I, 48K, 1 Disk Drive 

CONTRACT SERVICES ASSOCIATES „ 

706 SOUTH EUCLID • ANAHEIM, CA 92802 • TELEPHONE: (714) 635-4055 

"TBS-80 IS a tfartemarK of Tandy Corp 



• S»« List of AOvgnisers on paga 418 
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EDUCATION 



iSMU 



LOAD 80 



Practice your openings for winning form. 



The Chess Tutor 



BLACK 



8 




1 




1 




1 




■ 


7 


1 




1 




1 




1 




6 




1 




1 




1 




■ 


5 


1 




1 




1 




1 




4 




1 




1 




1 




■ 


3 


1 




1 




1 




1 


2 




1 




1 




1 




■ 


1 


1 




1 




1 




1 



A B C D E 
WHITE 

Fig. 1. Chess Notation. 
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H 



Robert J. Dowd 
326 Porter Drive 
Lynn Haven, FL 32444 

Opening theory is one of the funda- 
mentals of good chess, and many 
books have been written on the subject. 
However, it you are a casual player like me, 
you may find it difficult to stay sharp on 
your openings. 

I find studying l»oks not much fun so I 
wrote a program tor my TRS^ called 
"Chess Tutor". I designed the program to 
let me practice any of several popular open- 
ings in a true game setting. I can play either 
white or black while Chess Tutor takes the 
opposite side and checks my moves tor cor- 
rectness, requesting a new move if mine is 
in error. Chess Tutor also displays the 
board and all moves graphically on the 
screen. 
There are seven opening variations from 




the book Winning Chess Openings by Fred 
Reinteld used in Chess Tutor. They are Ruy 
Lopez. Sicilian Defense, French Defense. 
Caro-Kann Defense, Alekhine's Defense, 
Queen's Gambit Declined and Nimzo- 
indian Defense. However, due to the way 
Chess Tutor is designed, other openings or 
variations (even complete games) could just 
as easiiy be used. 

Moves are entered and displayed using a 
fairly standard algebraic notation for micro- 
computer chess. The files are represented 
by the numbers one to eight and the ranks 
by the letters A to H (see Fig. 1). For exam- 
ple, the opening move for white in Ruy 
Lopez {P-K4) would be entered E2-E4. You 
enter all moves this way except castling, 
entered 0-0 on the king's side and 0-0-0 on 
the queen's side. The design of the chess 
pieces is the same as used by Hayden's 
SARGON chess program, with the center of 
the piece indicating its actual color (see 
Fig. 2). 

Chess Tutor begins by asking you to 
select your color and the opening you want 
to practice. Once these have been ac- 
cepted, the board Is set up and displayed on 
the screen. In the upper left of the screen 
are the words You and Me. When it's your 
turn to move, an asterisk is displayed next 
to You. 

It is unnecessary to use Enter when 
entering your move, except for king-side 
castling. Chess Tutor does not recognize 
the backspace and erase character. If you 
make a mistake, complete the entry by 
pressing the Enter key. Chess Tutor will res- 
pond with Entry Error and Try Again. Then 
reenter your move. 

Once your move has been accepted, 
Chess Tutor evaluates it. It it's the correct 
move, the program updates the board 
display and makes its next move, if you 
made an incorrect move. Chess Tutor 
displays "Not the best" and "Try again". 
After three incorrect choices for the same 
move, Chess Tutor tells you the correct 
move. The game then continues from there. 

Since Chess Tutor requires almost all of 
a 16K Level II machine (see Program 
Listing) spaces and remark statements 
have been removed from the program. 
Therefore tt>e following program notes are 
provided for clarification: 
• Variables — 

P— player's color (0 = white, 1 = black). 

YM— player's move flag (1= player's 
turn). 

MV— move number. 

VM,VN— used to calculate where a piece 



". . . if you are a casual 

player like me, you may 

find it difficult to stay sharp 

on your openings." 



is to be displayed. 

CP— position to display current move 
notation. 

TY— counts number of player's incorrect 



guesses per move. 

YM$— holds the player's move entry. 

A$— used to hold each character of 
player's input. 






Black Pav 



While 




Fig. 2. Chess Piece Design. 



Program Listing. 



le DEFINTft-Z:UIHB.SlB,e) ,Ts;8,fl) , PS (25, 11) .NSSlTI ,1-SS13) 

28 CLS 

38 N9S(I1-"R11Y LOPi;z":N9S(2) ="Sli:iI.tAN DEI* ;N9S 1 3) '"t'RKNCH D^■.^^^: 

N9SH1 ^'tAHO-KANN PEF" :N9S(S1 -'rtLKKHINE'S OEF'TNISiei -■■QN'K CiAllB 

IT DEC"!N9S1 /) '"NIHZO-IND Dt:f 

48 PHINTTABl 29) "l'HESS TUTOR' : PHI NT : PRINT 

SB GS-5:i:p = 132:i:^Slfl)-":l-^Sil! ='• " : CSS I 2' - * 1 * ; i-'«S I 1) = "? " 

£• INPUT'DO YOt' WANT WHITE OK UI.AvK Ih H)":FS 

7fl IFLEFTSiPS.ll ^"W"THENP = 0E!,SElKLEFT£lP5,l' = " P" Tli ENP' 1 ELSEfcP 

Be PRINT'CHOOSE A.S OPENING" :FORI ^ITO"" : PKISTI :N'iS I 1 I tNEXT 

99 INPL'TTfl: IETtf.lOBTlJ~TTHESCI,S:GOTOBC 

ibb cls: 1fp-?thenprist^b," ¥011 we " ; el-'ifp r i st-'j , " me 

YOL: ■ ; 
lia PRINTtifct.STKISGSllS.lSl) ; 

I2B CT'1:FOHI-1TOB:FORJ-1TOB:TSII,J) =CT:BT-CT: IFl'T- ITHENCT-CT-IE 
LSECT-CTtl 
13B NEXTJ:CT-BT:NE](TI 

He iff^bthenyh-i 

16B F0Bl-lT0B:F0KJ-lT08:REACnSll, Jl :MEXTJ,I 

17 8 DATA2B,9,;:,11,2«,1B,21,8,7,19,7,19,7,19,7,19 

IBB DATA2'i,0,2 5,0,Z5,e,2 5,8,B,2'>,H,25,0,2 5,B,2b 

198 LiATA2 5,B,2i,B,25,B,2 5,0,B,2 5,B,2 5,B,2 5,9,2 5 

2BB DATA13,1 ,13,l,13,l,n,l,2,l'i,4,17,6,16,3,l* 

21 B FOBI-8TO2S:FOHJ-BT011:BEADP9lI, J) : NEXT J,! 

22 B DATA191 , 191 , 1 91 , 191 , 191 , 191 , 191 , 191 , 1 91 , 1 91 , 191 , 191 

23 B DATftl 91, 191, 1*3,17 5, 191, 191, 191, 183, 176, 17 8, 191 ,191 

2 4B DATA191, 147, 135,139,163, 191, 191 ,177,176,176,170,191 
258 DATA191,1<3,13],131,131,191 , 191 , 191 , 177 , 1 7& , 1 34 , !91 
268 DATAl 91, 1 5 9, 131, 13 9. 19 1,1 9 1,1 91 ,183, 176, 178, '91, 191 
278 DATA191 , 1S4, 129, 139, 186, 191, 191, 179, 176, 178, 1B7, 191 
2Sa DATA! 59, 14J,H5, 135, 143, 191, 181, 176, 176,1 "6. 176,191 
298 DATA191 , 191, 143, 175, 191, 191, 191,183, ITS, 17K, 101,191 
188 DATA191 , 147, 167, 155, 163, 191, 191, 177, 179, 17-t, 178, 191 

3 IB DATAl 9 l,14i, 131, 17 9, 13 1,1 9 1,1 9 1,1 91, 1 7 7, IT a, 184, 1 91 
32B DATA191, 159, 179, 15 5, 19 1,19 1,1 9 1,1 83, 17 8,1 ;H,191,l'tl 
33B DATA191, 154, 185, 155, 186, 191, 191, 179, IT 8, 17 8, 187, 191 
34B DATA159, 14 3, 14 5, 155, 143, 19 1,1 81, 17 6, 164, 172, 176, 191 
ISfl DATAl 38, 128, 17 6, 14 4, 128,128,1: a, 136, 14 1,1 4 1,1 2 8, 128 
368 DA TA128, 172, 153,164, 156, 128, 128, 142, 148, 14B, 141 ,128 
37B DATAIIS, 176, 188,140,188, 128, 138, 138, 142, 140,135, 128 
3 88 DATA12a, 168,148,164, 128, 128, 128, 136, 141, 141 ,128,128 

3 98 DATA12B, 165, 134,164, 133, 128, 128, 140, 141, 141 ,132,128 
4BB DATAl 60,176,17 4, 164, 17 6, 128, 13 8, 14 3, 14 0,1 4 2, 14 3, 128 
41 B DATAl 28, 128, 17 6, 14 4, 138, 138, 138, 136, 14 3, 14 1,1 2 8,128 

4 28 DATAl 28, 17 2, 184,1 80, 156, 138, 12 8,1 4 2, 14 3, 14 3, 14 1,1 28 
43 B DA TAl 28,17 6, 188, 18 8, 188,1 36,128,138, 14 3, 14 3, 13 5,138 
4 4B DATAl 28, 168, 1 8 8,1 88, 128,128, 128, 136, 143, 14 1,1 38, 138 

4 58 DATAl 38, 165, 198, 188,13 3, 128, 128, 148, 14 3, 14 1,1 32, 128 
468 DATAl 68, 176, IT 4, 16 4, 17 6, 128, 13 8, 143, 14 3, 1 4), 143, 128 
478 DA TAl 28, 128,1 28, 12fl, 128, 128, 128, 128, 128, 128, 128, 128 
488 V»1.15376:VI|.8 

498 FOB1-0TO1STEP-1:FOHJ-]TOB;FORK-0TO5 

588 POKEVM+VNtK,P9lBSl I , J) ,K) :POKEVH.VN*K-t6 4 , P9 I BS ( 1 , J ) , K»6J 

518 HEXTK:VH.VNt6:NEXTJ:VM-VM.138:VN-8:SEXTI 

528 VM-15376:FORI-lTOTe 

538 READCI 

548 IFCI',>99THEH530 

5 58 »EXTI:PHIWT8CP-4,N9StT81 !:GOSl!BJ110 
568 IFYH01THEH938 

578 1PYn-lTH£NIFF-8PRI)(T?8,-*-TCI,£EPRm8ie,***i 

581 TY-B:CA=fl ' 

S9B IFP-BGOSUBlllB 



Progiam continues 
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for the TRS-80 from IVicro-l^ega 



The Original GREEN SCREEN 




The e/e-pisasing QreenScrevn fits over the front of your 
TRS'BO Vnieo Display ana y/ves rot; improved contrast With 
ftcucad gtara You g0t brigf^t kjrninous green characters and 
graphics hke those teatvrM by more expmnsii/m CRT units 
Oon'f contus9 the Original GreenScrevn with a pwce of thin 
f'im stuck to the face of your video tuba, such as that atfvr- 
tisvdtiY others. The Original Grepn-Screeri is mounted in a full 
frame oerfect'y matched to the color and texture of the 
T8S-80 Video Dfsptey. it '« attached with adt^esiwe strrps 
which do not mar your unit m any way 

Ttv full frame detign of the Original Green-Scfeen 'squares 
off ' ttv face of rour vfoeo display and greatty improves the 
overait appearance of your sysrem. 

'Speciiy jvtyether tor Modal i or Modef Uli 

TMEQREEN-SCRECN ^....S1395 

Add St 50 for postage aryd handling. 



THE ULTIMATE STAR TREK PACKAGE 



^%S 




Tireit of trtvial computer games? Thts complete Star Trelt 
package win provide you with endless fascmation and 
chattenge. tn addition to the program cassette, it includes 
comprehensive instructions, a pad of 'Voyage Log ' record 
sheets, and a tree-standing "Torpedo and Manea^rtng 
Chart ' 

The package is built arour7d the latest version of Lance 
Mickius incomparaP'e Star Trek fH. a 13,000 Dyte program 
with a host of subtle and imaginative features, which in 
elude numerous dynamic and spectacular graphic displays 
Star Tre*i fll puts you m command of the Enterprise cruismg 
in a gataxy of 192 Quadrants filled wTA uncharted hazards, 
including hostile KUngons. pulsars, and black holes You 
have at your disposal scanners, various weapons and 
defense systems onboard computers, and a foyai crew 
tYou wilt need them ai' to survive the KUngons j 
Your mission is to rid the region of KUngons artd to locale 
five inhabitable planets, all within 300 staroays. before re 
turning toSfar fleet Headquarters where your overall ef fee 
tiverjess as a slarshtp commander will be scored. High 
scores are possible only with careful planning end effective 
battle tactics. The Voyage Log' sheets will guide your 
strategy and the Torpedo and fAaneuverrng Chart' will 
give you a vital edge m comltat i/fhen you errgage Wree 
Klingon ships you can't afford to mlss.t 






t?? "^ 



T»imm. C%M« w monwy oitm nc COD9 o> cnNfti cmiu tMttm «M fnoum 



/kr^yatary,\MSSSZOB 



Piogiarr. condnuea 

690 IFTV-PrKEMFP = CTHi:':yv=v.v--l 

62fl YKS^-'iFORl-DT,--; 

63P AS = INKEVE:IFAS-"7i(E:Mi3: 

6 35 IFASC,AF>13THfMFV.>;S-,>"-THEKte."'L;-£L6;L' 

6 40 IFASC.AS; .32T^L:;t 3i?e:.eefs:st -^c?-:- .r-i ■ .as; 

«59 YMS=YMS-fAS:NeilTl 

661 JFYMS='0-O'0(«Y«S-"0~O-O"TIIENCA-l:GOT07«e 

678 IFLENlYMSJ'S AND MIDS ( YHS , 3 , 1 ) -I'-'THENVIO 

6 8H CCS',)E1110:FRlS7,-'C?--l,"ENTKi LKKiir " ; : JL-5VB1111' ; r'Kl ST.'k'r--; , "TR 
V AGAIN'; :IFTV = OANTl'-l'MV=:!V -1 

690 IFP-lGOS'.'DlllO 

lOB GOTO^90 

718 Cl-ASClC.lDSiV«S,l , n )-64:Rl=ASC',MlDS(YMS,2,l) ) -ja 

720 ^:2=A3C^MIDS^Y^S.<.11 )-64:R2-ASL.'iWIDSiVMS,:-,li )-4E 

7 39 IFC3<10RC1^BOHR1.!OHR1>SOHC2- I'JHC2->80RB2>l.--aR:^HTI!f:MJLiSLBll 1 
0:CDTO6 80 

740 lFTY=CTUfNHEArF:,i':;.^£,C:-,KD,i.": 

750 lFCA=CTtlENfl20 

760 IFC1044THES'9i' 

7 70 lFVNS-->"O-O-0"ri!l,M;C'SL"ElilC:uCTi"i3L' 

780 CCSfE99B;COTl.l*;i' 

■•98 IFCIv>5BTHENCOS;'B:i10:GOTCB3i' 

SCO C0S;"BlPS0;CO7v."i9]e 

Ble IFCI^-HPHISTeLP-;- iP'61 ,C5S,C1! ; :GOTCa~CELSE67S 

029 IFCl-CSAN3C2-i;DA;;rRl=R£ANDH2=RDr!iESBll!ELSEGCSl"BllU' 

8)0 raiSTiCF-4,'»0T ThE BLST" ;: lFTi-2THENK4PRLSEGCSL'Bl ] 1?; PRINT? 

CP-4,"TRY AGAlK";:TV'~i'»l:IFP^lGCSiBlU0;G0TO59BELSE59e 

840 GOSL'B313e:FRlNTKP, 'BETTER IS" ; jCOSUBlllfl: PRINT?CP-4 ,KVI ; 

850 IFCIv44THENC3-CIELSEC3=B 

860 PRINTycP-t|P'61 ,CHRS ICS+64) +CHRS (RS + 4ei +-~-+CHRE (CD'641 *CHRS 1 

RDt48)tC5S(C3) ; 

B70 IFTSlRS,CS)-0THENNV-0SLEENV-25 

880 FORI-0TC5:POKEVH+((8-RSl ';28i»(lC3-l)"61+I,P9;NV,I) : 

890 POKEVHf |(8-RS)*12ai +1(CS~1)*61 +1 +64 ,P9 (NV, I f6) 

900 POKEVK+U8-RD)*1281+l (Cl)-l)«61 +1 , P9 (PH (TS ( RD.CDl -121 ,1) 

910 POKEVH-i-l(B-RD)*128] -UlCD-l) '61 +1 + 64 ,P9 ( PI+ (TS (RD,CD1 *12) , 1 + 6 

1 iUEXTI 

920 GOSUB1150:IFYH-BTHENYt!-l:GOTC57B 

938 PRINTee,- VjPRICTI^ie," ■!:Y11='e!BEADPI,CS,RS,CD,RD,CI 

940 IFP=lTHENG0SUBllie:HV=HV+l:PRIST^CP-4,MV; 

95B If CI=44PRIhTiK:P+6- i P*61 , "O-O-O" ; :GOSi!B990 :GOT092e 

960 lFCI=55PRIKTeCP*6-fP'6) ,- 0-0 ■ ; :GOSUBie50 :GOTO920 

970 1FCI^44THEKC3-C1ELSEC3=B 

980 PRINTKP+6-(P*61 ,CHRSlCS+64)+CHRS(RE»48)+-~-+CHRS(CD+6 41+CHR 

SlR3+48)+C5S(C3) ;: FORI -ITOlBBOiNEXT: 00X0870 

990 IF¥n-lTHEKIFP-OTHENlBlBELSE1030 

1000 lFF^BTliENlO3OELSE10ie 

1010 FOHlI"aT05:POKE1627 2+II,12a:POKE163 36+II,3 2e:POKE]62B4tII,P 

9124,11) !PCiKE:6 34S + lI,P9124,lI-f6) 

1020 POKe:629D+I1,P9(B,II) :P0KE16354*1 1 , P9 [ 6 ,11+61 :POKE16 2 96+IJ , 

128: P(1KE16 360+1 1,1 28 ;NEXTI1:RF:TURN 

1030 FORI I = BT05:POKE1 ^376+1 :,1 91 iPOKEl 5440+1 1,193: poke: 5 3 88+11, P 

9l6,;il !POKE15452H:,P9l6,II+6) 

1040 POKE153 9 4+II,P9(I4,Ill :POKE154SH+II , P9 (14 , 11+61 :POXE15 40 0+I 

I,191;POKE354f4 + n,19l!NEJ(TII:RETURN 

1850 IFYH^lTHENlFP-DTHENlB7flFLSE1090 

1060 IFP--0THENlB9OELSE107fl 

1073 FORII-=0TO5:POKE16296 + II,12a:POKE16360Tll,]28:POKE16 3a2Hl,P 

9 I 6, 11 J :POKE16366 + II,P9!6,lI+6) 

1080 rOKE163BB + Il,P9i24,IIl :POKE16372 + II,P9|24, 11 + 61 tPOKE16 314+I 

I,191:POKE1637e+II,191:NEXTII:RET'JRt. 

1091 fORII-OTO5:POKE15 4OD+II,i91:POKE15 464iII,191:POKE15406+II,P 

9(14,11) :POKE15 470-lI,P9(14,II+6) 

1110 P0KE15412*1I,P9(6,II) :POKK15476+II ,P9 16 ,11*6) : POKE1541 3+II , 

1 28 :POKE15 482+11,1 28 !KEXTi;;RETl.-RN 

Uie CP=CP+64 

1128 1FCP<=974RETURS 

1130 FOHII^-256TO960STEP64;PRINT*II,STHIKGS(15,32) ; :KEXT 

1140 CP-26a:RETURN 

1150 IFCI<,66RETURS* 

1160 1FCI=99THEN1220 

1170 IFCI^38THENCIS-"RE5IGN" 

1180 IFCI=;7THEKC1S-"HATE- 

1190 :FCIS=b6THEKCIS-"DRAWN- 

1200 IFYM"lTHENIFP-aTHENPRINTgCP,CIS;ELSEPRIKT?CP+6,CI); 

1210 IFYM-BTHENIFP-BTHENPRINTKP+6,CIE;ELSEPfiINT(*CP,CIS( 

1220 GOSUB1110;PBINTI*CP-4,"GAHE OVER! ! " ; jGOSUBl 11 

1230 PRINTeCP-4,-PLAV AGAIN"; 

1240 INPUTZS:IFLEFTS(IS,1)-'S"THEKEND 

1250 1FLEFTS(ZS,11-"Y"THEKRUN 

126t GOT0122B 

1270 DATA99 

1 28B DATA? , 5, 2, 5, 4, 0, 1, 5, 7,3, 5, B, 9, 7, 1,6, 3, 0,3, 2, 8,3, 6,0 

1290 DATAl 0,6,1,2,5,0,1,1,7,1,6,0,10,2,5,1,4,0,3,7,8,6,6,? 

1)00 DATAC, 0,0, 0,0, 55, 4,6,8,5,7, 0,8,6,1,5, 1,0, 1,2, 7, 2,^,0 

1)10 DATAl 0,1, 4, 2, 3, 0,1, 4, 7, 4, 6, 0,7, 3, 2, 3, 3, 0,3, a, a, 0,0,5'j 

1 320 DATA? ,8,2,8,3,0,3,3,6,1,5,8,10,2,3,3,2,0,1,3,7,3,5,0 

1330 DATA7,4,2,4,4,0,5,4,8,3,7 

1340 DATA99 

1 3SB DATA7 ,5, 2., 5, 4, 0,1, 3, 7, 3,5,0,9,7,1, 6, 3, 0,1, 4, 7, 4, 6,0 

136B DATA7, 4, 2, 4, 4, 0,1, 3, 5, 4, 4, 0,9, 6,), 4, 4, a, 3, 7, 8, 6, 6,0 

1370 DATA9, 2, 1,3, 3, 8, 3, 2, 8, 3, 6, 0,10, 6, 1,5, 2, 0,1, 5, 7, 5, 6,0 

13 80 DATAB, a, 0,0, 0,5 5, 1,1, 7, 1,6, 0,10, 3, 1,5, 3, a, 5, 4, a, 3, 7,0 
1390 nATA7, 6, 2. *,<,», 4. 1,8.5,7 

1400 DATfl99 

1410 DATA7 ,5,2,5,4,0,1,5,7,5,6,3,7,4,2,4,4,0,1,4,7,4,5,0 
1420 DA TA7, 5, 4, 5, 5, a, 1,3, 7, 3, 5, 7, 7,6, 2, 6, 4, 0,3, 2, 8, 3, 6, 2 
1430 DATA9, 7, 1,6, 3, 0,5, 4, 8, 2. 5, 2, 10,6,1,4, 3, 2, 1,3, 5, 4, 4, 2 
1440 DATA /, 3, 3, 4, 4, B, 4, 3, 8, 4, 7, 2, J a, 4, J, 5, 2, 0,3, 7, 8,*;, 2, 2 

1450 DATA? ,2, 2, 2, 3, 3, 3, 5, 7,6,5,8, IP, 3,1,2,2,0,4,6,. 5, 2, 4,1 
1460 DArA12,5,l,6,l, 

14 70 DATA99 

1 4 51 DATA7 ,5,2,5,4,0,1,3,7,3,6,0,:.4,2,4,4,P,1,4,7,4,5,0 
1491 0ATA9, 2, 1,3, 3, 8,1,4,5, 5, 4, a,!*, 3, 3, 5, 4, 0,4, J, 3, 6, 5, 8 
1518 nATA9,5,*,7,3,8,4,6,5,7,6 

1518 DATA99 

1520 DATA7, 5, 2, 5, 4, 0,3,7,6,6,6,8, -,5,4, 5, 5, 0,1, 6, 6, 4, 5,0 
1538 DATA? ,3, 2, J, 4, 3, 3, 4, 5, 2, 6, 8, ,4, 2, 4, 4, 0,1, 4, 7, 4, 6,0 
1 S 48 DATA? ,6,2,6,4,0,1,4,6,5,5,0,7,6,4,5,^,8,3,2,8,3,6,0 
1558 DATAle, 3, 1,5, 3, F, 4, 3, 8,6,5,0,9, 2, 1,3, 3, 0,1, 5, 7, 5, 6,0 
1560 :)ATM 0,6,1,5,2,0,5,4,8,4,7,0,9,7,1,6,3,0,0,0,0,0,0,44 
1570 DATAB, 8, 0,0, 0,55, 1,6, 7,6, 6, 0,7, 4, 4, 4, 5, 2, 3, 3, 6, 5, 5,0 

15 80 DATA9, 6, 3, 5, 5, 0,1, 6, 6, 5, 5, 0,7, 1,2, 1,4, 2, 6, 3, 8, 2,8,0 
1590 DATAl 1,4, 1,2,3, 0,4, 6, 5, 7,6, 0,8,1 ,1,4,1 

1600 DATA99 

1610 DATA?, 4, 2, 4, 4, 0,1, 4, 7, 4, 5, 0,7, 3, 2, 3, 4, 0,1, 5, 7, 5, 6,0 
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(ONLY IN CONTINENTAL U.S.) 



MODEL III DISK KITS - 

TWO JO'lrack drive kit and narcJware Comes i I* 

comoleie wtth all t^er>ec«SM^y hardware anO 2 ^ 1^ 

drpves o' your choice (MPI or TANDON 40 IhIkw-m^I 

irackl NO SOLDERING OR TRACE CUTTING 

REQUIRED' COMPLETE EASY TO FOLLOW 

INSTRUCTIONS INCLUDED S75lM ^^^.^^^^^__ 

TWO SO/lrack *ive kil and hardware Same as above 1,095.00 

ONE 40/lracii drive lirt *ith all hafflware and your choice of MPI or TANDON 40. 
track drive UNSTflUCTtONS INCLUDED) SM.M 

ONE aO'iradi Orive kit with all hardware and one MPI SO'track drive. No BolCermg' 

(INSTRUCTIONS INCLUDED] .. . BH.M 

TRS-eO MODEL 111, 48K. 2 40 Track TANDON or MPI drives 2.095.99 

TRS-M MODEL IN, 4aK, 2 80 Track MPI drives , , 2.325.M 

1 YEAR WARRANTY 

16 K MEMORY 19.95 

MODEL I. Ill APPLE AND EXIDY Instructions included. 
(MOD 1 Keyboard requires jumpers $2.00 extra) 

ARCHBOLD SPEED-UP MODIFICATION FOR MOD I 
TRS-80. RUN UP TO 300% FASTER CPU SPEED! SPEED UP 

SLOW PROGRAMS WITHOUT SOFTWARE! 45.00 

MONITORS 

Black and White Monitors 12" (TECO) 129.95 

Green Phospher Monitors 12" (TECO) 159.95 

AMDEK Black and White 12" Monitor 159.95 

AMDEK Green Phopher 1 2" Monitor 100G 189.96 

MODEL I DISK DRIVES 

These drives come complete with power supply and chassis. 
90 day warranty on disk drives. ALL DRIVES COMPLETELY 
TESTED PRIOR TO SHIPPING! 40 track drives are fully 
compatible with TRSDOS. NEWDOS-SO. LDOS etc. 
Fully compatible with the PERCOM DOUBLER and Double 
density! go track drives require MAKE-80 program to run 
regular software (SPECIAL! GET A FREE 2 DRIVE CABLE 
WHEN BUYING 2 or more DRIVESi) 

40 TRACK MPI or TANDON DRIVES 319.95 

80 TRACK MPI 439.95 

DOUBLE SIDED 80 TRACK MPI 579.95 

2 DRIVE CABLES 25.95 

4 DRIVE CABLES 35.95 

SPECIAL DOUBLE SIDED CABLES (CALL $) 

MAKE-80 CONVERT 40 TRACK TO 80 TRACK. 
(SPECIFY MOD I, III) 29.95 

DISKETTES 

SPECIAL: Brown Bag Diskettes (Verbatim) Bag oi 2o . 49.95 

SPECIAL: Brown Bag Diskettes too Quantity 214.00 

VERBATIM DATALIFE DISKETTES Bo. oi io 32.50 

VERBATIM DATALIFE DISKETTES loo Quantity 275.00 




SPECIAL DISK HOLDER 



Holds 50 Diskettes 
Reg. Price $35,95 
SPECIAL 



•21.95 



PERCOM DOUBLER II (Includes DBLDOS) Doubles storage 
on Model I disk drives. Installs in Exp. Int. in minutes' Will not 

effect normal operation! 169.95 

NEWDOS'80 (New Version 2) 139.95 

LDOS 139.95 

DOSPLUS 3 3 89.95 

(Specify Mod I or Ml) 




LYNX TELEPHONE MODEM 

AUTO/DIAL AUTO/ANSWER 
COMPLETE WITH SOFTWARE AND 
HARDWARE FOR MODELS I AND III 
The RS-232 is not needed' Completely 
assembled, LYNX MODEMS are compatible with 

ST-80 III also 299.95 

ST-80 III: Smart terminal program. Allows saving data to disk 
or sending data from disk and more! Mod I or III , 149.95 

PRINTERS 

SPECIAL: FREE CABLES AND FREE SHIPPING 
WITH ALL PRINTERS! 

CABLES FOR MODEL I EXPANSION INTERFACE, MOD III. 

or PMC-80 EXP 100 or PIF-40 only) 

PLEASE SPECIFY WHICH COMPUTER! 

HIGH QUALITY DOT MATRIX 

EPSON MX-80 (Tractor feed only) 539.95 

EPSON MX-80 FT (Tractor and Friction feed) 639.95 

EPSON MX-70 (Tractor feed only) 419.95 

EPSON MX-100(Tractorand Friction teed 14.5 wide). 695.95 

EPSON MX-80 Hi-Res Graphics Option 89.95 

Add-On Friction Feed Adaptor for MX-BO or MX-70 59.95 
OKIDATA MICROLtNE 80 (Friction and Pin feed) , , 414.95 
OKIDATA MICROLINE 82 (Friction and Pin feed) , , 597.95 
OKIDATA MICROLINE 83 697.95 

(Friction, Pin and Tractor feed 14.5") 
OKIDATA MICROLINE 82A 120 cps 625.00 

(9x9 matrix w/descenders) 
OKIDATA MICROLINE 83A 120 cps 925.00 

(9x9 matrix w/descenders) 
TRACTOR FEED ADAPTOR for 80 and 82 75.00 

LETTER QUALITY PRINTERS 

The C-itoh Daisy wheel printer is one of the finest Letter 
Quality printers we've seen WHY PAY MORE FOR LESS?"'? 
Exchange Daisy wheels to get the kind of printing fonts you 
need. 12-10 pitch. Excellent with Scripsit or Electric pencil 
Let s face it, sometimes dot matrix doesn't hack it! (You can 
use standard Diablo Carbon ribbons with the C-itoh to get 
crisp "COPY READY " printouts!) 

C-ITOH DAISY WHEEL 25 CPS 1,795.25 

C-ITOH DAISY WHEEL 45 CPS 1,995 25 

C-ITOH TRACTOR FEED 219.95 

PMC-BO COMPUTER 

JSZS^fmiii^^mS IGK LEVEL If Fully compatible with 
all TRS-eo Mod I Software 595.95 

PMC-81 COMPUTER !« LEVtL II 

wilh upper 'lower case Upper'lower case 
dnver ir ROM Auto key repeal Numeric Keypad 
* programmable keys Built in speaker 100% Mod I software compallble fln.n 
EXPANDER 100 PMC's expansiori mlerface 32K. disk controllar, printer mlerlace 

(E>pands PMC-B0'81 to 48K) 4Ba.M 

RF-MODULATOR 'or PMC or TRS-80 10 TV Hook-up Completely assprntiieo and 
lesieO IPIugs m Video pom UHF Cm 33 ::___ 38 95 

TRS>80 Disk and Othef Mysteries Book. 132 pp 22,50 

Microsoft Basic DecodeO and Other Mysteries. 312 pp 2».M 

Cjslom TBS-80 and OlHer Mysle'ies 300 pp 2S.96 



CALL TOLL FREE: 800-528-1149 



NO SURCHARGE FOR VISA MASTER CARD OH AMERICAN EXPHESSfl' 
(10% DEPOSIT REQUIRED ON C O D S OVER 1200X1 Send Cenif.ed Cfieck, 




Money Order oi Checti 



SIMITEK COMPUTER PRODUCTS inc 



4877 E SPEEDWAY 
TUCSON, AZ 85712 
(602) 323-9391 



CALL FOR 

FREE 100+ PAGE 

CATALOG!'! 



TqS-80IS ATM OF TANDV COFIP PMC-flOIS TM OF PERSONAL MICROCOMPUTERS 
PRICES AND SPECIFICATIONS ARE SUBJECT TO CHANGE WITHOUT NOTICF 



- See List ol AOvartiswrs on page 4 18 
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"If you made an incorrect move, 
Chess Tutor displays "Not the Best 
and "Try Again." 



Cl.RI— board coordinates o1 player's 
"from" move. 

C2,R2— board coordinates of player's 
"to" move. 

CA— castling indicator (1 - castling). 

PI— index into piece table, P9. 

CS.RS— source square coordinates read 
from data statements. 

CD, RD— destination square coordinates 
read from data statements. 

CI— move qualifier (read from data 
statements): 0-none. 1= + (check), 2=! 
(good move), 3-? (bad move). 44 = queen- 
side castle, 55 = king-side castle, 
66=drawn, 77 = mate, 88 = resign and 
99 = end of game. 
" Arrays — 

BS(8,8)— contains the piece codes tor in- 
itial board setup. 

TS(8,8)— indicates color of each board 
square (1 = white). 

P9(25.11)— contains graphic codes for 



each piece, read from data statements 
220-470. 

N9$(7)— contains names of openings. 

C5$(3)— contains move qualifiers (-^. ', 
?)■ 
• Data Statements— 

170-200— ptece codes for initial board 
setup. 

220-470— graphic codes for alt pieces. 
Each statement contains 12 values. The 
first six make up the top of the piece and the 
next six the bottom. 

220— empty white square. 

230-280— black pawn, rook, knight, 
bishop, queen and king on white. 

290-340— white pawn, rook, knight, 
bishop, queen and king on white. 

350-400— same as 230-280 except on 
black. 

410-460— same as 290-340 except on 
black. 

470— empty biack square. 



1270-1710— piece, move, and qualifier 
codes for each move of the seven openings. 
Each move consists of six values: piece # 
(1-12,0 if castling), two "from" coordinates, 
two "to" coordinates, and a move qualifier. 
Each move is terminated by a 99 code. Ex- 
ample, 1280 DATA 7,5,2,5,4.0,.... 



7 - white pawn 

5.3 = I'om ez 

5.4 = lo E4 

=noqualifie' 

Although Chess Tutor is developed 
around seven specific openings, you can 
add openings or even complete games by 
putting your own data statements in place 
of mine at lines 1270-1710, or by adding ad- 
ditional data statements (f you have more 
than 16K. But don't forget to change lines 
30 and 80 to account tor your changes or ad- 
ditions. ■ 



Quality Products With Support And Service For Lesslll 



16K Radio Shack Model 3 computer $839-48K for $899 
With 2 40 track drives $1890 and a RS232 for $1959 
IGKforthe Radio Shack Model 1, 3, and Apple 2+ SI6 

Percom Electric Crayon — add color and hi-res graphics to your model 1 $ 1 39 

The Connection— for Model 1 —300 baud— orig. only ft. direct connect for J 1 I 9 
Lex 1 I coupler— 300 baud— orig/ans-half/ful! duplex $ 1 29 

Omnltek 40 track drive w/p.s. ft. case $295—80 track $395—5 &. 3 ms access 

Omnltek 80 track dual head drive with p.s. and case $499 

Omnltek 8" disk drive power supply and case $69Q 

Omnitek Power Supply and Case for 5" drives $63 and for 8" drives $ 1 39 

Omnltek cables for 5" drives — 2'drive for $24 and 4-drive for $29 

Omnitek cables for 8" drives — I -drive for $24 and 2-drive for $34 

Economy 5" double density disks $24 with center rings $28 

Disks for 8" drive — double density $36 

12 ■ B&-W Leedex (Amdek) Monitor $1 1 4 and 10' BA.W APF Monitor $99 

Base 2 printer $539 C.ltoh Starwriter $1439 

Okldata Microline 80 printer $369 Tractor $50 

Okidata Microline a2A printer $499 and 83A $749— 1 20cps, uc/lc/graphics 

Call for Quotes on Epson, Apple, and Commodore equipment. 




eomnncxlor* 



Dealer inquiries invited. Mass. Residents add 5% Tax. F.O.B. Tewkobury, freight extra. M/C. Visa or check accepted. 
TRS-80 Is a reg. trademark of Tandy Corp. ^ ,o5 

Omnltek Computers International Inc., 1899 Main St., Tewksbury, Ma 01876 
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' Sometinnes a product is marketed that is of suct^ good 
quality and value that it soon becomes the stondord 
in Its class Ochestra-80 Is this kind of program 

Jim Held — 

SOMicrocorr 

Moy 1981, p CKJ 






Orchestra-80 

MUSIC SYNTHESIZER 

«p«a^ $79.95 

pim S2 00 postage and hondling 
fc. CA fe»id©ntj odd 6% soles to» 
MostefCoKl ana vm 
occepled 



«cocv«^ 



rTWA*' 



.3§SS 



ORCHeSTRA 8^ S»»t«««i:ii^ 




ft— Downloading o(Orcr>«»tro-60/ft5 F)l«i Now AvatlobW 



Photo- 80 
Cdum-SO 
Bullet-80 
Bulet-00 



(201) 790-6705 
(201)688-7117 
(203)744^644 
(216)724 1063 



Connectton-60 (415)651-4147 
Bl^let-dO (714)359 3180 



Connecfion-80 (516) 588 6836 
Comnxjn*que80 (201)092-4847 
forum 80 (303) 341-0636 

innov-eO (616)482 8401 

Bu»el 80 (408)241-0760 

M*c»oo©t R O(K><80- 70110A03> 



'he Orchestta 80 and 85 systems ate ou's'arclrng 
ocfuevemen's m cost vs Deftormonce In \f>e music 
synines'ieforeo Thevpioajceofinesouna ancJp«> 
QTom so eosi'y that novices nave I'ttle troulDle creot- 
Ing music wtth ttw* list efforts" 






SYNTHESIZE MUSIC AND PERCUSSION IN STEREO! 

• STEnEO-SepOKrtonbymstRjmentlfofex • New editing Aeo^jres cixi commancb' ^^y r^Jl J^ J»if fJ^ ft^'' 

ompte p*av tiunpot and oooe through • pi^jgj ,nto orw I6k Model i kevtxwto oi V^l Wl l"Ol rVI"0^ 

chonre* A. ctoftnet and organ ttvough e«ponskyi inrtertoce \Art.-hout vodkig ^^^A AC 

chonnet B Vou can swttch tnstiumenrs wcwionTv' ^m m^w ar 9 

from (~tvTr*n«* tn rrifinnrti nt nnw tkriAl ... . _ . ■ " ^" m m m ^m 



• STEREO -SepOKTton by mstRjmentHoe* 
ompto ptoy trumpet and oooe ttvough 
channel A. dortnet and crgan ttvough 
chonnet B Vou can swttch tnstiumenrs 
from ctxjnriet to chonnei at ony rime' 

• PEPCUSSON— Ncwvouconodaa wide 
range of percussK« lounds and ^seciol 
ertects to your music' 

• Existing OtchesTio-80 tile* tocid and ploy 
m steroc outomotlcaly* 

• Cptionai 6tti Wcxce for use wWh 
speedup rrxxJs' 



• New editing Aeotures orw conrnands' 

• Plugs nto orvy l6k Model i kevtx»rd oi 
eKponakxi interlace \wi.'hout vpKXng 
>AOnontv' 

• inctudes tape orxl dbk versions on 
cossette, ^ somple music files, manual, 
and lu#y os$emb4ed or^d tested printed 
cifcutt boondl 



plus $2.00 postage and txjndii 

(S5 for overseas otrmail) 

CA reodents odd 6% sales ten 

MosteiCofd and \te3 

accepted 




Vc^-^'^, 



.vs<v^"^^ 







^ I •■OOillQ 



WRITE FOR INfORMAriON ON: 

• Upgrading C'ctx*s*fO 80 to Orchestra 65 Switch to Stereo* 

• Greatest Hitt-Voiufnas I and H AH new mysici Reody to lood Of»d plov' 
« Orchettra-90'*- Model ill version of Orchestra 85 Agitable soorl 

• Orchestro-eO'-TheOrtginaMSyoos 



Software Affair 

858 Rubis Drtu© Sunnyvoie. CA 04087 
.^M :406)295-0ic= 



• Sot tisf of MvarfMars on pay* 41 f 



eoUiCTocQmpitUnQ,0%c*mb»TlW^ • 1S9 



REVIEW 



A mouth and ears for your 80. 



The Cognivox 



TiMCognlvox 
Voleatok 

Golata, California 
S149 

Richard C. McGarvey 
221 Hirschfield Drive 
WiHiamsville. NY 14221 



Always on the look out for a new toy to 
add life to my computer, I recently 
came across an advertisement tor a voice 
input/output periptieral called ttie 
Cognivox. I was a bit surprised at the price 
because I had looked at Radio Shack's 
Voxbox and Voice Synthesizer and they 
were more expensive. I doubted that any 
voice I/O at a price as low as Cognivox 
could be of much use. I did, however, 
decide to write tor Information on the 
Cognivox to see if Voicetek would send 
anything worthwhile. 

The return mail was indeed interesting. 
Its description of Cognivox was honest 
and direct. The brief, two-page information 
sheet was fully descriptive of both the 
benefits and the shortcomings of the 
Cognivox. There was no hard sell, and that 
increased my interest. As a result of this 
honest approach, I decided to invest the 
money and get the Cognivox. 

The Cognivox 

The advertisement (as well as the in- 
struction manual) said that Cognivox was 
fully assembled and contained all 
necessary equipment to "plug in and use." 
This Is not totally true. The only things 
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lacking in the Cognivox package (but 
available at extra cost) are the ribbon 
cable and 40-pin edge connectors needed 
to hook up the unit. Radio Shack now car- 
ries these parts and it is easier and 
cheaper to get them at your local store 
than to order them. Other than that one 
point, Cognivox is ready to use on arrival. 

The Cognivox comes with a power sup- 
ply, one microphone and a cassette con- 
taining the software to use Cognivox. The 
unit measures only 5 by 6 by 1.25 inches 
and is very light- The microphone appears 
to be of reasonable quality, and the power 
supply is made by Atari and is undoubtedly 
good quality. 

The software is designed for a f^flodel I, 
Level II computer with at least 16K. The 
operating software is very small but the 
memory requirements for the digitized 
voice data are so great (approx. 1.5K per 
second of speech) that a 16K machine has 
less than 4K left for a Basic program. I 
should also mention that although the 
advertisement specifies that up to 32 
words or phrases are available for both 
recognition and response (with separate 
vocabularies for both), a 16K machine will 
hold approximately 11 words or phrases 
unless they are very short. Word or phrase 
length is limited to a maximum of three 
seconds duration, so if you use three- 
second words or phrases at 1.5K per sec- 
ond you will need 144K to store 32 three- 
second entries. Fortunately, three 
seconds is a long time in speech, so 32K 
can store a usable vocabulary and 16Kcan 
be functional though moderate. 

The software package contains a driver 



called V0X2, two demos called PR0G2 
and Dialog (Dialog allows you to carry on a 
conversation with the computer). Also in- 
cluded are some games, a music demo 
and a program called VDUMP which will 
give a verbal output of a memory dump in 
hexadecimal. 

VOX2 is the brains of Cognivox and 
must be resident in order for Cognivox to 
operate. Its purpose is to construct tables, 
store digitized voice data and allow access 
from Basic via USR calls. V0X2 loads at 
5200H to 55FF. All of the memory above 
55FF is used as data tables and digitized 
storage. V0X2 is designed for a 16K 
machine, but there are some memory 
POKES in the user's manual that allow 
larger machines to store more data. You 
are still restricted to keeping your Basic 
programs below 520OH (20992d). For those 
with 32K or 48K there is V0X2.1 (at addi- 
tional cost) which is reassembled at 
90CX)H. This provides more Basic room and 
still gives enough upper memory for data 
storage thus increasing both the 
vocabulary and Basic program size. 



Voice Quality 

It is obvious that for $149 you are not 

going toget high-fidelity voice output from 
Cognivox. By comparison, the voice out- 
put is a little less accurate than a well pro- 
grammed synthesizer, such as the Radio 
Shack model. However, Cognivox does not 
require phoneme programming and is 
therefore easier to use. Also it responds 
with (and to) your accent, not that of a 
machine-sounding synthesizer. 



'.. this is not only a worthwhile book 
but a great book. Wy advice is to gel it 
and USE it!' William Barden Jr. 




oTHra 



132 pages 
$22.50 



Now available at 
selected jALTQN 
bookstore* 
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312 pages 
S2g.95 



Get them at your local IJG dealer! 



'It has twelve thousand one-liners 

in it, and every one is great!' 

- Dennis Kitsz. Phone orders (714) 946-5805 



TRS-HO llisk and Other M\Tteries i« the 
definitive fixit bonk for dmk une r». Writen 
by Ha^^■a^d Penninjitcm il hajt more than 
1 :U> patres of ea»y l(» read, «ntenaininf{ and 
immemcly uiteful informulitm - find out 
h»>w U> recover disk files, the layout of 
inftirmatiun »m Ihe disk, mtmor>* maps. 
prultlem soluiiuiui . . the list goes un' 

Manv readerit have >avfd days ol work 
by recovering files thai hud been unread 
able. Now in itb fourth updated printing. 
THS-80 Disk and Other MyMerie* ha*i 
Ihhmi getiiii^ rave reviewft in several mag- 
Biinw Your* for only SZZmSO Iplua «3.0(> 
fthipping. CA residents pleane add $l.3ft 
Kales taxi. 

Microsort BASIC Decoded and Other 

Mysteries i^ the complete (tuide to yuur 
l^vel II HOMfc. With over ».even thousand 
lines of comments and 6 additional chap- 
ters packe<l with information, this i» easily 
the h!t{j;ej-t.and best, book about the Level 
U KONU available. 

Exploit the full p«iwer of Microttoft 
BASIC", with the aid t>t more than 300 
pajjes of tested examples, understandable 
explanations and detailed comments. N(W 
available in a revised Mcond printing, only 
$29.93 (plus $1.00 shipping. CA residents 
add$l.HiUaleitias). 

IJ(i Computer Scrvite*. 

U»fili West Foothill Blvd.. 
.-^. I pland. CA9I7«6 
Please send me the follc»win(t 
Other MyntfrtPA: 
D TRS-NW Dink for $22..><) 
D Microsoft BASIC Decoded for $29.95 
Z The Custom THH-80 f<»r $29.95 
C BASIC Fahter and Better for $29.95 
□ The HI-'BLIB Dink for S19.9fi 
D The BFBDKM Disk for .^19 9f. 
Please add S:).O0 per b(N>k, or disk. 
fur bhippinK 

0>-ersenK airmail $8 (M) per book. 
California residents add 6"c sales tax. 

Name 

Address 

City 

State Zip 

Charne my: 

Z MasterCard Inierl»ank Code 

r Vi<ui Kxpiration Date 

Card No 

Q Check enclosed far 

~Ship('Ol)l$3 00exUa) 

Signature 
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!!!INTRODUCING!!! 
A/DD/A LAB 80 

A Real World Interface 
for your TRS-80 
MOD l&lll. Control 
motor speed & direc- 
tion, measure voltages 
— any analog to digital 
or digital to analog 
operation. 

$149.95 

SPECIALS: 

16K add on memory 

prime NEC 200 nsec $18 SO/8 

"Shades' green filter $18()0 

ATHANA quality 5'/^ floppy disk- 
ettes with hubrings in plastic 
library case 

(soft. 10. 16 sector) 

10/U25 

100/321 85 

BOOKS 
6809 assembly language prog 

$16 99 
LearningLevel II $1S95 

I he Basic Handbook $19 95 

Microsoft Basic decoded & 

other mysteries $29 95 

TRS-80 disk & 

other mysteries $22 50 



MIS -'>'• 

C-.OMFLTKRMATION, INC: 



"Sound effects programming 
is much easier tfian 
voice applications." 




ROGFR WILSON 
\<iCt PRESIDENT 

1295 CtPRESS A«EnuE 

VELBOunNC Florida 32935 
■nO'-i 2^ J 9399 
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If you have ever listened to a syn- 
thesizer, you know that it takes some get- 
ting used to before you can readily under- 
stand it. The same is true of Cognivox, but 
for a different reason. Cognivox digitizes 
your voice input and outputs the digitized 
results. In the digitizing process some of 
the distinct qualities are lost. The words 
are understandable and it a well chosen 
vocabulary is used the quality is good. 
Just don't expect exact reproduction. If 
you had the memory available to store 
megabytes then Cognivox could be 
designed to give much better quality, but I 
am very satisfied with the quality I get. 

Vocabulary Training 

Training Cognivox is a three-pass opera- 
tion that is simple to program. The user's 
manual fully describes all of the variables 
and addresses needed to institute each 
training pass as well as the single 
response pass. Individual word retraining 
is also possible so that if you get a word 
that is not too clear you can retrain it to a 
higher quality. 

The training of the Cognivox unit is very 
different trom programming a voice syn- 
thesizer. Most synthesizers require that 
each word to be spoken is first broken into 
phonemes. Phonemes are sound qualities 
that, when mixed, form a synthesized 
word. For example: Ttie word hello would 
be composed of several phonemes. The 
first would be the consonant h sound. This 
would be followed by a short e sound. The 
next phoneme would be the I sound 
phoneme. This would be followed by the 
long o sound and then the oo (as in soon) 
sound. These phonemes are programmed 
in different ways by different synthesizers. 
The more phonemes ttiat are available, the 
higher quality the speech output will be. 

The Radio Shack Voice Synthesizer 
uses 62 phonemes which produce a 
reasonable voice sound. However, it is still 
up to the programmer to decipher which 
phonemes are needed to produce a word. 
Improper phoneme use decreases ac- 
curacy of word production. 

Cognivox, on the other hand, is pro- 
grammed by speaking the vocabulary into 
the microphone and thereby training the 
Cognivox to repeat or recognize the 
vocabulary. Once spoken into the micro- 
phone three times, the vocabulary is 
memorized and stored for use. 

Documentation 

The user's manual is very well done and 
supplies all the information needed for in- 
tegrating Cognivox into your programs. 
The manual does assume that you can pro- 
gram in Basic and understand PEEK, 
POKE and USR functions. The manual also 



shows the simple steps for creating single- 
voice music and sound effects. Sound ef- 
fects programming is much easier than 
voice applications. 

The manual supplies all parameters and 
addresses that you need to program and 
run Cognivox. Nothing is hidden. About 
the only shortcoming is that there is no 
program implementing Disk Basic. (I 'I I give 
some information on that later on in this 
article.) Cassette users should also read 
the sections on relocation and Disk Basic 
use because they will give you some hints 
on how to relocate V0X2 to higher ground 
for those of you who have larger memory 
capacity. 

V0X2 Relocation 

Be sure that you have a good dis- 
assembler program before you get into the 
following alterations. A program that 
relocates rather than just moves code will 
also considerably reduce work. Your first 
step should be to make a backup of V0X2 
and work from that. Do not destroy the 
original copy! 

If you do not understand Assembly pro- 
gramming or if you don't know what I mean 
about disassemblers and relocators, then 
pass this section up and send for V0X2.1 
and use your cassette. Voicetek will come 
out with a disk-oriented system in the near 
future (probably by the time you read this). 
I have sent them all of their programs ad- 
justed for Disk Basic and have added some 
enhancements such as disk storage of 
previously trained vocabulary for reuse. 

If you have a monitor that relocates 
machine code then your work is small. A 
relocator will move V0X2 to 9000H 
(36864d) and will change ail of the obvious 
addresses to the proper new addresses. 
As an example: the address 56DDH 
becomes 94DDH (that is an upward 
change of 3E00H). But even with a 
relocator there will still be some addresses 
that will not be changed. These addresses 
are implied and cannot be distinguished 
by the relocator as an address or data. 
They must be changed manually. There are 
not very many of them and only the most 
significant byte will have to be changed. 

Many of the addresses are outside (and 
above) the V0X2 program limits of 5200H 
and 55FFH. These are data and table 
parameters and must also be changed. 
The change consists of adding 3E00H to 
each address. The 3E00H value is the dif- 
ference tjetween the old and new location. 
If you are stuck with only a data mover 
then you are in for a lot of work. You will 
havetomanually go through the entire pro- 
gram and change every address. You wilt 
need a disassembler for this so that you 
can distinguish the addresses from data 
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AMERICAN 



^ 



lift SO. MILL ST • PRYOR, OK 74761 
PHONE (918) 829-4844 



All LISTED PRICES ARE CASH OI5COl>NTEO. WE ACCEPT MC. VISA. AND COD inEOUIDCS CERTIFIED CHECK CASHIER'S CHECK OR 
CASH) FOR CMAAGE OHOERS PLEaSE ADO 3% FOR COD SEnVlCE. PLEASE ADOS%. 
OKLAHOMA nE$iOENTS PLEASE A004X SALES TAX 

TRS-80 MODEL 1 
MINI DISK DRIVES 



Ou' Mtflt D»iK Orlrti mm tMwa on l^• wvta l»noiM 
TEACMtmOitkUtil TtwTEAC Jml lMlurwMiMl>- 
fTMlad SOOO pew«r-of<-nouri m««n l<in« MIwmi I»>lur« 

Our ortvM aiw tMi<«r* ■ 'Md icr«« i^Md p«»ii>oft«r-ial 

■ band typ» peatiMf^cr Tnn tvp* d p«»titor«f tniufM 
•cctjr»i« ncad p<M>i«ning av«r ltt« f«wt-«''<l* fWdM 
wMia giving i vary Qutal no'ia-fra* raMt-Mrila oo«'«- 
itofi I' you haws an> Ooubli aboMi oar arlvaa, our ana 
yasr warr4rlv •'WtHO convirca fou tnal wt hn<Mi ttiii 
un>l la !»• *••< drwa at iha •••t ?"« oo ir>a AmatiCtP 
marii«l Th« >i ofM aaampta whtr* you car pa|i laai 
ardgtt monM 

WOOCL t 40TIIACK FULLY TM^COMPATISLf 
DISK DRIVE "•* 

MODEL I to TRACK DRIVE (RcqtitrM NCWOOtSO 
•« •qutval«nl»IH»»'» »»••">) MSSW 

NEWDOSW lVar»ian 2 0> UltM 

■ OX OF 10 VERBATIM 

DATALIFE DISKETTES S» •» 



$26$ 



COMPLETE DRIVE 
WITH POWER SUPPLY 





TRS-80 SOFTWARE 



OlSCOUHTPWCeSONTRS-M 
M ICROSOFT SOFTWARE 

■aik Compli»r - M001 1i»^ 

CPMorTRSDOSMOOS SttJS 

Fsnran-M - MOD 1 n.H 

CPM Var«k«n- MOD 2 SSS.SS 

COBOL ICPM Varfkan MOO i\ SM.M 

M«S0RT(CPMVai«to«M00 2) litJt 

"ADVENTURE (MOD I. Diak Variwnt ..IS M" 
OiympkOacattttiKtiMad i.Dlak Vatttan). ZS.OB 

TriMnsTulOf iCMa«<MVarW*nOnir> 1*00 

mu MATH ram MATH SIMP-IS Synbalto Matti 

PacAava S CaH 

Editet/ AatambMr Plwt 

(CaMalla Varttan Onty) 1S.H 

DISCOUNT PRICES 

ON OTHER SOFTWARE PRODUCTS 

FOR THETRS-M 

I HE W DOS M IVatiton 2.l> 
MOOIvrMOO I "•■"» 

1cORDOS<Anafihanaa«n«nt la Iba TRS-BO MOO 2 
TRSDOS aparaiMg sfatam i«n<«h allaw* Hm waa 
al a C0RVU8 WMwhaatM Dtoh Sr«iain}..MO.IIO 



PtootraadAf Pfoolraadw mH i:h*cK rot^r s»lp 
til' awclric pancil toH-tan or oinaf docuiTt*nis 
lor apaHirg tnd lyooflrapnical arreri. Rrool- 
r«*d*r car et>acK avafy tinflM word a< avar irta 
longati docuTiani In vf^Om 9 mtnuiai' Tha 3S,000 
word OKtionary on« ol iha largaai aMilabIa can 
ba aas'ly aiian<fad ««<l'> » wW aiiililary dwnonary 
)0 add any '>unt>a' o' '>a* words (omy ■•mlod by 
diufiMaMUl On*v St-M 

Solt-Scraan-Soll-Scraar •• a atala of I'M an ItiH 
acfaa«i laii odiior if you nava ftvar atod a fan 
■ctaaA adilof bofofa. you «<l' b« a>i>aiad ai in* 
po«ar 't givat you Soll-Scraar can iiiaraliy M<>« 
yoiinouraof wonin 0i<r...St.ts 

GramnaAk— A ipaiHng oTwcMf may '*M ba 
af oagi lo caiet^ ail ir<a eunib imslaliaa rnada by 
l^at IMI itan tfltiam •acralaryM Otarrfnatih 
cnacica <0' eao'taiitaliO'* pwnenialton, balancad 
Mraotttaaai, aro dOubiM words rTl»« The*) 
Qrammal* ai»« enacftS tot aacil tarmi or aaolsrk 
largon wd ovaruaa an« 'rlauiw) phrases 
Qranmat* alao inciudas uioltiaa lor add'f^O vouf 
(Mfi dklionaryoi misuiad wvdsaro phrasaa 
Ortl^ M.S5 



COLOR COMPUTER GAMES 
AT DISCOUNT PRICES 

PacAat Mar— Vary a>fnliar to llM populat arcade 
gafia 'Pao-Mar** In thiaaiciting gama you fiwil 
dodge the ntuncftktna who are out Is aat you 
Vety ciMl<«rtglng and trrpoaaibla lo Oaat Our 
rroBi pUyaflcompuiaf game" Ofily.. X4.iS 

Cotor Spaoa invaoara. . ..-- ■■■■ H.M 

Meieroid* ■... *'-•• 

Oama of L<ta .14.SS 

Lijrtar Landaf l^-SS 

BUY ALL 5 COLOR COMPUTER GAMES AND 

SAVE EVEN MORE' 

Alls Of the above gamat 0«>y. M.M 



f1B4Sfr4M4 

RETAIL STORE LOCATION 

souTHWOOO Plaza shopping ctr. 

PRY OR OK. 



TM TANDY CORP 



^9M 



"There are very few 
limitations on vocabulary." 



or instructions. 

The manual contains all of the 
parameters that have to be changed in 
Basic to worit in the new 9(X)0H V0X2 loca- 
tion. If V0X2 is properly changed then all 
of the supplied programs will work once 
tliose parameters are changed. In the 
relocated V0X2 there is one value that 
looks like it should be changed but actu- 
ally shouldn't. In the relocated version it 
will be at 90D4H to 90D6H. The instruction 
is LD DE,7000H. This value must remain at 
7000H. It will not be changed by the 
relocator unless your relocator has a flaw. 
Check it to be sure, because if it has been 
changed to AEOOH the relocated V0X2 will 
still work but a bug may occur in later pro- 
gramming. 

Address 901 BH in the relocated version 
sets the memory size. If you have 32K, set 
that byte to CFH. If you have 48K set it to 
FFH. You may want to preserve some high 
memory space so in either case you can 
set a slightly lower value. Remember that 
CFH and FFH are the high-order bytes of 
the top of memory for 32K and 48K respec- 
tively. The low-order byte is FFH in both 



cases. If you change the high order byte to 
CON, for example, you are creating a top 
memory of COFFH. That is 3840 bytes 
below the top of 32K memory. 

Fof Disk Users 

V0X2 is accessed by A = USR(0) code. 
Before each USR instruction there is a 
series of POKE statements, i.e., POKE 
VL,xx:POKE VH,xx:A = USR(O). VL is the 
variable assigned to the low byte of the 
USR address and VH is assigned to the 
high byte. These POKEs pass the values of 
the USR destination routine to 408EH and 
408FH respectively. The USR can then ac- 
cess the correct entry into V0X2. 

In Disk Basic we have the advantage of 
the instruction DEFUSRx = &Hnnnn. This 
allows us to bypass the POKEs {and delete 
the POKES for VL and VH) and go directly 
to the routines we need by using 
A = USRx(0). All variable assignments are 
well documented in the user manual so I 
will not repeat them. Table 1 lists the 
DEFUSRx statements as I have assigned 
them. I assigned them in numerical order 
zero to nine as they occur in the various 




96K CP/M® 

(For your -mS-SCr Model II) 
Multiple Job Executive 

Add a whole new dimension to your 
TRS-80 Model II. Let it work while you 
work!! 

ATON's unique JobStream^" CP/M 2.2, along witti additional RAM memory; allows you to 
simultanaously compile, assemtile, or link in one 64K background partition (62K TPA) while you 
edit files, and spool to the printer, and communicate wttti another computer m up to four 32K 
foreground partitions (2SK TPA). 

As you expand memory beyond 64K, you also enter the amazing world of TrackMode BIOS^" 
which not only multiplies diskene spaad up to five times, but also automatically performs read 
after write checks for the ultimate in data reliability. 

* Gain tiard disk parfornunce for a fraction of the cost — and no backup problamsl 1 1 

•Works m 32K, add RAM memory to 256K using standard Radio Shack memory boards. 

■Supports two sidad axpansion disk drivos (1.2 megabytes per diskette) 

JobStream CP/M 22 (with Z-80** Debugger) $235 

Omni Writer^" Video Text Editor $130 

Z-80 Debugger Source Code $ 50 

Package of above (a $415 value) $295 



'Software with Service" 




on 



nternational. Inc. 



Prspaid, Visa, MasterCard or COO. 
Shipping and handling axtra. 
California rasidants add 6% salas tax. 

CP/M" Digital Research. Inc 
■'"Tandy Corp '""Zilog Cofp. 
jDbSHBam, TrackMode BIOS™ ATON Intl. 
Omni Wnler'" Omngraphjcs 

260 Brooklyn Avenue, San Jose, CA 95128 
^396 (408) 286-4078 



training, recognition, dialog, retraining 
and sound generator routines. Disk users 
can eliminate the VL and VH POKEs 
because after the DEFUSRxs are assigned 
the routines can be called by DEFUSRx 
number. 

Three additional points are important 
here. First, be sure to insert a CMD"T" in 
the beginning of the Disk Basic program to 
disable the interrupts. If you do not do this 
your sound effects will be interrupted, 
causing a buzzing rather than a clear tone. 
Second, V0X2 was assembled without an 
entry point (actually an entry of OOOOH). 
That means that when you save your 
relocated V0X2 to disk you must assign an 
entry point or your disk will reboot. The 
best entry point is 402DH, which will load 
V0X2 and avoid a reboot (this is the cor- 
rect address for TRSDOS and all of the 
NEWDOS versions, I cannot be sure of 
other operating systems). Basic can then 
be entered and the programs loaded and 
run with V0X2 waiting to run. Finally, be 
sure to set your memory size to 36863. If 
you fail to do this your Basic may flow into 
V0X2, destroying it. 

If you use a tape system, the relocated 
V0X2 will allow around 20K for a Basic pro- 
gram. If you use a disk system you will lose 
much of that space to the operating 
system and Disk Basic. In my 48K I have 
about 5K Basic programming room. One 
way to overcome this is to shorten the up- 
per memory by relocating V0X2 even 
higher in memory. Your vocabulary 
storage will be reduced but your Basic 
room will be increased. I have relocated 
V0X2 at several locations so that 1 can use 
long Basic programs with small vocab- 
ularies and vice versa. You must decide on 
which trade-off to make for your applica- 
tion. 

Vocabulary and Its Use 

There are very few limitations on 
vocabulary. You can use a maximum of 
three seconds as long as you do not pause 
for more than 150 ms. Most people think 
that we speak with separations between 
words because that is how speech sounds. 
In fact there Is very little or no separation 
between words. The person hearing the 
speech mentally imposes spaces. The only 
place spaces occur are on some per- 
cussive sounds such as are created by 
using the P,T and K sounds. What this 
means Is that the phrase "How are you" 
easily fits Into a three-second input. In 
fact, phrases are reproduced more ac- 
curately than single words. 

Choosing a vocabulary can be difficult. 
Words (especially short words) are easily 
confused by Cognlvox. This is due to the 
digitizing process. "This", "its", "on" and 
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"Cognivox is a useful & fun 
addition to your computer hardware." 



"off" are very close in sound and recogni- 
tion wili decrease with use of like sounding 
words. Careful substitution such as "turn 
on" and "go off" will increase response 
recognition. Voicetek claims up to 98 per- 
cent accuracy in recognition, but I have 
found that with a well chosen vocabulary 
and a little practice I can get 100 percent 
accuracy In most of my applications. 

If you have a pumped-up CPU and are 
not operating at 1.77 MHz you will not have 
three seconds to store words. My solution 
to this is to turn off the high speed with an 



Out instruction before voice input and 
then go back to high speed. When it comes 
timefor Cognivox to speak, another Out in- 
struction slows the computer for the voice 
output and then returns to high speed. The 
easiest way to do this is to insert the slow- 
down Out instruction just before the 
DEFUSRx and the alternate Out just after 
the DEFUSRx, providing you can software 
control your CPU speed. Failure to reduce 
speed on training will limit word length 
and will cause a pause of less than 150 ms. 
to signal the end of a word. Also, failure to 



DEFUSRO = &H9000 Training cold start. a>so used in dialogue operation OEFUSFtS. 

DEFUSR1 = &H902S Speaker adaptation phaM, also uses DEFUSR2. 

DEFUSR2 = &H9029 Speaker adaptation phase with OEFUSRI. 

DEFUSR3 = 4H9035 First (raining pass, 

DEFUSR4 = &H9094 Second tralnina pass, also used in word retraining with DEFUSR7. 

0EFUSR5 := &H902D Voice response and recognition, also uses DEFUSR6. 

0EFUSR6 = &H9031 Voice respor^se and recognition, also uses DEFUSR5 

DEFUSR7 = aH9066 Word retraining, also uses DEFUSR4 

DEFUSR8 = S,H9DB8 Dialogue operation, used with DEFUSno. 

DEFUSR9-4H93D7 Tone generator— sound ellecis' 

Table 1. V0X2 DEFUSRx Assignments When Relocated to 9000H. 



reduce speed on voice output will cause 
Cognivox to sound like a tape recorder at 
high speed. The reverse error will output a 
sound similar to a tape recorder at very 
slow speed. V0X2 can, of course, be 
changed to allow the extra timing for high 
speed CPUs. The Basic solution is ade- 
quate and does not take up significant 
room. 

Conclusion 

Cognivox is a useful and fun addition to 
your computer hardware. It is the least ex- 
pensive way available to give a voice and 
ears to the computer. Cognivox is also the 
easiest voice I/O unit to program and to 
reprogram. No extensive phoneme pro- 
gramming is necessary. Some voice qual- 
ity is sacrificed, but with practice and a 
well chosen vocabulary, clarity and 
recognition improve. There Is one impor- 
tant thing to consider, however. Everyone 
does not have a Cognivox, so your pro- 
grams will be used only on your machine. 
That makes Cognivox an expensive toy but 
is well made and well worth the money if 
you have a need for it. ■ 




TRS-80 OWNERS 
^ REJOICE! 



Our professional qualrty software 
development tools let you program 
your TRS-80 with more ease and 
power ttian you ever imagined possi- 
ble. Programming will become a 
pleasure when you use our full 
screen editors. Tfiese editors are nM 
just patched up word processors. 
They have been specialty designed to 
enhance the BASIC and ASSEMBLER 
programming languages. Our 
assemblers provide full screen option 
menus to relieve you ol the burden of 
remembering command names. Confi- 
bine user oriented features like this 
with the finest and most extensive 
documentation in the industry and 
you will see why programming a 
TRS-80 is now better than aver. 



T-ZAL: TAPE BASED ASSEMBLER: Asswn- 
M to memofy or tape Create relocatable 
SYSTEM tapes' Includes retocating LOADER 
pgm 8 character symboli with XREF. 
Upgrades to disk wtien you do' 
Mod 3 Cat « 1250-20 S 49.S5 

FULL SCREEN PROGRAM TEXT EDITORS: 

AH CAU lull screen edrtors support lour way 
cursor motion and scrolling with user selec- 
table auto repeat and scroll speeds Totally 
visual character insert . delete, and change, 
BkKk move, copy delete Global Imd and 
change Editor lor BASIC also provides 
automatic line renumbering and 26 user- 
defmable macro keys 
F«r Tape and Disk BASIC: 
Mod 1 Cat ff 1010-20 S24.99 
Mod 3 Cat « 1210-20 $29.95 
For Mod 1 EOTASM source files 
Tapo Cat » 1010-30 S24.I5 
Disk Cat n 1010-31 $34.95 

(Oak nriMi tlM»»*d •* Up* | 



M-ZAL: '» DISK EDITOR/ASSEMBLER: 

Modular Assembler Language development 
syslem mcluijes lull screen text editor. muRi- 
pass assemt)ler, and object module linker 
Allows 8 character symbols and source tile 
chaimng/nesling witti 'INCLUDE cmd Full 
support lor rokicatlon and glotui symbols 
Symbol table with cross roterenco. Roq. 32K 
Disk system 

Mod 1 Cat # 1050-10 $149.00 
Mod 3 Cat « 1250-10 $149.00 

XBUG: DEBUGGING TOOL & MONITOR: 

Display/Modrly memory and regs Sat up to 
10 invisible and transparent breakpoints 
Multi-speed single step Load/Copy/Creale 
SYSTEM tapes Uses only 2 SK and can bo 
dynamically relouiad to any addreii. 
Mod 1 Cat # 1020-10 SIt.SS 
Mod 3 Cal tt 1220-10 SII.M 

Note: those products ara not tvalaUt tor 

lovol 1 machines. 

Whan ordonng specrty Model. HAM sl2a. # ol 
disks. 

Send check, money order, or MC/VISA 
numbers and expiration date to: 
Computer Applications Unlimited 
PO Box 214. Dept. EEW 
Rye, New York 10580 

N Y State residents add applicable tales tai. 
Dealer Inquiries Invited 

rii i COMPUTER 
' ^' ' APPUCATIONS 
/tm UNUMITEDtM ^107 

A Do V OU inc 

Quality Reliabilitv Service 

• IRS 80 lb a TW ol Tondy Coip 



•r $90 List at A av»rtis»rs on pag* 4 IS 



QO Microcomputing. December 1961 • 165 



/^H PROGRAM STORE 



f 



VOYAGE OF THE 

VALKYRIE 




By Ll-o LliristUiJiiei son from AOS 
Combine Ihe animation and music techniques 
pioneered by Christopher son with the chal 
lenoe of his first fast moving arcade game 
and vou have VOYAGE TO VALKYRIE- 

You speed through a magical maie quardcd by 
ferocious birds that swoop down to attack if 
you don't qet them first. To list all the play 
and options of this exciting game would take 

the 16 pages of instruction included. 

Tape (TRS 80 16K| %3».9i 

Disk (TRS-80 IbK. Apple 4aK ) $59.95 




DUEL 

«N» 

DROIDS 





By Leo Chrislopherson from Acorn 
Teach your "animated android" how to wield a 
laser swordi Leo Christopherson, author of 
"Android NIM," "Dancing Demon," "Voyage to 
Valkyrie" and other animations, has developed 
a new type of animation and high quality 
sound in this work. 

Starting out as a lowly clown, you teach your 
'droid to use a laser sword by controlling its 
movements -- advance, attack, even retreat if 
necessary. Then you enter the tournament 
against the program's skilled 'droid. Revet in 
the fanfares of the victorious - or hear the 
funeral dirges of the defeated' Entertainment 
for all ages. 

16K protected tape. ..Sn. 95 
ieK protected diak. ..$J0.9S 

BATTLE OF SHILOH 

From Strategic Simulations 

Now Civil War buffs can engage in a realistic 
simulation of a major battle. Marching through 
the war-torn countryside, strategically using 
the forests, creeks, hills for defense, you re 
create every facit of the battle on a hex -grid 
map. If you had been in charge, would we 
still be whistling "Dixie?" 

I6K tape, . .SIil.9ri 

Visit our oth*r stores: S«v*n Corners 



From Vtcd Systems 

You are silting alone at 7 AM. Your eyes are 
bloodshot as you peer into your computer's 
screen and cry, "I must be CRAZYI" K this 
has never happened to you, you've never 
tried ASYLUM, It's Med Systems most ambi- 
tious i D graphics adventure yet! 

ASYLUM places you on a cot in a small 
(padded') room. Periodically the Janitor lobs a 
hand grenade through Ihe window. What you 
do next could mean escape or disaster. 

ISK tape... SU. 95 
32K dlsk...S19.9S 

Also order DEATHMAZE 5000, Med System's 
challenging i D ma/e game. Same prices as 
above. 

FORBIDDEN PLANET I 

By Vim, Demai from Fantastic Software 
The first TALKING adventure' With skill, 
luck, and tenacity and a little help from 

your chatty TRS SO you may survive Part 

One of this multipart adventure' You don't 
need a voice synthesiser, this program talks 
to you via the cassette port. And it's a good 
thing it does, 'cause otherwise you'd get 
mighty lonesome on desolate FORBIDDEN 
PLANET. 

IBK disk. .S39. 95 

LOST COLONY 

By David Feitelberg from Acorn 
It's the world's first deep space colony and 
you are the economic manager. A remarkable 
simulation, LOST COLONY arms you with maps 
and charts as tools for resource management. 
You assign human and rotxitic labor, explore 
new land, and set production quotas. At the 
same time you must determine equitable pay 
scales and taxes. 

Communicate through your model I or III using 
full sentences or short commands. A chal 
lenging game, il might give you insight into 
reat lite management as well. 




Crush.CrumHe 
and Chomp! 

From Epyx 

It's ■ iBoniter movie. and you are Ihe 
monster' You can be The Clob, Kraken. Man- 
tra. Mechismo, Arachnis, or Coshilla -- or 
even desion your own "custom" monster (disk 
version only). This hilarious action game is 
loaded with graphics and sound as you prac- 
tice your viltany. With 6 monslers. 1 cities, 
and 5 game objectives, you get a choice of 
more than 100 possible scenarios. A monster's 
life is not all carnivorous crunching, though 
The combined resources of the police, sci 
ence, and armed forces are bent on your 
destruction. 

TRS BO (leK tape or 32K disk), Apple ( DBK 
diski . . .529.95 

TIGERS IN 

THESNOyV 

From Strategic Simulatums 

Highly sophislicated simulation of World War 
ll's Battle of the Bulge. Your troops are en- 
camped in the French forests of the Arden- 
nes, ready for the first wave of this key 
assault . The battle requires complex strat 
enies and a good grasp of the overall situa- 
tion, troops, artillary, terrain, support, and 
timing. Are you up to it ? 

16K tape.. .$21.95 

Unbelievable Realllme 30 Grsphict) 




From Sub Logic 

The wait is ovcrf If i D graphics seem im|xis 
sible on the low resolution TRS 80, you 
haven't seen this brilliant program. During 
FLIGHT SIMULATION, you instantly select 
instrument flight, radar, or a breathtaking 
pilot's eye view. But t>e sure to strap your- 
self in you're lisblo to get diiiy! 

Once you put in some air time learnino to fly 
your TRS 80, head for enemy territory and 
try to tKimb the fuel depot while fighting off 
five enemy warplanes. Good Luck! 



1GK protected tape. . .$19.95 
3IK protected disk.. ,519.95 

C«nt«r- Mis Church, VA & W. Ball Plaza ■ 6600 Security Blvd. • Baltimore, MD 



NOW FOR MODELS I & IIP 
16K tape.. .525.00 
17K disk. . .SJ3. 50 



TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202) 363-9797 



v-W 



THE PROGRAM STORE 

4300 Wisconsin Avenue NW, Dept. 8E12 Box 9609 
Washington. D.C. 20016 



MAI L ORDERS: Send check or M.O. for total purchase 
price, plus $1 .00 postage & handling. D.C. residents, add 
6% tax. Charge card custtxners: include all embossed 
informetion on card. 



Get the most from your micro with 
software and accessories from one of 
the world's largest selections. 



The 

nogram 

Store 



CALL TOLL FREE 

800424-2738 




By Sparky StarksTrom Adventure Int. 

As mercenary and qalaclic police officer, you 
musl mainlain the tondilior and control of all 
parls of your spacecraft. You sil at the con 
trols while peerinq out of Ihe ditjital space- 
view port. Suddenly something appears on 
your screen, is il a Starpirate or a friendly 
merchanl ship? You can't tell yet. and at this 
speed you may have only a fraction of a 
second to make an attack/no attack decision. 

Model I e Ml. 16K tape. .. $21.95 

Model I disk version 521.9'; 

MISSILE ATTACK 

By Philip Oliver from Adventure Int. 
Vou must use your twin silos of ABMs to fend 
off barrage after barrarje o( enemy missiles 
that rain down toward your cities. As your 
skill increases so does the difficulty and 
■peed of this machine lantiuaqe arcade game. 
Watch Ihe skies and may your aim be true! 
MISSILE: ATTACK has sound and fast moving 
graphics galore, 

IfiK tape.. .5111.95 32K di^k. . . SJO.IS 




LUNAR 



By Wall t Moncrief from Adventure Int. 
You get a vast lunar landscape, graphically 
depicted in both long range and close up. 
with many choices for landing sites. Choose a 
more difrcull site and get more points if 

you can land successfully. You have complete 
control of your LEM via main engines and 
small side thrusters. and a successful landing 
is heralded with a flag raising ceremony. 
Great oraphics and sound add lo the realtime 
challenge and fun, 

tbK tape. . .Sit. 95 
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T4f^ SCARFMAN 



From Cornsoft Gump 

Action filled arcade game that pits you against 
the monsters. Race your Scarfman around a 
maie, gotibling up scoring dots. You are pur- 
sued by five monsters : if you eal a "*" they'll 
lower their eyes and you can eat them, other 
wise they'll eat you! 

With exciting graphics and sound, SCARF 
MAN may be played using the keytward or 
Alpha Product's Joystick. WARNING: MAY BE 
HABIT FORMING' 

Tape. . .515.95 

Disk (specify mod. I o[ III) ,., 5)9.95 




VOtCE 
Sound Effects 



By Hogue £. Konyu from Biy Five 
One of the top names in TRS 80 arcade games 
adds a new dimension: voice sound effects! 
It's you against the robots in this fast- 
-moving slioot-em-up. Electrified Ua/es and 
the "Flagship" complicate things as you stalk 
the evil androids. 

The innovations built into ROBOT ATTACK 
take your TRS 80 near the limits of its capa 
bilities. You MUST see and hear it! 

16K tape 515.95 3?K disk $19.95 



INVADERS .vP*" SPACE COSMIC FIGHTER 



By Carl yult. fiom Acoi ii 

A fast machine language? approach to this 

classic (and addictive) space game. The 

aliens drop bombs, move around, and try lo 

overrun your bases. 

You choose the speed, enemy bomb frequency 

and accuracy, and how many shots and bases 

you have. Unlike other games of this type, 

you can move your base and simultaneously 

fire at the invaders. Fun for all ages and skill 

levels. It has full sound effects for ever more 

excitement . 

16K protected tape. .. .$1't.9S 
16K protected disk $20. 9S 

SUPER NOVA 

By HoiiuL' i, Konyu from Big Five 
Asteroids surround your ship. Vou must shoot 
the asteroids, as well as any of the five types 
of alien spaceships. Use your thrusters for 
full movement and rotation of your ship if 
you are overwhelmed, you can even jump to 
hyperspace! Written in fast machine code with 
superb graphics, this game is GREAT! 

IbK tape S15,95 32K disk $19.95 




By Steven Kearns from Acorn 
Gigantic antimatter rocks appear on the Tac- 
tical Display Screen of your spacecraft. You 
blast away with lasers and they just explode 
into smaller chunks. To score in this fast ar 
cade game with sound, you must destroy the 
rocks. To stay m the game at all. you must 
avoid them! 

To add to your woes , time t>ombs appear peri 
odically. If their timers reach lero BOOM! 
And if that's not enough, the aliens will be 
glad to send out some spaceships loaded with 
antimatter torpedoes. Fire thrusters to move, 
shoot laser cannon, jump to hyperspace 
anything to avoid the onslaught. One or two 
players can compete, with nine levels of diffi- 
culty . 

16K protected tape. . .519.95 

16K protected disk. . .519.95 



By Hogue !. Konyu from liiy Five 
Terrific sound, graphics and unique chal 
lenges mark this space game a winner! While 
fighting off the alien convoys - each more 
skillful than the fast yo" must keep track 

of your rocket fuel or risk explosion. Finally 
your space station appears. Can you dock 
jmmedialely . or is the station overrun by 
aliens? Find out by ordering Cosmic Fighter 
today . 

16K tape. . .515.95 32K disk. . . 519. 95 




METEOR 
MISSION 

2 



By Hogue I Konyu from Big Five 
Six astronauts are stranded on a desolate 
planet. Vou must undock from your command 
module and maneuver your rescue shuttle 
through the asteroid field to save Ihem. You 
can only save one at a time, and each landing 
burns away parts of your landing sites. 
Order this realtime action game now or live 
with the astronauts' pitiful screams forever. 
lOK tape.. .515.95 J2K disk. . . 51 9. 95 




ATTACK 
FORCE! 



By Hogue t Konyu from Big Five 

Unlike the usual "shoot-em-ups, " Attack 

Force lets you control both speed and direct 

ion as you maneuver all over the screen in 
search of the alien Ramships and Flagships. 
Enemy ships chase you everywhere, and the 
Flagships' lasers can fire in any direction! 
The Ramships can even impersonate your 
spacecraft, so don't lo<)k away even for an in- 
stant. Machine language action with sound . 

16K tape. ,.$15.95 32K disk. . . $19. 95 
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REVIEW 



A flawed first look at the business of building computers. 



The Soul of a New Machine 



The Soul Of A New Machine 

Tracy Kidder 

Atlantic Little, Brown 

293 pgs. 

$12.95 Hardcover 

Chris Brown 

80 MicTocompuiing staff 



As narrative history, Tracy Kidder's tx>ok 
The Soul Of A New Machine fails. By 
the last sentence the reader has no more in- 
sight into the principal characters and their 
dilemma than at the books beginning. I 
hesitate to say this because I like so much 
about Kidder's book; it is tempting to allow 
his shortfall simply because he is the first 
contemporary journalist with the good 
sense to take the leaders of the computer 
revolution seriously. Kidder writes with 
style and skill but the reader demands more 
than timeliness. 

The book is a first-person narrative. It 
describes the events surrounding the devel- 
opment of Data General Corporation's 
Eclipse NV/8000, 32-bit super minicomput- 
er. The story is rite with accounts of corpor- 
ate infighting, personality conflicts, the ex- 
ploitation of young engineers and the survi- 
val savvy of grizzled project managers who 
have seen it all before. In fact, the tale is the 
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Stuff of a computer adventure game: Will 
the design group get the resources to finish 
the project? Will dissension split the team 
before the debugging is over? Can Tom 
West, the aloof project manager, get his 
baby out the door with his name on it? If the 
young engineers succeed will they be re- 
warded by being allowed to do it all over 
again? 

Throughout the book the Eclipse 
development project assumes the trap- 
pings of a children's crusade. Set in the 
maze-like caverns of Data General's block 
house headquarters in Westboro, MA, the 
story details with fascinating accuracy the 
birth of a new computer. The cast of charac- 
ters is comprised of green engineers fresh 
out of school and full of enthusiasm, and 
their beleaguered supervisors. The young- 
sters divide according to function; The 
Micro Kids write the micro-code and associ- 
ated system software, the Hardy Boys de- 
termine system architecture and hardware 
designs. 

Guided by veterans of previous Data Gen- 
eral projects (and battles) the kids attempt 
the impossible; to build a state-of-the-art 
computer in less than a year. Data General's 
financial well-being is at stake; Its arch 
rival, Digital Equipment Corporation, has 
already designed and marketed its own 
super-mini, the VAX. 

Data General outpoints its competition 
by producing a 32-bit machine software- 
compatible with its earlier, 16-bit comput- 
ers ana taster at number crunching than 
DEC'S machine. The plot thickens when Ed 
DeCastro. the acerbic president of Data 
General, demands that the new machine 
function without a mode bit. Though the au- 



thor never explains what a mode bit is, he 
does hint that it is a quick and dirty way to 
make a 16-bit machine act like a 32-bit ma- 
chine and, even worse, an easy way out of 
the design dilemma. 

(For the record, a mode bit is similar to 
setting a flag in a microprocessor's condi- 
tion code register. This flag invokes a soft- 
ware instruction that tells the computer to 
Change its operating mode. A new set of in- 
structions IS laid over the old and, in the 
case of the Eclipse machine, the changes 
are devastating.) 

Kidder's attention to detail and journalis- 
tic style make the book a joy to read and. by 
contemporary standards of technical litera- 
ture, a masterpiece. Unfortunately, literary 
standards higher than those of technical lit- 
erature must be used to judge Kidder's 
work. 

The book's most glaring fault is Kidder's 
character development. The people in his 
tx>ok never become more than shadowy im- 
ages. Like the forces that drive them, the 
personae of Kidder's engineers, particularly 
project leader Tom West, lie buried below 
the surface of the narrative, 

Kidder's role in the whole project is never 
clarified. Toward the end the author says of 
his protagonist, the enigmatic Mr. West, 
"he welcomed a journalist to observe his 
team; and how it did delight him when one 
of the so-called kids remarked, 'what we're 
doing must be important if there's a writer 
covering it.'" This statement, in addition to 
the abrupt introduction of the first person 
early In the book clouds Kidder's role. His 
relationship with West and Data General is 
never clear; it is far-fetched to assume that 
he simply hung around the cubicles and 



NEW PRINTERS. NEW 
PERIPHERALS. SAME OLD RELIARLE 
qUALIT Y AND VALUE. 

1982 will find more OEM's, businesses, dealers and personal computer 
users turning to MICROTEK than ever before. 



TokWritor-l 




TekWritcr-2 



80 Column Dot 
Matrix Printer 
(Formerly BYTEWRITER-1) 

TheTekwnter-l printer is. dollar for 
dollor, the finest value in the 
industry. And we've proved il by 
comparing rhetekwriter*! lo 
the Epson MX-80. Our print speed 
is 14 lines per minute foster, our life 
expectancy is longer, Iha character 
sets ore the some, ond the 
interfoce, worronty ond printheod 
replacement cost ore oil identical,' 
But the biggest difference is the 
price. The Tekwriter-1 is about 
$300 less. 

Our extensive testing hos proved 
ttiat theTekwriter-1 mterfoces 
problem-free to the TRS-BO, the 
Apple II and the Alan 400 and 800. 

The Tekwriler-1 is lough to beol for 
performance and quolity. 

■Ootci Sou rc«. Cfwor MX-400 0|M*al>of> Manwd 



$349 




NEW! 80/132 Column 
Dot Mottix Printer 

The Tekwriler-2 is perfectly suited 
lo personal, busmess or OEM 
applications. Tekwriter-2 is 
designed to occepi single sheet, 
roll or pm feed poper It hos 
o 9-wire dot matrix impact 
print heod which produces crisp 
characters and has underlining 
capability. The printer is 
nrtonufaclured to run extremely 
quietly even while operating ot 
pack output Jevelf. 

Tekwriter-2 is especially well suited 
lo hoodie on abundance of text 
entry because of its ckito buffer 
exponsion capability to 25K This 
obrlily mokes it on enicient 
grophics generator 

Parallel mlerfoce (Centronics 
type)- Interfoces all models of 
TRS-aO, Apple, and Atori 40&S00, 
or>d most computers with 
Centronics printer mterfoce. 



$695 



Peripherals 




16K Memory Board, AMB-16 

16K 4116 RAM i200NS) 

• Assembled and tested • No 

modificotions — hordwore or 

softwore • Compatible wilh Atari 

800 

32K Memory Board, AMB-32 

3?K 4116 RAM 
(200NSI • Assembled ond 
tested • No modificatior« — 
hordwore or software • 
Compotible with Aton 4OQfi00 

Atari (RS-232) Serial 
Printer Cable 

Pre-iested«3 length- DBISto 
DB25 connectors 

Atari Parallel Printer 

Cable 

Pre-lested ^3' length • Centronics 
compatible • DB15 to Amphenol 
57-30360 

16K Apple Memory Card 

Exponds Apple II to 64K RAW 
memory Works with MICROSOFT 
Z-80 Softcord, Apple PASCAL ond 
Visicolc soHwvore. 



Quantity ond OEM dUcounte qv 



Continuing our quest for excellence. 
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9514 Chesopeake Drive 
Son Diego. CA 92123 
(714)278-0633 ^aa 

Outside CA call 
Toll Free [800] 854-1087 
TWX. 910-335-1269 
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corridors of Data General for a year while 
the project ran its course. The question 
nags and demands an explanation. 

Kidder's portrayal of the computer engin- 
eer of Ihe 80s is not flattering. The 
engineers who people his book are one-di- 
mensional—technical. They are routinely 
exploited by their employer, preoccupied 
with technology, unaware of current social 
or economic issues and generally seem like 
products of an educational system that 
puts a premium on specialization. In fair- 
ness, 1 must also say that they are young. 
The exception is Josh, an introverted 
designer who bails out of the project and 
heads for a commune in Vermont claiming 
that he will no longer deal with any unit of 
lime shorter than a season. 

Kidder's book conveys the impression 
that computer engineers over 30 years of 
age don't die, but fade away into marketing 
jobs; the fate of Project Leader West. This 
mysterious figure, who opens the book as a 
firm hand on the tiller of a storm-tossed sail- 
boat, ends up hawking computers in Data 
General's marketing office, a rather inglor- 
ious end for a renegade portrayed more at 
home in a cockpit than a cubicle. 

The author editorializes at the book's 
end. In a chapter titled "Canards" he sums 
the action and draws some conclusions in 
an attempt to supply cohesiveness to a 
book that likely evolved the way the com- 
puter he discusses has — in pieces. 

Analyzing the motives of some of his 
characters, Kidder compares the engineers 
of the Eclipse project to the stone masons 
who helped raise Gothic cathedrals 
throughout Europe. He says, "They (the 
stone masons) were building temples to 
God. It was the sort of work that gave mean- 
ing to life. That was what West and his team 
were looking for, I think." And so It seems. 
But don't most of us look for meaning and 
Importance in what we do? 

Ultimately, Kidder's engineers are like 
other mortals. They search for meaning in 
what they do, invent some where there is 
none, and make the compromises that life 
requires just to stay in business. In spite of 
the heroics, all they have done is design a 
computer. 

The Soul Of A New Machine may not be 
the definitive work of narrative history, but it 
is certainly the first serious journalistic ef- 
fort to deal with computers and the men 
and women who build them. Tracy Kidder 
removes some mystique from computer 
technology and provides insight into the 
creators of these machines. His fondness 
for things technical and his ability to com- 
municate the beauty and excitement of 
computer building are laudable. Despite its 
short-comings. The Soul Of A New Machine 
is well worth reading.! 
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LDQS DEALERS 



AriiiNM 

• Simuiek 

Tucson 8571! 1602! 323-9391 

ArhaHM 

• Micro Computei Systems. Inc 
Hotspnngs 71901 15011623-5209 

CaMwM 

• G L Technology 

Van Nuvs 91409 12131 787 063B 

• Beikeley Microcomputers 
Betkeley 94701 (4151846-7122 

• Byte Shop ot Placentia 
Ptacentia 92670 |714| 524^360 

• Byte Shop of San Diego 

San Diego 92111 (714)5658008 

• Central Campbell Computers 
Campbell 95006 (4081 370-0199 

• Computef Forum 

Santa FeSprir)gs 90670 1213)921-2111 

• Compute rignd of 1000 Oaks 
Thousarrd Oaks 91360 IB05I 495-3554 

• Dimensional Software 
Sanaieaa92117 (7141275-4243 

• Hobby Worlrl 

Northfidge 91328 (21 31 886-9200 

• Howard Industries 

Anaheim 92606 (714) 776-3443 

• J & R Inventory 

Santa Ynez 93460 1805) 688-87BI 

■ Jim's Computet Service 

Laguna Nigel 92677 (714)831 6063 

• LaiBtio Systems 

Santa Clara 95051 (4081 980-1668 

• Lobo Drrves International 
Goleta 93117 (6051 683-1576 

• Micro Computer Tech . IrK 

Santa Ana 92704 1714) 979-9923 

• Micfo Doc 

San Gabriel 91776 12131285-0534 

• Patic Computer Sales 

North Hollywood 91605 12131 762-0020 

■ R B I Cominnet 

Riverside 92505 (7)4) 359-6884 

• Santigo Technology 

Irvine 92713 1714) 551-2610 

• Teem Quest 

Palm Desert 92260 17141 340-5331 

• Wholesale Technology, Inc. 
Santa Ana 92704 1714) 979-1700 

Disbin of CohmUa 

• The Program Store 

Washmoton, DC 20016 {202| 363-9797 

Floridi 

• Adventure International 
LongwDod 32750 (308) 830-B194 

• All Systems Go 

Wintergarden 32767 (3051 877-2830 

• Computet Junction 

Ft. Lauderdale 33310 1305) 791-0580 

■ H.I.S. Computermation 
Melbourne 32901 1305)254 8399 

Idato 

• Idaho Micro Computet 

Buhl 83316 1206)543 6292 

• Thompson Sporting Goods 
Reiburg 83440 (206) 356 9245 

llliWM 

• The Byte Shop, ]ncorporated 

La Grange 60525 1312) 579 0920 
•CMS 
Chicago 60657 (3121 327-7550 

• Garcia & Associates 

Chicago 60601 (312)762 9750 

• Information Concepts 

Richton Park 60471 1312) 748-2426 

KaasM 

• Cottage Sottwaie 

Wichita 67208 (318) 668-3481 



KantHdiv 

• Computer Magic 

Louisville 40207 (502)893 9334 

LCHliStBRB 

■ The Computet Shoppe 
Metaifie 70002 1504)454-6600 

Maqrlaiid 

• The Program Store 

Ballimaie 75710 (301 1 9440200 

Musidiysatti 

■ Miller Micia Computer Service 
Natick; 01760 

■ Omniiek Systems 

Tevwksbutv 01876 (617) 851 4580 

■ Small Business Systems Group 
Wesltord 01B8B (6171692-3800 

Midiiiaii 

• The Alternate Source 

Lansing 4B910 1517)465-0344 

• AM Electronics. )nc 

Ann Aitwr 48106 1313)973-2312 

• Breeze Computing 

Berkley 48072 1313)288-9422 

• Computet Center 

Garden City 48135 (313)425-2470 

■ Comoutettand ot Kentwood 
Keniwood 49508 (616)942-2931 

• Soft Sectot Marketing, Inc 

Garden Cily 48135 (3131 425-402D 

• Tl^e 8 Bit Cornet 

Muskegon 49440 16161 722-0050 

■ Tit County Electtonics 

Fenton 48430 (313)629-5767 

Nwada 

■ HuHey Electronics 

las Vegas 89114 (7021384-5666 

Mmr Hawpiliire 

■ Ponsmottth Computer Center 
Portsmouth 03801 (6031431-7438 

■ TSE Hardside 

Milford 03055 (8001258-1790 

Ntw Jen>y 

• Computer Madness 

Engllshtown 07726 1201) 462-9696 

• Crowleys Radio Shack 
Whitehouse Station 08889 
(201)534-2722 

• J S J Electric /Radio Shack 
Hackettstown 07640 1201 ) 852-6976 

• M-T Electronics 
SpBiTa07B7I (201)729-5719 

• The Computei Forum 

Redbank 07701 (201)530-9103 

Hm* Maxica 

• Autel Electronics 

Albuquerque 87108 15051 255-6451 

• Data Base, Inc 

Albuquetque 891 12 (5051 881-5362 

NawYorti 

■ A World of Computers 

Port Chester 1 0573 (91 4) 937-8662 

• B.T. Entetprises 

Centeieach 11720 (5161981-8668 

■ Computerland oi Nassau 

Carle Place 11514 (5161742-2262 

■ Computerland of New York City 
New York 10036 1212)640-3223 

■ Computerland of White Plains 
Whtle Plains 10603 (914) 328-Oia 

• Computionics 

Spiing Valley 10977 1800)431-2818 

• Oigibyte Computers Center 

New York 10016 12121889-8130 

• Future Visions Computet Store 
Melville 11747 (516)423-7620 

• Integral Business Systems 

Jackson Heights 11370 1212) 695 6300 

• JFA Elecitooics 

Troy 12180(518)273-8411 

• Micro Images 

Flushing 11352 12121445-7124 

• Mini Micro Matt 

Syracuse 13203 (3)51 422-4467 

• John Owens Associates. Inc 
Staten Island 10305(212)448-6263 

• Programs Unlimited 

Jerico 11753 (516)997-8668 

Ohio 

■ MicfD Mini Cotnouter World, Inc 
Columbus 43213 (614)235-5813 



Oklahoma 

• The ComoutEF Stare 

Tulsa 74105 (9181 747-9333 

■ Tee! ElEcttDnics/Radio Shack 
Claremote 74017 (918)341 09B7 

• Vern Street Producls'fladio Shack 
SaoulDa 74066 (918)224-4260 

Paimsyfvaaia 

• Oamouter Analyst 

New Btiton 15066 (412! 646-9336 

• Erie Cnmouiei 

Erie 16505 1814)454-7652 

• I Systems 
Edinboro 16412 

• Stevens Elecltonic Radm Shack 
PhoenKville 19460 1215)933 3441 

■ V R Data 

FolctoH 19032 (2151461 5300 

Taiai 

• Access Unlimited 

Richaidson 75080 (214) 690-0206 

• Aetocomp 

Dallas 75232 (2141337-4346 

• AT-80 

Dallas 75211 (214)339-0498 

• Computer Sales anri Service 

Fori Worth 76101 (617)244-8052 

• Computer Shack 

Tyler 75702 (2141595-4216 

• Computers To Go 

Austin 78705 (512)472-8926 

■ Compute X 

Webstei 77596 1713)468-6022 

■ Corsair ComputeF 

Fort Worth 76101 (8171 344-8051 

• Quality Sottwaie Distrihutois 
Dallas 75229 1214) 484-5783 

• Texas Computer Setvices 
Adington 76010 (617)265 1524 

• Total Access 

Richardson 79406 1214) 234-1770 

Virviaia 

• Misosys 

Alexandiia 22303 (703) 960-2998 

Watbiiivlun 

■ 80-OS Journal 

Tacoma 96409 (2061 475-2219 
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• Galactic Software. Ltd 
Mequon 53092 (414)241-6030 

• Omega Micro 

Milwaukee 53206 (4141342 9060 

■ Petted Micro Systems 
Milwaukee 53221 14141282 4161 

Baltiuai 

■ Uicto 2000 
Btussels 

Caaada 

• Cesco Electronics, ltd 

Montreal H4P1W1 

■ Microwesi Distributing, Lli) 
North Vancouver V7P 1M6 

• Computer Shop 
London 

• Croydon Computer Center 
Thornior, Heath. Surrey 

• Calisto Comouters, Ltd 
Birmingham B1 IBF 

• Molimerx, Ltd. 
Sussex 

• D & J House L T □ 
Dorset 

• Q-Tek Systems L T.D. 
Sivenage, Hem 

• P J Equipment LTD 
Guildford, Suney 

• Thomas Wnghl Bradford, Ltd. 
Bradlord, West York B04 6B2 



■ Graphic 
93100 Montreuil 

HoHaad 

• Software Import Brabant 
Endoven 

Nathwiaad 

• Comouter Collecvef 
1017 AP Amsterdam 
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Now for theTRS-80 Models I & 




DOUBLE Stded & DOUBLE Density support 

AUTOMATIC Density recognrtion. 

35. 40. 77. 80 and any other tracK counts are supported 

All available drive stepping rates are supported. 

Hard Drive support can be HANDLED AS A SINGLE DRIVE. 

Hard drrve partitioning one drive can act as up to six 

Intermix 5", 8" and Hard drives, up to a total o1 8 drives. 

Compartible with the Model I Rad>o Shack Expansion Interlace 

Upward compatible with TRSDOS (2.3 & 1 2 as documented) 

Fully supports Microsoft language products for the TRS-80. 

Complete media compatibitity Mode* t to Mode) III and back. 

Full support for LOBO's LX-80 interface 

Full support for AEROCOMP LC double density controllertDOC). 

Full support tor PERCOM'i DOUBLER II. 

Complete documentation (well over 250 pages). 

Complete technical information. 

A TOLL-FREE 800 number for customer service. 

An LDOS users bulletin txiard on MicroNET. 

A Quarterly LDOS users magazine (The LDOS QUARTERLY). 

A liberal update policy 

An enhanced BASIC (LBASIC) mcludmg 

> Upward compatible with Microsoft Basic. 

> High speed LOAD and SAVE 

> Run multiple programs with common variat>lcs 

> BLOCKED (variable length) files are supported 

> DOS commands nnay be executed from LBASIC. 

> Built in string array. SORT. 

> Single stepper for debugging 

> Several new statements and file nwdes 



• A comp.kd JOB CONTROL LANGUAGE (JCL). 

• CONVert utility to move files from Model Ml TRSDOS. 

• An Extended Debugaingand Monitor program (with disk access) 

■ CMDFILE for movenwnt of disk and/or tape system l/CMD) files. 

• Device independent operation 

•Full LINKing ROUTEmg. FILTERing and SETtmg are supported. 

• MiniDOS feature for constant access to certain DOS commands. 

• RS-232 DRIVER lor serial Support 

• Sophisticated communications software ir^luded. 

• Wildcard characters and partial Fiiespecs are supported. 

• DATED FILES, show when a file was last written to. 

• Backup: M irror, by Class, if Modified, by Date, by Extension, etc. 

• Selectable PURGE for fast disk cleanup' of unwanted files. 

• Print formatter, for control of printer output 

• Built in printer SPOOLER, to both disk and ram 

• Joblog to record all system operations with time stamps 

• UPPER and fewer case support, throughout the system 

• Blinking cursor with selectable cursor cfiaracter 

• 128 character TYPE AHEAD buffering for keyboard input 

■ Assign strings to individual keys with Key Stroke Multiply (KSM). 

• SUPER FAST operation with the SYSRES feature. 

• Extensive user control and system leedback. 

« Advanced PATCH utility for easy matntenance. 

• Complete transportabilrty of software among all Z-80 LDOS 

systems through the use of the LDOS high ram supervisory 
call system (SVC). 

• Dealers to serve users Nationwide and m the Common Market. 

• The only DOS with a limited ONE YEAR WARRANTY! 

• Enjoy a professional operating system on YOUR TRS-80! 



' Specific tiardware is required to use these features. 



The Ultimate In 
Operating Systems 
For Model I & III 



Only $ 



169 



GO 



■MoMILDOSpravkledonlSlracliMrtglsdOTiBilymwIla 

• Model III LOOS orovxJsd or 40lnckdoubM flanUty itt«di«. 
*lCX>ScanbsprovMlw]on t[MCi«i ntMUconfifurationtAtan 

additional charge 

* Pncat A Spactflcaiioni ar» *ub|>cttoch>nee wiltioul noMca 
•f Ailhouch not required. LSI recommends t*ia or more drives 
' wher u«inf LDOS 



For Further Information Contact The Distributor Or Dealer Nearest Vou: 



(We«j 
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APPLICATION 



Housekeeping programs for the Pocket Computer. 



Shopper's Aid 



R.C. Manlnger 
146 Roan Drive 
Danville. CA 94526 



Several months ago, steadily rising food 
costs prompted me to explore ways 
that I could use my personal computer to 
help control our family's food costs. 

After going on a number of food shop- 
ping tours, it seemed that the best way to 
use the computer would be to apply unit 
pricing data to guide buying decisions on 
quantities, brand names and also which 
stores to go to for items. Yet, in practice, 
this required a lot of time for tedious and 
continuous data input and tor IntertacinQ 
with the computer. Specifically, the menu 
planning and shopping list preparation took 
a lot of time to devise and input. Also, at the 
food market, "as bought" price aruj quanti- 
ty data had to be written down so it coutd be 
processed and entered into the computer at 
home. The project on computer-aided food 
shopping soon faded away. 

Pocket Computw to the Rescue 

Then came the TRS-80 Pocket Computer. 



Latol 


Functtofi Um 


■L" 


Enter shopping list 100 


..5.. 


Summarize status of itst in memory lao 


-C" 


Change item name and/or prtcv 1 50 


■SPC' 


tnitiatize pdcos on Itst for buyir>g 3X 


"A" 


Automatk: selection ot item tor buyir>g 170 


"B" 


RarKlom selection of Hem lor buylr>g 130 


Table 1. Program Labels end Furtctions 



I bought one along with the cassette inter- 
face and recorder for some experimenta- 
tion in applications. My first ideas for 
programs were based on the shopping aid 
programs mentioned above. The portability 
of the computer and cassette recorder 
allows their use at any time in the kitchen, 
in the food stores, or in the automobile. This 
convenience, along with properly planned 
application programs, can offset the limita- 
tions of menrory size and display capability. 
Program Listing 1 is the result of a num- 
t>er of trial uses in grocery shopping. The 
tape file name GPSA comes from General 
Purpose Shopper's Aid. This program repre- 
sents a combination of the following: 

• Size of data file that can be held in 
memory, 

• Speed of response to user commands, 

• Convenience of use, and 

• Use of the interesting features of the 
software and hardware design of the 
TRS80 Pocket Computer. 

GPSA is used In the DEF mode. It per- 
forms six functions as listed In Table 1. 
Each function can be selected at any time 
by keying in SHFT (Label). The first four 
functions are used to prepare the shopping 
list of up to 64 items. The last two functions 
are used at the store for actually buying 
items. Note, however, that the first three 
functions can also be used to modify the 
shopping list at tt>e store after the buying 
has started. The detailed procedures for us- 
ing GPSA are given in the next sections. 

The Shopping List 

When a new shopping list is to be creat- 
ed, the Clear command should be entered 
to remove unwanted data in memory. Next, 
key in SHFT L. The message Limit = $0 will 



be displayed momentarily followed by the 
Change Limit? query. At this time, the 
amount of money budgeted for the shop- 
ping list should be keyed in and entered. 
(This amount can be changed at any later 
time if desired.) The next display will be a 
momentary Next Item = 1 foilowed by Item? 
The name of the first item on the shopping 
list is now keyed in and entered. (Maximum 
length is seven characters.) The question 
Price = Units* Unit Cost? is displayed next. 
At this point, the price of the item can be 
keyed in and entered either as a single price 
or as an arithmetic expression. For exam- 
ple, the expression could be 2 x 1.39 for 
two pounds of an item at $1.39 per pound. 
Only the total price of $2.78 will be put into 
memory. 

After the price entry, the message Next 
item = 2 will appear and be followed by the 
question Item? The name of the second 
item and the price for it are entered. This 
process is continued until the computer is 
shut off, another function is called, or the 
message List Full is displayed. In any case 
whatever has t)een entered into memory will 
be retained unless the Clear command is 
keyed in or price data is altered by SHFT 
SPC as described below. If the list is not 
full, an Interrupted entry function can be 
resun^ed at any time by turning the com- 
puter on and/or keying in SHFT L. The cycle 
of entry will again start from where it was in- 
terrupted. A reminder of the budget limit 
and an opportunity to change it will be 
given. Then the next entry numtier will ap- 
pear and the next Item be requested. 

Tfie List Full message appears when 
memory is filled to capacity with 64 entries. 
This also signifies that the list entry func- 
tion is automatically terminated to prevent 
crashing the program. If a list has been 
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PROGRAMMING TOOLS FOR YOUR 
TRS-80® MODEL I AND MODEL III 



INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

INSIDE LEVEL II is a comprehensive reterence guide to the Level II ROMs which allows 
the machine language or Basic programmer to easily utilize the sophisticated routines 
they contain Concisely eiplarns set-ups calling sequences, and vanatMe passage tot 
numtier conversion, arithmetic operations, and mathematical functions as well as 
keylxDard. tape, and video routines Part II presents an entirely new composite program 
structure which loads under the SYSTEM command and executes in both Basic and 
machine crxle with me speed and efficiency ot a compiler In acWitton, the 18 chapters 
include a large body of other information useful to Ifie programmer including tape 
(ormals. RAM useage, relocation of Basic programs. USR call expansion, creating 
SYSTEM tapes ot your own programs, interfacing ot Basic vanables directly with ma- 
chine code, a method of greatly increasing ttie speed at which data elements are stored 
on tape, and speaal precautions lor (*sK systems INSIDE LEVEL II is a clearly organized 
reference manual, it is fully typeset and packed with nothing but useful information. It 
does not conlain questions and answers. ROM dumps, or cartoons. 
Includes updates (or Mods! III. INSIDE LEVEL tl S15.95 

SINGLE STEP THROUGH RAM OR ROM 

STEPBO allows you to step through any Basic or machine language program one 
instruction at a lime, and seethe address, hexadecimal value, Zilog mnemonic, register 
contents, and slepcountlor each instruction. The top 14 linesof the video screen are left 
unaltered so that the target program may perform its display functions unobstructed, 
STEPSO will follow program flow nght into the ROMs, and 's an invaluatHe aid in learning 
how the ROM routines function. Commands include step (trace), disassemble, run in 
step mode at vanable step rate, display or alter memory or CPU regislers, |ump to 
memory location, execute a CALL, set breakpoints in RAM or ROM, write SYSTEM 
lapes, and relocate to any page in RAM. The display may also be routed to your line 
printer through the device control block so custom print dnvers are aiilomatically sup- 
ported. 
Spacity Model I or Mod«l IN. STEPSO S16.95 

TELECOMMUNICATIONS PROGRAM 

This machine language program may be used as a smart lenninal with time share 
systems or for high speed hie transfers between two disk-based micros over riKidems or 
direct wire It is menu dnven af>d extremely simple to use. Functions include real-lime 
terminal mode, save RAM buffer on disk, transmit disk file, receive binary files, examine 
and modify UART parameters, program 8 custom log-on messages, automatic 16-bil 
checksum venficalion ol accurate transmission and reception, and many more user 
conveniences Supports line printers and lowercase characters. With this program you 
will rw longer need to convert machine language programs to ASCII for transmission, and 
you will know immediately if the transmission was accurate. This pro^^m comes on a 
formatted disk. 
SpMify Model I or Model III. TELCOM $39.95 

PROGRAM INDEX VERSION 2.0 

Assemble an alphat>elized index of your entire program library (rom disk directones. 
Program names and tree space are read automatically (need not be typed in) and may be 
alphabetized by Osk or program The i.st may also be searched tor any disk, program, or 
extension: disks or programs added or deleted and the whole list or any pan sent to the 
pnnter. Printer output may be requested in three afferent formats including latsels. The 
list Itself may also be stored on disk lor future access and update. It also includes a 
PURGE mode lor quickly killing unwanted files Directory reads and alphabetizing is 
done in machine code for speed. I.IMO programs may be sorted in less than 10 seconds 
Works with TRSDOS. NEWDOS. and NEWDOS BO single or double density. One dnve 
and 32K required. 
SpMNty Modd I or Model III. INDEX $24.95 

4 SPEED OPTIONS FOR YOUR TRS-80 

The SK-2 clock modification allows CPU speeds to be switched behveen normal, an 
increase of 50°=, or a 50°= reduction, selectable al any time without intermpting execu- 
tion or crashing the program tnslnjctions are also given (or a 100°o increase to 3 54 MHz. 
The SK-2 may be configured by the user to change speed with a toggle switch or on 
software command II will automatically return to normal speed any time a disk is active, 
requires no change lo the operating system, and has provisions lor adding an LED to 
indicate when the computer is not at normal speed. It mounts inside the keyboard unit 
with only A necessary connections for the swilch option (switch not included], and is 
easily removed i( the computer eve: needs service. The SK-2 comes (ulty assembled 
with socketed IC s and illustrated instructions. 
Model I only. SK-2 $24.9S 



INSTANT ASSEMBLER 

The INSTAMT ASSEMBLER is a new. powerful tape-teased assembler and debugge' tor 
the TRS-80 Now you can assemble directly lo memory and immediately debug your 
program with the built in single stepping debugger Quickly switch from assembler lo 
debugger and tiack again without losing the source code This feature makes INSTANT 
ASSEMBLER an excellent learning tool (or assemOly language programming 
INSTANT ASSEMBLER is absolutely unique among lape based assemblers in that it 
produces relocatable code modules that can be linked with ihe separate LINKING 
LOADER, whicfi IS supplied in two versions (or loading programs into either high or low 
RAM This lets you bulk) lorig programs with small modules INSTANTASSEMBLERalso 
features immediate detection o( errors as the source code is entered a compactly coded 
source format Ihal uses 1 3 as much memory as standard source, arxl many operational 
features including single stroke entry of DEFB and DEFW pinpoint control of listings. 
alphat>elic listing of symbol table, separate commands for li sting error lines or the symbol 
table, block move lunclion, and verification ot source lapes. 

INSTANT ASSEMBLER'S debugger provides single stepping with full register displays, 
decimal or hex entry ol addresses, forward or backward memory displays, disassembly 
of Obfed code m memory, memory display in ASCII format, and bex-lo-decimal of 
decimal- to-hex conversion. The single-stepper will step one inslruction at a time or at a 
fast rale to any defined address. 

INSTANT ASSEMBLER occupies less than 9400 bytes of memory. In a 16K machine this 
will leave you enough memory to wnte assembly language programs of around 2000 
bytes. This and its module- linking feature make INSTANT ASSEMBLER ideal (or users 
with only 16K machines. The instruction manual may be purchased separately lor $3, 
which will apply towards Ihe purchase of Ihe INSTANT ASSEMBLER. 
Specify Modal I or Modal ML INTASM S29.95 

RAM SPOOLER AND PRINT FORMATTER 

This program is a full feature print formatting package (eatunng user defineable line and 
page length (wilh linefeedsinsertedbetween words or after punctuation], screen dump, 
pnnter pause control, and Ciaud rate selection. In addition, printing is done (rom a 4K 
expandable buffer area so that the LPRINT or LLIST command returns control to ihe user 
while printing is being done Ideal for Selectric or other slow printers Allows pnnting and 
processing to run concurrently. Output may be directed to eilher the parallel port, serial 
port, or ttie video screen 
SpMlfy Model I or Modal III. SPOOLER S16.9S 

MACHINE CODE FAST FOURIER TRANSFORM 

This complete package includes 3 versions ot the machine language FFTASM routine 
assembled (or 16, 32. and48K machines, a short sample Basic program lo access them, 
a 10K Basic program which includes sophisticated interactive graphing and data manipu- 
lation, and a manual of inslnjclions and examples The machine language subroutines 
use vanables defined Cry a supporting Basic program to make data entry and retneval 
extremely fast and easy for custom implementation. They perform 20 lo 40 times faster 
than their Basic equivalent (256 points in 12.5 seconds), and require less than 1550 bytes 
of memory The FFT is useful in analyzing stock market and comocSty Irends as well as for 
scienhhc information 
Specify Model I or Model III. FFTASM S49.9S 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies o( any tape wntten lor Level M They may be SYSTEM tapes or 
data lists. The hie name, toad address, entry point, and every byte (in ASCII forrrwtl are 
(tsplayed on the video screen. Model III version allows changing tape speed 
Specify Modal I or Model III. CLONE S16.9S 

RAMTEST FOR LEVEL II 

This machos lar>9uage program is a very thorough lest for several types ol RAM errors 
A complete test ol each mdvidual bit m a 48K machine takes |us1 14 seconds Includes a 
separate test (or power line glilches 
Modal I only. RAMTEST-...S9.95 

EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

Load Basic programs or any other ASCII data We into the disk version o( Electric Pencil 
lor editting One command from DOS quickly modifies existing files to Pencil formal One 
disk and 32K required 
Modal I only. PENPATCH S9.95 



MUMFORD 

MICRO 

SYSTEMS 



ORDERING: Ct>mpli?tt^ Sritisjficlion is yurirdiile^d or ^ full refund will be made All progrinii:^ 
lexrept TEl.COMi rir*' stiippt>d on cas^etti^ unle'^s $5 is included tor a formatted Ino system) 
disk Include $1 SO for posidye ^nd handliny California residents add b''o sales i<ix Visa. 
Mrtstercharge and COD order, accepted SPECIFY MODEL I OR MODEL ML Dealer 
inquines invited 

Box 400-E Summerland, California 93067 (805) 969-4557 



■See List ot Advertisers on page 418 



80 Microcomputing, December 1981 • 173 



filled and items remain to be entered, the 
filled list can be saved on cassette by using 
the command Print#"file name" and a new 
list started. Later, when needed, the saved 
list can be loaded back into the computer 
with the command lnput#"file name". 

Going Ov«r the Budget 

During the entry process, the cumulative 
sum of prices will be calculated. If the sum 
exceeds the budget limit, the computer will 
give an audio warning with five beeps fol- 
lowed by the message Over Limit = $ — 
XX. XX. The warning will be repeated after 
each entry until either the budget limit is in- 
creased or selected prices on the list are 
lowered by using the change function as de- 
scribed below. 

The status ot the shopping list can be re- 
viewed by invoking the summary function 
with SHFT S. The display will show item 
number, item name and designated item 
price starting with item one. Enter to ad- 
vance to each succeeding number. When 
the last item has been shown, the message 
End Total = $XX.XX F^Y will appear. If 
Y = 0. the shopping list has not been ini- 
tialized for buying and the end total is for 
the entire list in memory. If Y = 1, the list has 
been initialized tor buying and the end total 
applies only to the sum for the items al- 
ready bought. Also note that if the list has 
been initialized, all of the prices have nega- 
tive signs if they have not been bought. If an 
error is noted at any time during the status 
review, the change function can be called 
immediately without disturbing anything in 
memory. 

At any time after an entry has been made, 
it can be changed by keying in SHFT C. 
When this is done, the computer asks if you 
want to change any numbers. The user en- 
ters the number of the item to be changed. 
The computer will display the item number, 
name and price to confirm that the item 
number called does indeed give the name 
and/or price to be changed. If the name and 
price displayed are not the ones to be 
changed, the user reenters SHFTC and a 
revised but correct item number. When the 
correct item entry has been displayed. Enter 
is keyed in and the display Item? appears if 
the name is to be changed, the new name 
and Enter are keyed in. If the name is not to 
t>e changed, only Enter is keyed in; this re- 
tains the original name in memory. The next 
prompt asks for Price = Units*Unit Cost? 
Here the new price or arithmetic expression 
is keyed in and entered if there is one. 
Otherwise, only Enter is keyed In and the 
original price entry is retained. The com- 
puter automatically checks against the 
budget limit and gives the warning beeps 
and message if the limit is exceeded. 

The shopping list is initialized by ex- 
ecuting SHFT SPC. This sets the cumula- 
tive sum of prices to zero and tags each 
price with a minus sign. The computer uses 
the minus sign to guide the automatic se- 
lect and buy mode described below. The 
displays of the minus signs on prices also 
remind the user that the related items have 



not yet been purchased. The program al- 
lows the list to be initialized only once 
which is indicated by F = 1 on the right of 
the end total display. This function modifies 
price entries and sums so that the comput- 
er can keep track of the buying translations. 

When the entries to the shopping list 
have been completed and edited as neces- 
sary, it may be helpful later on to prepare a 
written shopping list (here is where a printer 
would be very useful). This written list is 
used to record special shopping instruc- 
tions that cannot be put into the limited 
memory. It is also used as a reference tor 
item numtiers during random buying. 

After the shopping list has been initial- 
ized SHFTA displays the number, name and 
expected price of the Item at the top of the 
list of unpurchased items. The shopper 
then finds the location of the item in the 
store and checks the actual prices. At this 
point the shopper can do some arithmetic 
with the computer to compare unit prices 
for the best buy among several brands. 
When the shopper decides on an item and 
is in the buy mode, press Enter and the 
prompt Price = Units' Unit Cost? appears. If 
the shopper decides not to buy an item, 
(zero) is keyed in. If the shopper wants more 
time to think about the purchase and to 
come back to it later, only the Enter Is keyed 
in. If the item is purchased, the actual pur- 
chase price is keyed in and entered. The 
computer then calculates the cumulative 
cost, warns if the budget is exceeded and 
presents the next item on the top of the list 
of unpurchased items. The shopper re- 
sponds as tjefore. This process can t>e 
followed until price entries have been made 
for all items. The computer then prompts 
with End Total = SX.XX F = 1 . 

The shopper can interrupt the program 
any time by turning off the computer or by 
going to another function. The automatic 
sequencing can be resumed by reexecuting 
SHFT A. The shopper may want to interrupt 
the automatic sequencing to add another 



item to the list with SHFT L, to review the 
status with SHFT S, to change an item on 
the list with SHFT C, or to skip automatic 
sequencing and use SHFT B for random ac- 
cess buying. 

The random selection of items to buy is 
made by keying in SHFT B. The first prompt 
is Next No.?. The shopper must now key in 
and enter the number of the desired item. 
This number must be looked up on the writ- 
ten list or be remembered. When the num- 
ber has been entered, the procedures for 
function B are the same as for function A 
for each single item. After all the informa- 
tion is entered for each item, the random cy- 
cle is repeated until the function B is exited. 

It is possible to switch back and forth be- 
tween functions A and B. This is done as 
dictated by convenience until most of the 
items have been bought- Then the shopping 
is finished using only function A. The latter 
ensures that no item has been inadvertantly 
forgotten. 

Any of the functions can be interrupted at 
any time to do arithmetic for trial changes 
of prices and their sums. This is convenient 
when the shopper wants to calculate and 
compare unit prices on different brands of 
an item or if shelf prices are much different 
than expected. The interruption is done by 
pressing On for CA/Break. The prompt 
Break At XXX will appear where XXX will be 
the program line number where the interrup- 
tion happened to occur. The arithmetic 
operations are then done in the usual way. 
Use the red display clear key after each 
operation is finished. 

When ready to return to the Interrupted 
function, hit C. and Enter. The function can 
then be resumed from where it was inter- 
rupted and the new data from the trial 
calculations can be entered Into the list. 

The application ot the Pocket Computer 
as an aid for food shopping has shown that 
the computer can uniquely serve as an in- 
teractive shopping guide that can help con- 
trol costs.! 
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I , III '^-^ COLOR 

ALL PROGRAMS USE TESTED 

MICRO -TYPIT .■.. text editirif-' pri.gr.Tji^ that uses the 'rteyboarti 
"as is" lik^ :* typfiwriter. All etiit and prompt functions are 
"built in" so instruction or learning is minimum. Text can be 
generated three pages at a time and printed either numbered, or 
unnumbered single or double spaced. Also, right justification 
is optional. Does not require subKtitution of @ for cornmas or 
any other character revision. Slowest function is transferring 
text to and from tape. Neat error free text with large print 
titles. Excellent for specification;;, agreements, instructions, 
form Iftters or announcements. "onplete with sound for TRS-Sc 
', ITI S COI/)R and KicrotecV printer easily adaptable to most 
other printers. TRICE $25.00 

CLIENT FILES Allows keeping several contracts for up to 2S 

clients. Enter contracts includinj^ either payment amounts or 
percentajjes . As bills are sent out and payments received, the 
program l^ a record by contract of amcunts outstanding and not 
billed including a summary of receivables and worK in progress. 
Worka well with one to 3 projects for a dozen or so clients. 

PRICE $25.00 

EHGIHEERING PROuRAMS 

LIGHTING CALCULATIONS Calculates the required number of 
fixtures for .t room f^iven the dimensions and reflectances by 
the zone Cavity method. Three standard fixtures are "built in" 
so that 8 roon: calculations are made to compare results such as 
*jatts, footcandles and num.ber of fixtures. PRICE $30.00 

HVAC PROGRAM This program calculates sensible and latent 
coolint; and heating load by zone each two hours of the typical 
hottest and coldest days. Equations per 1977 ASHRAE Fundamental 
Guide page 25.2, Three programs arei Calculations, Geographic 
and Variable Data and Data Generator. PRICE $35.00 

All tapes furnished with full documentation and instructions. 
Documentation, Instructions and Source List alone $15. OC 

All programs on tape require Level II and 16K. 1 rinter in 
required for KICRO-TYPIT and optional on all others. Do not 
forget to include the Model Type with your order. 

Send Check or Money Order i no CCD's please) to; 

Coolidge & Associates 



Z050 S. LfiMflR « 10 



AUSTIN , TEXiS 7870-i 



(512 1 443 -53Z9 



7r;;;r^jf^' ribbon sale 

^ FOR RADIO SHACK' CENTRONICS-EPSON LINE PRINTERS 
[Longer Life- Heavier Inldng] 

EXACT REPLACEMENT INSERTS 

[Cartridge* NOT Indnded] 
LP l-tI-IV-700-73O-737-T79 $1100/3 $42.00/DOZ 

LPItl-V $21.00/3 $82.00/DOZ 

LPVI-VIII $21.00/3 $82.00/D0Z 

Daisy Wheel II [Carbon Film] $26.00/6 $SO.OO/OQZ 

[Long-Lite Fabric] $21.00/3 $«2.00/DOZ 

EPSON MX-70-80-100 $24,00/3 $95.00/D0Z 

[Our Instnictionfl make tnaerts eaay to pat In yoor cartridge] 

RELOADS 

[You SEND old CARTRIDGES to US- WE RELOAD them for you] 

LPlll-V Each. ..$9.00 

LPVI-VIII Each. ..$9.00 

DW II [Carbon Film] 3 Pa:k.S15.00 [Long-Ufe Fabric] Each. $9.00 
Centronics 7-MEG 702, 703, 704, 753 Cartridge Each. ..$10.00 

EPSON MX-70, 80, 100 Each. ..$10.00 

NEW CARTRIDGES FROM RADIO SHACK 

LPIH-V 125-1414] Two for $25.00 

LPVI-VIII [26-14181 Two for $21.00 

LP VII [26-1424] Two for $16.00 

DW il Carbon Film [26-1419] 3 Pack $22.00 

Long-Llfe Fabric [26-1449] Two for $21 .00 

CENTRONICS 7-MEG 702, 703, 704, 753 Cartridge Two for. ..$26.00 

Volume 1 MODEL 8" GAME DISCS Volume 2 
Biorhythms.Trap $25.00 Each Ugly, Bingo 

Rip Cord, Yacht Sea Towers, Blackjack 

Concentration -t- 4 More FarWe, Pony + 3 More 

We Pay Shipping On Prepaid OrdersI Net 30 AccoonU Available 
SEND CHECK, MONEY ORDER or COD TO: 



BCCOMPCO 

»00 South 17* Boi 246* 417 932-41% 
SamraersvUle, MO 65S71 



ifsr 




*R»dlo Shack la a trademark of Radio Shack, a Tandy Corp. 
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SIGMON 

SIGMON is a complete machine Language develop- 
ment tool for your TRS-80 Color Computer and it's 
super powered 6809E microprocessor. 

Features: 

MONITOR: Display memory in HEX and ASCII, Drrect HEX and 
Decimal entry mto memory/registers, ^Aove, Find, Tape Read end 
Write, Output to printer and more 

DISASSEMBLER: Display Addresses, Opcode operand, 
Mnemonics, and Address expressions for specific range of 
instructions 

MINI ASSEMBLER: Allows you to enter instructions in Symt>olic 
form and have them converted to Machine Lansuage. 

DEBUGGER: Allows Stepping and Break point execution of 
Machine Language programs. 

With SIGMON you can awaken the awesome powers that turk 

v/ithin the dark recesses of your color computer. 

Cassette arKJ Source Code 

for the TRS-80 Color Computer $39.95 

(Screen Edit Control System) 

SECS adds new power to your TRS-80 Color 
Computer. If you have been waiting for Entianced 
BASIC and it's capabilities, then you are ready to take 
the next logical step. 

Features: 

FULL SCREEN EDITOR: Full Cursor control with auto repeat, 
Insert, Defete, Join lines, Relocate lines and Audible en-or warning. 

HI RES GRAPHICS: Two modes of Hi Res graphics, Set point. 
Set line, Set color, Set programmable character, Set screen, and 
Toggle between Low Res and Hi Res/Normal and Inverted 
Screens. 

HI RES CHARACTER GENERATOR: Sixty-four definable charac- 
ters, Save and Load Characters sets to and from tape, Define 
Characters, and Place on screen in any color and in any position. 

The entire system is linked into BASIC and is completely 

transparent to the user. As a BASIC programming tool, SECS is 

unsurpassed. 

Cassette for the TRS-80 Color Computer $S9.95 

Software Utilities for the 
TRS-80* Color Computer 

Order through your local software dealer or send check or 
money order plus $2.00 shipping & Handling to: 




^^^ COMPUTER SOFTWARE 



19519 Business Center Drive, Northridge, CA 91324 
{213)701-5161 

■TRS-BO IS a rcgrstered trademark of Radw ShacK a division □( Tandy Corporation 



^See List ot Advertisers oo page 418 
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GAME 



OHie, ollie, 80, home-free-home! 



Capture the Computer 



Jeffrey O. Fisher 
414 West 4T St Street 
Sand Springs. OK 74063 



It is natural for a human being to seek 
pleasure and engage in pastinnes that 
relax the body and please the mind. Com- 
puter games offer such a pastime. 

The computer easily fills the role of an 
opponent. First, It does not require any in- 
structions once the program has been writ- 
ten, except for values the user enters to 
guide the computer In its decision making. 
Second, it is quite content to entertain its 
user indefinitely. 

What can you do with the TRS-80 in 
terms of game playing and other recre- 
ation? The TRS-80 has limited graphics 
because it can display a picture with a 
resolution of no better than a 128 x 
48 matrix of graphics blocks unless you 
alter the hardware. Also, the Basic inter- 
preter executes too slowly to offer much of 
a challenge to human reactions as it runs 
more detailed programs. As a result, real- 
time games are frequently written in 
machine code or the set of instructions is 
in the vocabulary of the processor itseif. 
These Instructions normally do less than 
Basic statements and are more difficult to 
use due to the precision required, but they 
execute In far less time, making it a simple 
matter for the computer to overwhelm a 
human opponent with its speed. 

Because of this, many Basic computer 
games available incorporate code that 
reduces the need for speed and concen- 
trates instead on the elements of chance 
and strategy, thus giving the human a 
fighting chance. 

Capture is a simple program which 
maintains a need for timely human reac- 
tion and strategy with just a little bit of 
luck thrown in. 

The scenario is one where the computer 
and player take turns chasing each other 
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on the screen in an effort to capture the op- 
ponent's piece. On the display, a graphics 
block represents the player and the letter 
"O" symbolizes the computer. The game 
always begins with the computer as the 
predator. It Is up to the human to avoid the 
"O" character. After a length ot time 
specified by the player, and it the player 
has not yet been captured, the mode 
switches. It is then up to the human to cap- 
ture the computer's piece. This is basically 
a game of tag where the user and machine 
take turns being "it". 

One problem in a game such as this is 
how to Inform the player when the ex- 
change in roles has taken place. Small 
printed messages are usually inadequate 
since normally the player Is watching the 
proximity of the two pieces on the screen 
and is sometimes obHvious toother bits of 
information given him. Taking this into ac- 
count. Capture incorporates program 
code that relies on the person's peripheral 



vision and places a large graphics block 
on the left of the display when the com- 
puter is the hunter and on the rigtit side of 
the screen when the machine is the quarry. 
With this method, it is unnecessary to pay 
excessive attention to messages printed 
on the screen since the position of the 
block tells the player the present mode of 
the game. 

Since one of the objects of the game Is 
to avoid capture, the player needs a way to 
move his piece around on the screen. The 
keys that control the movement of the 
player's piece (the block) are the arrow 
keys on the right and left sides of the key- 
board. The direction of the arrow indicates 
the direction of movement and pressing 
any two keys not on the same side will 
result in the corresponding diagonal move- 
ment. The pressed key or keys will cause 
movement until either the key is released 
or the piece tries to move off the screen. 
Pressing two keys on the same side 



Line Description 

10 lnitlali7BS vanablas. 

20 Mam program line Ihat controls th« iTioa« ot play 

30 Used for Ihe corrpuler attack routine. 

40-50 Computer retreat roulma; lino 40 is used tofllve the player a (>e1l8r chancsof teavlnQ the 

area of the computer's piece immadiately after the computer attack mode 
60-80 Used to see which arrow hey was prassM by addressing memory location 14.400 which 

addresses the keyboard For mora information, see Table 2 
90 Used to update Ihe location of the player's piece on the screen inderxl the scenario it the 

two pl«c«s occupy (h« same position. This iTMans Ihat tither th« computer ot player has 

Dvor. 
100-140 Used to generate Ihe computer's offsnslv* moves. It generally tries to minimize the 

distance between the pieces. 
150-180 Computer defensive rouline used to attempt lo mflnlmize the distance between the pieces 

m an attempt al escape 
190-200 Used to update the position of thecompuier'a piece on the display. If Ihe move results in 

the same location being shared by Ihe two pieces, it jumps to the portion of Ihe program 

Ihal informs Ihe player of who was captured. 
210-Z20 Used to inOicate lo ihe player which mode the computer is m [attack or relreati 

230 Inlorms the player thai he has just been killed 

240-270 Used to indicate ine end of tt>e individual scenario and shows the current scores Of Ihe 

person and computer. 
280 Initialization rouime accessed early in the game by fine ID thai displays the IlTle of tfie 

game 
290-3S0 Used for the instructions resident in Ihe program. 

Table 1. Line Description. 



'This is basicaiiy a game of tag 

where the user and machine 

take turns being 'it'." 



results in no movement of the piece. 

Program Flow 

The program begins by displaying the 



name of the game, tt then displays the 
game instructions. The user is prompted 
to enter a length of time for the game to 
continue before switching modes between 



10 CLEAfil50:CLS:A$="C A P T U R E ! ■ : INPUT"ENTER YOUR NAHE";NAS: 

GOSUB280:GOSUB290:CLS:INPUT"TIME SLICE (GENERALLY 1-2 TIME UNITS 

) ";TS:CLS;AS=STHING$(11,191)+"RETREATII"+STRINGS{11,191) :BS=STRI 

NGS(31,32):CS-STRINGS(11,191)+"CHARGE!M''+STRINGS(11,191) 

20 ST-1!TI=TS:GOSUB210:GOSUB3 0:ST=2jTI-TS:GOSUB220:GOSUB40:GOTO2 



30 FORI-1TO2:GOSUB60:GOSUB90:GOSUB100:GOSUB19O:NEXTI:GOSUB6 0:GOS 

UB90:TI=Tl-.l:IFTI<.lTHENRETURNELSEGOTO30 

40 FORI"1TO2:GOSUB60:GOSUB90:NEXTI 

50 FORI=1TO2:GOSUB60:GOSUB90:GOSUB150!GOSUB190:NEXTI:GOSUB6 0:GOS 

UB90 I TI ^TI - . I : IFTI < , 1THENRETURNELSEGOTO50 

60 PE-PEEK{ 14 40 0) ; IFPE=8ANDYP>0THENYP=YP-1ELSEIFPR=16ANDYP<14THE 

NYP=YP+1ELSEIFPE=32ANDXP>0THENXP=-XP-1ELSEIFPE=64ANDXP<63THENXP-X 

P+1ELSEIFPE-72AKDXP<63ANDYP>0THENXP=XP+1 : YP-YP-1 : ELSEIFPE-4flANDX 

P>BANDYP>0THENXP=XP -1 : YP-YP-l 

70 IFPE=80ANDYP<14ANDXP<63THEMXP=XP+1:YP-YP+1:ELSEIFPE'^48ANDYP<1 

4ANDXP>0THENXP=XP-1:YP=YP+1 

80 RETURN 

90 PRINTeYO*64+XO," " ; : PRINT^YP*64+XP,CHR$ (143) ; ;XO=XP:Y0-YP: IFY 

P"yHANDXP=XHANDST-2THENPRINTp960 , "GOT HIM 1 1 ! " ; : PS=PS+1 :GOTO240 :E 

LSEI FYP=YHANDXP-XHANDST=1THENCS=CS+1 : GOT023 ; ELSERKTUHN 

100 REMARK ** COMPUTER ATTACK SUBROUTINE ** 

110 IFYH>YPTKEKYH=YH-1ELSEIFYH<YPTHENYH=YH+1 

120 IFXH>XPTHENXH=XH-1ELSEIFXH<XPTHENXH"=XH+1 

140 RETURN 

15B REMARK **CCT-1PUTER RETREAT SUBROUTINE** 

160 IFYP>YHANDYH>0THENYH*YH-1ELSEIFYP<YHANDYH<14THEHYH=YH+1ELSEI 

FYP=YHANDYH=<8THENYH=YH+lELSEIFVP-YHANDYH>8THBNyH=YH"l 

170 IFXP>XHANDXH>0THEKXH=XH-1ELSEIFXP<XHANDXH<63THENXH=XH+1ELSEI 

FXP=XHANDXH=<32THENXH=XH+1ELSEIFXP-XHAHDXH>32THENXH=XH-1 

160 RETURN 

190 PRINTeYL*64+XL," "; : PRINTeYH*64+XH, "O" ; :XL=XH: YL=YH: IFXP=XHA 

NDYP=YHIANDST=1THENCS=CS+1:GOTO230:ELSEIFXP=XHANDYP-YHANDST=2THE 

NPRINT#992,"GOT HIH! I I"; : PS=PS+1 ;GOTO240 

200 RETURN 

210 PRINTg992,B$;:PRINTe961,A$;:RETURN 

228 PRINTg961,BS;:PRINTg992,CS;:RETURN 

230 F0RI»1T05:PRINTCHRS{23) ; :FORII»lTO10:NEXTII:PRrNTCHR$(28) ;:N 

EXTI:FORI=iTOLEN(Z$) : PRINT§992+I-1 ,HID$ ( ZS , I ,1) ; : FORII=1TO10 ; NEX 

Til, I 

240 PRINTe256, "TALLY OF KILLS: ";: PRINT@320 ,NAS;PSj : PRINTe384 , "CO 

HPUTER";CS; :PRINT§448,"CARE TO PLAY AGAIN (Y/N) ?" ; : YP=-RND( 14} : XP 

»RND(63) :YH=RRD(14) :XH=RND(63) 

250 K$-INKEYS:IFK$-""THEN25flELSEIFKS-"Y"THENCLS:GOTO20:ELSEIFKS-: 

"N"THEN260ELSEGOTO250 

260 PRINT!PRINT"THANKS FOR PLAYING!" 

270 END 

280 2S-"Y0U HAVE BEEN KILLEDl H ■ : YP-RHD( 14) : XP=RND( 63) : yH=RMD( 14 

) :XH-RND(63) :CLS: PRINTCHR? ( 23 ) : FORL=0TOLEN ( A$) : F0RK=63T0LSTEP-1 : 

IFPEEK (14400) =128THENRETUBNELSEPRI NT |448+K,WIDS(A$,L+1,1);:NEXTK 

,L:PRINTe512,"BY JEFF FISHER" :FORK=1TO750:NEXT:RETURN 

290 CLSjPRINT" THIS IS A GAME WHERE THE PLAYER AND THE COHPUT 

ER TAKE":PRINT"TURNS CHASING EACH OTHER IN ORDER TO SCORE A CAPT 

UBE. THE":PRINT"PLAYER IS REPRESENTED BY A BLOCK (I .E. , ■;CHR${3 

4)+CHRS(143)+CHRS(34) ;■) AND THE CWIPUTER" 

300 PRINT-BY AN " ;CHB5(34) +"0"+CHRS (34) ; " . " :PRINT" BACH OPPO 

NENT (PLAYER AND CWIPUTER) IS ALLOCATED A" :PR1NT"CERTAIN AMOUNT 

OF PLAY TIME IN ALTERNATE 'TIME SLICES '" :PRINT"THAT IS SPECIFIED 

BY THE PLAYER BEFORE THE GAME BEGINS." 
310 PRINT" DURING THIS LENGTH OF TIME IT IS UP TO THE PERSON 
TO EITHER" !PRINT"ELODE OB CHASE THE COMPUTER DEPENDING UPON THE 
HODE OF THE":PRINT'TIWE SLICE. IF YOU ARE CAUGHT BY THE COMPUTE 
R, YCH) ARE KILLED" 

320 PRINT'AND THE COMPUTER SCORES A POINT. ON THE OTHER HAND, I 
P YOU":PRINT"CATCH THE COMPUTER, YOU KILL IT AND YOU SCORE A POI 
HT.":PRINT#960,"HIT THE SPACE BAR TO CONTINUE"; 

33B IFPEEK(144B0)<>128THEN330ELSECLS:PRINT"YOUR MOVEMENT IS CONT 
ROLLED BY YOUR PRESSING THE ARROW KEYS. " :PRINT"THE DIRECTION OF 
THE ARROW INDICATES YOUR DIRECTION OF MOTION." :PRINT"DIAGOHAL HO 
VEHENT IS OBTAINED BY PRESSING ANY TWO KEYS THAT" 
340 PRINT'POINT IN DIRECTIONS SEPARATED BY 90 DEGREES." : PRINT t PR 

INT"GOOD LUCK " :PRINTe960 ,"HIT THE SPACE BAB TO CONTINUE"; 

350 IFPEEK(14400) O128THEN350ELSERETURN 

Program Listing 



LOGIC 

LI--! MO 00 
LP 2 2iOO 
l^ ) 70.00 
IC ItST 
CUPS 
»C '* S"00 
Pt 16 « '0 
PC 2* SOO 
K-tO 14 00 



EXKRIMENTOR 
SOCKETS 

eXP-300 110 50 
EXP-300PC 2 40 
E)lP-350 6 10 

POWtHtU 
PHOTO-BOARO 
PB-1(M S"^000 
PB-IO; 63 00 

[•B-lOi 2600 

PB-lOO 20 10 



QUICK TEST SOIDERUSS 

BRIADBCMttD ELEMENTS 

Or-59S »1200 QfSaB i." '5 

GI 35S I 2i QI 3SB 2 10 



Ql 



1«^ 



1!S QI 



3 '5 



oi-as 3iX> 0' ;s ." '5 

Lo^E MoiMv JUMPER 

laOK ltiv««Hlc> WIRE KIT 

lM-1 S'SOO lMI-1 1900 



PIB* SLI T-N 'WRAPT 00 L •■ SO HxxHof II 9*gti»it 

P160-1B DUAl-WiYUNVKKAPTOOL Un«.»0l IS-IOAWQ 
PI 80-2* DU*l-W*Vwn*P-«-SIRAPIOCH. Wftci It Mn i; 
aB04 UNIVERSAL MiciQCcKTtfHiivrrPracaiiDf PKiflbovd 

SBOOV UNIVEHSAL W-c'ccotticuIii' P'oi^Hto' PlMgboIrO 

lot Alia-> SaOO it IMSAI BOSO 
4607 UNIVERSAL Comnuler Pluobm.a t.n DEC lSe. 

POP-I t ana H«ihtil H-1 1 

MICRO PBGC ESS OP PLUGBOARD 1o. ApoH 



(MOO 
112 10 
IIJM 
127 » 

J2«95 
PDP-B 

S20ia 

123 90 



WE STOCK THE FULL VECTOR LINE — CMalofl AvKlibla On RaquHl 



An InlrnductiDn id IVi<:iDcamD<Jli'> (Tni Biginntn Bank S7.H An 
Inlroductian to Micoconipuleti |B»i<: Csncipiij S1Z 99 4 ind B Bri 
MictopracaaDtH0ndbo^31B,96. IB B*IMK;fT»proc*«ot Hjndt»ook $l>.S6r 
rix CRT Contrsllir HmdtiDok M.BB TKi MOOO H<c'as'ac*i>ar M.nd 
bock Se.M. ZSO A»etT>Dly Linguig. Piagtimming del*, 
6b02 Aiicmblf Ltnguag* P'Ogm^n^mg $1B-9t. BAO^ AHBtiblf Ljn^>0« 
Prcgiimming S1B.99 Buimni Siitsm Buie'iGuKH ..IT.tB. CP/M Ui>r ■ 
Oo-at .Sia.M. Apple l> Uicfi Guidi S1B.00. Micrspr«>llDti lor 
MiHtitiinintCl Control. .S1E.99. CBASIC~ Uiir ■ GuKlt .116.00. Intir 
licii-a to S-1 00/IEfct 696 Microcompul«i .(1B,00. Somt Common Banc 
Piogrimi. .S14.99. Pticiicil B>i<c Progrin'i ..S1B.*9. Somi Cornnon 
en« ProgtBoii ■ -Ann Edition .B14.8B. Somi Common Bmic ProiKirm 
— THS-eO (-•.•( II E ckt ion ...» 14,89, Scrtiici >nB Enginaomg Stiic Pip 
— Apcla II edition .£16.99 



LM301NS 
LM305H 


32 

7S 


LM317n 
LM31SN 


1 IS 
1 95 


LU3»4H % 
t*E555<* 


76 
36 


LM741N 
L>ll747h< 


t 39 
5S 


LM30TN 


40 


LM3I9N 


1.H5 


N6S5SN 


70 


LI>il4ESn 


40 


LM308N 


1 10 


LM323I; 


5.0O 


NESeiN 3. 69 


LM14B8N 


80 


LM 309*1 


2 00 


I.M324N 


SO 


NESeSN 


B5 


LMI4B9M 


80 


LM310N 


1 75 


1.U337N 


1 SO 


NESCBM 


65 


7B05CK 


1 60 


LM311N 


46 


1M339N 


50 


NE5E7N 


65 


7812CK 


1 60 


LMIBCM 


1.10 


IM380N 


50 


LM723N 


45 


781 SCK 


1 80 


■■■ 


■ 


H^BI 


^] 


II^UJI 


■ 


^^^1 


■ 


7400* 19 


742E12& 7483 ISO 74125J 4B 


'4n; 1 


1 00 


7401 19 


742 B 40 7486 


35 74132 


55 


741B4 


2 OS 


7402 19 


7432 25 ""495 


45 74141 


BO 


74 IBS 


2 06 


7403 1 9 


743B 30 7496 


50 34 156 


50 


74193 


70 


7404 19 


7442 40 74 


16 1 


30 74161 


60 


74199 


1 10 


7*10 20 


7448 75 74121 


35 74165 


60 


74221 


90 


7420 20 


747* .35 74 


23 


50 741 Bl 


1 65 








T41S001 


22 


74LS42 I 


50 


74LSI36I 


35 


7415195* 


60 


74LS01 


22 


J41S4I 


BO 


T4LS13B 


55 


74LSI96 


BO 


J4LS02 


22 


74LSS4 


30 


741S151 


55 


74LS241 


1 to 


MLS04 


25 


74LS74 


35 


74LS1S3 


SS 


74LS2** 


t 10 


74L5aS 


25 


74L5 76 


35 


74LS156 


•0 


74LS24B 


»0 


74LSI0 


29 


74LS83 


60 


74LSISi 


50 


741S2S7 


55 


MLSll 


» 


74LSa6 


35 


74LS1S1 


70 


74LS2U 


G5 


I4LSI2 


30 


74LS92 


SO 


74LS163 


70 


74LSia3 


ts 


74LS20 


29 


74LS9S 


70 


74LSIM J 10 


74LSI9S 


B5 


74LS21 


JO 


74LS112 


35 


74LS1B9 


95 


I4LS352 


1 00 


74LS2* 


30 


74LS122 


40 


74LS17* 


60 


74LS366 


45 


74LSje 


4S 


74LS123 


70 


74L51B1 


BS 


741536B 


45 


74LS32 


30 


74LS12S 


45 


74LS193 


75 


74LS393 


1 20 


74LS3I 


40 


r4LSI32 


es 


74LS194 


60 


74LS395 


1 20 




won .XI 40121 38 


401:1 90 4041 ti Of «oros 4o 


4002 30 4013 40 


40 J 3 


30 4041 


SO 4086 


90 


400« 105 4014 1.00 


402* 


75 404 7 1 


20 4510 


' 05 


4007 .28 4015 1 DO 


4021 


70 4049 


40 4S12 


t 00 


400B M 401« SO 


4037 


J 00 40SO 


40 451 B 


t 05 


4010 50 4019 50 


4034 


2 60 4051 


■S 4532 


1 SO 


4011 .30 4021 90 


4040 


1 05 4066 


SS 45 38 


1 50 



FND357SI.50 FN0800 11 96 UAN461012 10 MANB71013 10 
FNO500 1.50 HAPI3620 2 00 HANM4a 4 10 WAN6750 2 90 
FNDS07 150 MAN3630 2 00 WANflSSO 4 10 li1VS023 25 



STANDARD TIN 



PINS WRAP PROHt-E 
14 1 .6S 1 .30 



EPROM phoshammino 

SunEronica Mill 'Bp'oduct vof progfam i 
EPROM iiiDDliad bv ui from VDur 
Miliar pnOWJEPRDM snlf 



2708 
2716 
2732 

Optic 



1 BBS 

19 9S 
31 .9S 



II no HAL IF KOMI 
t 700 

16.00 
28.00 
. 19.00 



1.S3 



.85 



Send rour UaatH EPflOU/^ROM withorda'. Ba 
tiir4io pack manii-aiaTic ma ta rial, and piol act il 
pEopcfly {w« Bia not liabia lot Btlippmg damaga] 



5' . Carbon Film Resistors 

IN' All JALLiES 

' .*l01c-40C ■;W10lorbC: 



MICHO>>nOCESSOItS RAMS 2147[ail.l1 16 84 

Z-BO t9.:0 BSOO 17.50 2101 |IS«i4| 12 70 4027 llSOnSI 4 2S 

Z-BO* 950 8036 6 50 2102|1O!*.ll 3.20 4118[lSOnS) 4.95 

BOeOA 4.60 Sa09 23 50 2112ilU-i| 2 BO 411B|)00>SI 4 90 

S0B5A 5.70 BOM 95.50 2114 3 20 4l1BllllOnSI 4 10 

MMMGUPKMT DEVICES 2114L-2 4.50 4164 1200-1126.40 

•112 tZ.ZS 8253 17 50 

U1B 200 8257 1000 4SW BAM 

•224 260 «259 1150 t\mn 

8228 4 50 8275 32 DO EXPANSION KIT 

B23S 4.50 B279 7 20 For TRS'80(Modall ot III). Apple 

UVoM^I^MS '" ''" CO'"?""" 

2ra«M20 2732118*2 S« (8 ocj UPW16C-2 )200n»|S16 96 

771A 7 30 DMa (ijrfkiahod unth purchaaa on 'aquBal. 

MKHOmOCESSOa IHHRFACE ICa 

BT2B 11.15 BT97 11 41 74LS242 tl 79 74LS245 (2.85 

BTZB 2.30 aT9a 1 4B 74LS341 I /t 74LSZ73 1 SS 

BT95 1.49 74LSZ41 1.10 74LS344 1 10 74LS373 2 50 



IM ALSO SPECIALIZE 
.\ jiPASES! 

CC VIPl' -E 1^ AVO 
ElECTi^CN.C PACTS 



VOLUME 



£^ summNics co., inc. 



12621 CRENSHAW BLVD. D«pt. B 
HAWTHORNE. CALIFORNIA 90250 



MCAUFOMMA 



OUTSIOC CAUFORNU TOU. f REt 



(213^ S44-1149 1-800-i21S77S 

Mai Oidar — No Minmum: Send Woniy Q«itt a Ch«ti lo 
P.O. SOX 1967. HAWTHORNE. CA 902BO Use you' VISA w Mtjier- 
card |pl«as0 mdudft eitpiratioA datel Add S2 00 poiltge and handling 
10 Dfder Calilomia rg^idflnK Add &ih ules iib 



^SaeUstofAdv9rtls»rsonpag€418 



^301 



". . . (you) realize as you close In for the kill 
that maybe, just maybe, 
computers aren't superior after all." 



chasing and being chased. A good number 
forbeginnerstoenter is two; this will allow 
about 15 seconds of normal time between 
mode switches. Larger numbers provide 
correspondingly larger time intervals. 

Play continues until one of the two 
pieces is captured and that piece is de- 
clared killed. The player is informed of the 
score and a new scenario may begin at the 
player's discretion. 

Program Description 

This program will easily run in a 16K 
Level II Basic system, and if you have a 4K 
system you may leave out lines 300-350 
and change line 290 to 290 RETURN. The 
program will return to tine 10. As written, 
the program occupies about 3300 bytes. 
With the modifications for 4K, the require- 
ment drops to about 2200 bytes. 

Not Hard Enough? 

As with any game, it is possible to get 
proficient at Capture and the general re- 
course is to make the game harder. The 
simplest way is to decrease or increase 
the time slice. The shorter the time slice, 
the less time you have to catch the com- 
puter. A longer time slice makes it harder 
to get a feel for when the mode is about to 
switch, but it atso gives you more time to 
chase the computer. Changing the relative 
speeds of the computer and player is prot>- 
ably a more useful approach. 

Look at line 30— the index variable I 
used in the For... Next loop controls the 
relative speeds of the opponents. Inside 
the loop is a one to one speed ratio be- 
tween computer and player; immediately 
following this loop on the same line are 
two GOSUBs to line 60 and then to line 90 
which give the player an extra chance to 
move his piece. This makes it possible for 
the person to move faster than the com- 
puter. 

How much faster? Well, that is deter- 
mined by the value that the variable I 
counts to while executing the loop. In this 
case, since the variable I counts to two and 
the two GOSUBs at the end of the loop give 
the player a chance to move once more, 
the ratio of the player's speed to the com- 
puter's speed is (2-f1)/2 = 1.5. In other 
words, the person can move 50 percent 
faster than the computer. 

In general, for any value n that the vari- 
able I counts to in the loop, the ratio of the 
person's speed to the computer's speed is 
(n -f 1)/n. For example, in order to make 
the player go slower with respect to the 
computer you might want to change "FORI 
= 1T02" in line 30 to "FORI = 1T04". Here 
theratio will be{4 + 1)/4 = 1.2, resulting in 
the person's having a 20 percent speed ad- 
vantage over the computer. Be sure to 
make the same changes in line 50 since 
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the same argument applies there. Note, 
however, that this changes the actual 
length of time of the time slice. 

Gatting Into the Game 

I have made it possible for the user to 
bypass titles, credit and instructions by 
simply holding down the space bar. This 
gets the user into the game almost instantly. 



Once again, you can go back to the days 
of elementary school and play tag. And it's 
more than just a simple game; the mental 
confidence derived from playing the game 
is enormous whenever you trap the comput- 
er in the corner of the screen and suddenly 
realize as you close in for the Kill that may- 
be, just maybe, computers aren't superior 
after all. ■ 
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14,464 


1 2 4 8 16 32 &4 128 

Value of Key at memory location. 

Table 2. This chart is helpful for anyorie writing game programs in Basic. It will help 
in the programming method of recognizing keys while they are pressed rather than 
using the sometimes disadvantageous INKEYS function. Below each column is 
the value that will be present at that row's memory location as long as that key Is 
pressed. Notice that each value is an increasing power of two. The values are also 
additive: For example, pressing both the A and B keys will yield the value of 
2+4 = 6at memory location 14,337. The value generated by pressing a key remains 
the same until that key is released. 



Variable 
AS 

B$ 
C$ 
KS 

NAS 
Z% 

1,11 
PE 

CS.PS 
ST 

Tl 
TS 

XH.YH 

XUYL 
XP,YP 

XO.YO 



Description 

First used totioldthenameof the garTM, and later contains the retreat blocli that informs 

the player ot the computer attack mode 

String of btank characters used to erase the o\a block after the mode of play switches. 

Contains the "ATTACKll!" block used to Inform the player ot the compiler retreat mode. 

Used tor keyboard scanning to wait tor the player's decision to end play or engage In 

another scenario. 

Contains the player' s r^ame. 

Contains the message used to Inform the player he haa been ktllsd. 

Index variables used In simple For.. .Next loops and other trivial places. 

Holds the value of the pressed key. Determines movement of the player's ptece. For more 

information, see Table 2. 

Score values <CS = computer's score. PS — person s score). 

Status; indicates the mode of play (ST = 1 If computer allacks, ST = 2 otherwise). 

Current time variable that is used to time the interval between play modes. 

Value of the time slice that la entered by the player. Determines length of individual mode 

of play. 

Current posiilon ot the computer's piece In the 63 x 13 mairix within which both pieces 

move. 

Position of the computer's piece before any nwve. Uwd to erase the "O" after the move 

Current posltlor^ of the player. 

Position of player's piece before n>ove. Used 1o erase old position. 

Table 3. Variables Table. 



TEST 

YOUR 

WINGS 



Icarus had the right idea. He. and probably every man 
since the beginning of time, wanted to fly. He had the 
right idea, but the wrong equipment. With Instant Soft- 
ware's Flight Simulation Series and your TRS-80. you're 
equipped to fly the World War II reconnaissance mis- 
sions, perform the feats of a daring mountain bush pilot 
and experience first hand the tense atmosphere of an air 
traffic control tower. 

Find out what Icarus had to learn the hard way . . . and 
master it, with Instant Software's Flight Series. 



FLIGHT PATH 
O'Hari— A control tower sirruiatton m w^lc^ ya\j Mcom* ar Ait Traltic Coniiotl«f 
You are is&ponuDia tor hondrads of human liM^ »s you gu<cl« wciah ihrougT youf 
control B»ctor lo a ul« larx>rtg 

You'll hav« lodeai with (Jiffw«nl aifcrah r»c)ulracTwrta, wind crang* Mamlnga anj 
potATtiai rnid-alr colltaKim. 

Mounlairt Pilot— Traralotms you tnio a daring butn pik)l aa you tly badly naadad 
supplies to a fwnotft goM mlnir>g cairp You fnml crow a nazanlous mouniaio 
rvige. wtiiie sfugyi'ig twHh rwadwmds. Inehy naWgalioo and dlfnlnlaNng fMI. 
Pndaton ApfMoacIt Radaf-Combmas the sklia ol pilot and Air Tra 
Controller 

The Flight Path pact>a(}8 Imolwaa fou In txAti sUee of fitgnt pr " 

Irom ine inrlii of liylrtg lo ine tense drama of air iraltic conitol. 
Tn&W Model I Le/ai H t9K RAM Modal Hi. 16K 
(Mar No. 0171R-Aft$ Tape S9.9S t j> i^ » »^ whi 

NIQHT FLIGHT 

lis May iS4i.thedraacl*a Axis battleihlp. the 8lamarck,M 
broken out of the North Sm and is now aomawhara in ttte f 
AHantic. Your mission: rnake a mghlthr^e pnoto reconrtaisa 
over tne Bisniarck 

Somewriere oul in the co«d, gray North Allanllc. irta EHar 
to eiifda rtat pursjws Your pho«oa are v<lai- Launcri your*elf into 
mgm shy wilti IM Nignt Fhgrii oackag* 
TR&40 Model I. Level H. ^fiK: Modal ill. 16K. 
Ord*r Mm Olim^kSC Tape MJ5 iAjs u w *nicip^» 

JCT FIGHTER WLOT 

The Jel FIgnier Pilot p>kCKaoe lanes fuL as cioaa to real ( _ 
ing asposalbto. without puilirvgGs 

In this brilliantly realistic sla^uialion, yoj baooma the pll 
hign pertoimanca. twin turbaiel fighter Total control ollha aire 
isyotxa 

AH oonlrola (espond the same as thay would on a real |a4 flp* 
ar. YouK hawB tooonttarily monitor your display and rriaka 
adiuttmantt lo irour ttwottla. nape, i uddai and air apoiiart. Y« 
deckle when to retract liape. lar^ng gear arwl reieasa tM 
auiliiarv luat drop-tanks — i-m 

Ahei-you've tlo*n a 'ew mlwoni *.iin if^e 
Fighter pnchage, you'll Know you've a ' - 
Mir^s TRS«) Model I, Le«e( ll, 16K; H 
Qfte Ns. OlMNIfilTM St 



AIR FUGHT SIMULATION 

Mr Flight Simulation mlghi tw rpore itKt If lnitrurT»enl 
laliaolls and landings are rto Dicmc — aah any pitoi—arwl 
this computer sitniilabon is certain lo keap you on the edge 
ot ycuf seat 

You bagtn wtth a lull lank ol gas artd a Kght plan Ihai 
calls lor a stmpia laliaoH and ia<iding— at laaal until you gai 
itM hang ot II. Pay doaa anantton to your mstrumam panel. 
eapacMiy Iha angle ol asoanUbanfc indlcaior and air spaad 
—too steep a bank and your air spaed will 
Mkaastona. . and so wtl your plane. 
Llt'a about aa ckwa to tiw real tNng as you 

•t 1MB side ot a runway Tn&«) Model 
tf I Level It, 16K; Modal in 
' Ha. Ml m-AS4 Tape $t.*S 
.1 » l^'Op^na. 



I Radio Shack a oivteion 



andp Cofporabon 



Instant Software 



TO ORDER: 

So8 your tocai Inslanl Software dealer 
or call toll tfM 1-8002SB-5473 

O'Oerf oriy 

In New Hampshire 1 •603-324- 7296 

Mtn Ff> 800 am laUpinE&l 



Petertwrough. N H 03458 USA 



A division af Wayne Green lr>c 



DBS... 

true data base management 
for your TRS-80 " 

Your Model II is not a toy... and neither is MDBS. 
MDBS is the serious tool for applications development. 



Harvey M. Weiss* 

an independent 
software reviewer: 



ONLY MDBS has 
all these features! 



■'MDBS is truly a data base management system, ... not a file management system " 

"MDBS. . . offers the data manipulation, query, and report-writer capabilities of a DBMS 
found on much larger and more complex computer systems." 

"MDBS has come to the rescue with . . . products whose ability to reduce development time 
and implement processes not available elsewhere make them invaluable to integrators and 
developers o( ^c-based systems. [With MDBS,). . .program development and data base 
description is simple." 

For the complete Weiss review, see "Downscaling DBMS to the Microworld." Mini-Micro 
Systems. April. 1981, pp 187-195 

Flexible, powerful data structuring capabilities: network and hierarchical data structures, 
including direct many-to-many relationships (not available elsewhere) 

Genuine data base management capabilities: far surpasses file management in data 
independence, automatic maintenance of relationships, and control over data redundancy. 

English- tike, nonprocedural query language interface ad hoc queries result in the automatic 
generation of desired reports, tables, tiles, and relations 

Host language interfaces, including various BASICs. COBOLs, PASCALS. FORTRAN. PL/I, 
C. and several assemblers. 

Extensive built-in data access security (256 levels) 

Automatic transaction logging and data base recovery. 

Dynamic data base restructuring. ..and many other advanced data base management 
features. 

Is MDBS rieht MDBS is written in Z-80 machine language and runs under TRSDOS or NEWDOS with TRS 

for vour SVStem? "^'^^ BAStC; under CP/M? (and similar derivatives) with CBASIC2, PL/1, PASCAL Z, 

yuu ayawj PASCAL M, PASCAL MT*. BDS C, CIS COBOL, and Microsoft COBOL. FORTRAN, or BASIC. 

MDBS code size is only 18K to 20K bytes for Models I and II. 

MDBS IS independent of the types and sizes ol disk drives. Supports data base spread over as 

many as eight disk drives. 



Td learn more 



■uW 



Free pampnlet 



> For tree literature about serious data base management on Models I and II. call, write, or TWX 
us. We'll include a pamphlet on features to consider when choosing a software tool lor 
application system development. 

For a practical introduction to true data base management tor small computers, please send 
S20 (Indiana residents, add 80C tax) lor PRIMER/GUIDE booklets. 

• For a comprehensive DOCUMENTATION PACKAGE consisting of THE PRIMER plus user 
manuals covering the MDBS, QRS. RTL. and DRS. please forward $60 (* S2.40 Ind. tax). 



Setting standards of excellence for data base 
software. . .worldwide 



/Wlicrc 
Data Base 
Sustems. inc:. 

Box 248 

Lafayette. Indiaria 47902 
317-446-1616/TWX 810-342-1881 

Dealer/ distributor/ OEM inquiries invited. 




D Please send me free literature on the MDBS. 

a$20 (Ind. tax 80C) enclosed for MDBS PRIMER 
and GUIDE (total 97 pages). 

G$60 (Ind. tax $2.40) enclosed for Complete 
MDBS DOCUMENTATION PACKAGE. 



Name 



(Pleftae print) 



Title 



Company 
Address _ 



(SUte) 



(Zip) 



City 

Phone — - — — — — — — 

MAIL TO: Micro Data Base Systems, Inc. ^315 
Box 248- M 
Lafayette. IN 47902 



180 • 80 Microcomputing. December 1981 




> 




microcomputing 

the magazine for niS-90* users 



l!.V»:t.i«.t:U-inTMTy 



A Look into Peripherals 
and Microelectronics 



Ks;5^s^^ 



^nr^ 



,^llirTTrm^;,il|r» mm 






JJU^ 



Jt' I ^1 



AWAYNEOREEN 



AbeaulituI match. IheSmartmodam 
andtheJRS-BQ.'^urTRS 80 can talk with 
other computers ovef the telephone Imes- 
And with no acoustic tosses or ckstortions. 
Access tirrye-shanng systems andmfiX' 
mation uulfUes such as the Source.* 
CompuServe" and MicroNe*. 
Direct hook-up wHh no intefference noises 
The Smartrnodem hooks lo the telephorte 
line just tike a modular telephone, simpty 
(hsert m a wall iack. 
love at first stght' - your TRS-80 and 
theSmarlmodem! 

Brawny - because it does so 
many things. Auto-dtai and fiu!o-answer 
features buifttry. With the Smartmodem. 
youf TR&'SOcanau/ornam:e//K d'O' '^le 
tetephone.answerthetelephone receive 
and transmit, and hang up Ihe telephone 
Complelety unattended 
Putse dialmg or "fouch-Tbne. ' ' The 
Smartmodem can be connected to any 
teleptKXte system in tt>e U S because it 
allows pulse-dialing. Touch-Tone dialing 
or a cofnbir>alion of the two FCC 
appfoved 

Program controllable m any language us- 
ing ASCII character strings. TTiis is a unique 




MicroonmrKiter Compooent Systems 

feature ol the Hayes Smartmodem. 

Brainy - because it does ttiem 
alt so simply. Swon LEO indicators on 
me front panel grve you visual signals of 
the status of the Smartmodem: 
MR ' Modem Ready. SD Send Data. 
CD -Carrier Detected etc. 
The auchbmor»for/eafure lets you listen 
In" on thecal being dialed and the con- 
nection made. >bu are imnedlalelyalerled 
lo busy signals, wrong numbers, elc. 
Over 30 rtifforent commar}ds canbeer>- 
lered directly from your TRS-60 keyboard, 
ir^cluding the unk^ue Set' comniands 
which alkHv you lo select and char>ge var- 
ious oplnnai parameters such as dialing 
speed, escape code character. Ier>gth ol 



time lor a dial lone, and number of nngs to 
answer. There are 1 7 Set commarxls. 
The Smartmodeni ts completefycompat- 
ibfe with the BeH-i03 type modems, the 
type of modem most time-sharing systems 
have OperalKxi can bemfull or halt-duplex, 
with a transmisston speed of 3O0 baud. 

The Smartmodem Is ready to 
"gel-tooether with your TRS-80. 
TRS-eOModelllarxJTRS-80CoiO'Com- 
puters have RS-232 serial poi Is and can 
imnrtediately interface with Ihe Smart- 
modem. Expansions that permit use of 
the Smartmodem with TRS 80 Model I 
and Model II are availatile through your 
TRS-80 dealer. 

Match your TRS^O with a Hayec 
Smartmodem for a sophisticated, high 
performanced data communication 
system. Av.i.l.it)le at computer stores 
nationwide (except TRS-8 dealers) - 
call or wrile tor ttw ^^^ _ 
k>cation nearest I • l|-lfl\/^C 
you. And don t set V±J* *<*J^^ 
tie lor anything less ihdn Hayes. 
Hayes Microcomputer Products, Inc. 
5835 Peachtree Comers East. 
Norcross. Georgia 30092 (404) 449-6791 



%ur TRS-80 computer 

and the Hayes Stack Smartmodem. 

Beauty, Brains^and Brawn! 




1981 BUYER'S 
CUIDE 

A look into peripherals 
and microelectronics. 



A computer alone can be a dull machine. Fortunately dozens 
of devices will plug into or solder onto your TRS-80 to extend its 

usefulness. Computers talk to each other through modems. Expan- 
sion interfaces permit attachment of printers and other peripherals. 
Speed-up kits make your TRS-80 faster This guide surveys many pe- 
ripherals and small electronics on the market for the TRS-80. (A sub- 
sequent issue will cover disk drives; a buyers' guide in the June, 
1981, issue covered printers.) 

Charts list video monitors/receivers, memory expansions, expan- 
sion interfaces, modems and speed-up kits (clock and cassette). 
This is a convenient though not a comprehensive way to compare 



the products. Many offer unique features not easily charted. Also, 
different price or performance do not always mean one product is 
better than another. Users should weigh price and performance 
before buying. 

We have also listed in paragraph form peripherals and small elec- 
tronic devices that do not tit into any distinct category or have little 
competition. This section is by no means complete. It is a sample of 
what is or could become available. 

Think of this guide as a quick reference. Get ideas of the devices 
best suited for you and contact the manufacturer or marketing 
agent for more Information. ■ 



PBI 

(The Programmable Buffer Interface) 



The PBI allows you to continue your 

work without waiting for the printer lo 
complete a printout. The PBI stores the 
printout data without using the host com- 
puter's memory. The user may link one or 
more host computers with the PBI. PBI 
models available are: Single Parallel (16K}. 
Dual Parallel (32K), Single Parallel and Sin- 
gle Serial (RS-232), Dual Serial, and Dual 
Parallel and Dual Serial. A 16K upgrade is 
available for S1S0. 

Mlcfocompatlble 
PO Box 7624 
Atlanta, GA 30357 
$299-$699 



Interfacer 80 



Interfacer 80 is an input/output inter- 
face. It has eight input and eight output 
channels. INPand OUT operations can be 
done at a rate of up to 200 per second in 
Basic. Interfacer 80 may be used in con- 

— Reader Smvicif lar failing page ^352 



junction with any other TRS-80 accessory. 
Applications for this product include 
building and home security, lighting con- 
trol, automatic testing systems, intelli- 
gent remote control, and many others, A 
bus converter is required for the Model III. 

Alpha Products 

85-71 79th St. 

Woodhaven, NY 11421 

$159, Model I; $198.50, Model III 



UPI-3 



Universal Printer Interface 



The UPI-3 offers automatic insertion of 
a line feed and null after a carriage return. 
handshake polarity for RS-232 printers, 
seven or eight data bits per word, parity or 
no parity, odd or even parity, and one or 
two stop bits. The UPI-3 eliminates the 
need for machine-language drivers to be 
loaded into high memory because it 
already contains such a routine in the 
Level II ROM. 

Speedway Electronics 
Division of Binary Devices 
11560 TImberiake Lane 
Noblesvllle, IN 46060 
SI 39.95 



Doubler II 



The Doubler II is a plug-in, double-den- 
sity adaptor With this product, the user 
may use single or double-density disks 
and have the hardware to convert Model III 
disks to Model I. The Doubler II features a 
write compensation circuit that minimizes 
bit and peak shifting. Included in the 
package is the D8LD0S program. 

Percom Data Company, Inc. 
211 N. KIrby 
Qartand, TX 75042 
$169.95, Model I 

Controller 

Model 488-808/0 

The Model 488-80B (Model I) and C 
(Model III) allows as many as 15 GPIB-48a 
peripherals with a minimum of 16K. 
GPIB-488 devices includes printers, plot- 
ters, digitizers, displays, recorders, 
measurement and test equipment. Soft- 
ware is included. 

Scientific Engineering Laboratories 

11 Nell Drive 

Old Bethpage, NY 11804 

$325, Models I & III 
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Micro-Labs' CPRI NT Module 



Real Time 
Audio 
Spectrum 
Analyzer 

Model VTU02 

This device analyzes sound with a video 
graph display on the TRS-80. Forty-two 
vertical elements are available. The Real 
Time Spectrum Analyzer comes with the 
necessary software, instruction manual 
and a keyboard overlay. Optional acces- 
sories include special purpose software 
and a microphone and pink noise filter. 

Eventide Clockworks, Inc. 
265 West 54th St. 
New York, NY 10019 
$595, Level It Basic 

Timedate 80 



Timedate 80 is a real-time clockycalen- 
dar. It plugs directly to the TRS-80 key- 
board and must be set only once. Time- 
date 80 is quartz crystal based and is ac- 
curate to within a tew seconds per month. 
It comes with two sets of software: Time- 
set, containing instructions for setting 
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Timedate 80; and Time$, which will print 
time and date when LLISTIng a program. 
A "Y" option allowing Timedate 80 to be 
placed inside the expansion interface is 
available for $12. 

Alpha Products 
85-71 79th St. 

Woodhaven, NY 11421 
$95 



CPRINT 



The CPRINT module gives the Color 
Computer a plug-compatible, Centronics- 
type parallel printer port for use with all 
parallel Radio Shack, Centronics, Epson 
and similar printers. All LLIST and Print 
#-2 output is automatically rerouted. A 
screen-print function can be initiated at 
any time and line width can be set. The 
graphics in the LP VII can be accessed. 
Page length can be set, and blank lines 
are Inserted between pages. 

The CPRINT module is a fully buffered, 
eight-bit I/O port which will interface with 
any Model I/Ill products which plug into 
the printer port. 

CPRINT is compatible with all ver- 
sions of the Color Computer and uses no 
extra memory. 

Micro-Labs, Inc. 
902 PInecrest 
Richardson, TX 75080 
$49.95 




The Eventide Real Time Spectrum Arialyzer 

Word 

Processing 

LowerKit 

The Word Processing Lowerkit is a 
3-1/2-inch square piggyback board de- 
signed to press in place, without solder- 
ing, inside the TRS-8O1 Color Computer. 

The purpose of the Lowerkit is to dis- 
play true upper and lowercase characters. 
As an added feature the kit uses a 7 by 



9-dot matrix for display (rather than the 
built-in 5 by 7 matrix) for large, clear let- 
ters. All characters have descenders 
where necessary (comma, semi-colon, 
lowercase letters g, j, p, q, y). The charac- 
ter set in the standard generator is fulty 
compatible with the normal Color Com- 
puter character set, with the exception 
that lowercase letters are correctly 


to the bus at the back of the keyboard 
or to the expansion box on the TRS-80. For 
use with PMC-80, it can be connected to 
the 40-pin connector on the PIF-40 inter- 
face adapter. 

The REX-80 comes with a 40-pin flat 
cable and a 9V power pack. 

Personal Micro Computers, Inc. 

475 Ellis St. 

Mountain View, CA 94043 

$72 


units can be cascaded from the spare 
40-pin connector to permit more analog in- 
puts. A nine-volt power pack is included to 
operate each AIM-80. 

Personal Micro Computers, Inc. 

475 Ellis St. 

Mountain View, CA 94043 

$89 


displayed. 
MSB Electronics 


EPP-80 


Barra, VT 05641 
$79.95 


AIM-80 

Analog Input Module 

The AIM-80 is a plug-in device including 
an eight-bit analog to digital converter 
which accepts up to eight analog inputs 
of to +5 volts DC. The eight inputs can 
be hardware selected to any block of eight 
ports of the 255 available ports on the 
TRS-80 and PMC-80. 

The AIM-80 provides joystick inputs 
or a total ol eight different transducers 
can furnish the computer with varying 
data information. 

The AIM-80 plugs directly into the 
TRS-80 40-pin bus without the necessity of 
a cable. Connection to a PMC-80 requires 


Eprom Programmer 


REX-80 

ROM Extender 

The REX-80 is a plug-in device for 
the TRS-80 Model 1, Level II, or for the 
PMC-80 with the PIF-40 interface adapter. 
The REX-80 enables use of the 2,014 emp- 
ty address locations between the end of 
Basic ROM and the computer's RAM. The 
address space available is from 3000H 
to 37DDH. 

The REX-80 allows interchangeable 
ROMs (EPROMs) with commonly used 
machine-language routines and pro- 
grams to be accessed by System or USR 
commands. 

A 40-pin flat cable connects the REX-80 


The EPROM programmer is a plug-in 
board, It permits programming of 2716 
( + 5 Vdc 2K) EPROMs and operates with 
the Radio Shack tape Editor/Assembler, 
Version 1.2. 

An EPROM controls the operation of 
the EPP-80 and provides automatic modi- 
fication of the Editor/Assembler through a 
system call. The EPP-80 requires that the 
user provide -*- 5 Vdc @ 1 A and -f 25 Vdc 
@ 50 mA. A 40-pin flat cable is included to 
connect the EPP-80 to the computer. 

Personal Micro Computers, Inc. 

475 Ellis St. 

Mountain View, CA 94043 

$85 







Introducing Correction Free Typing! 



We all make mistakes, but now you won't have to with 
TAT 1 .0"*^ (The Automated Typewriter} at an Introduc- 
tory cost of only S19.95! 

TAT lets you enter, edit and correct your letters, lists, memos, reports. 
Chen prints your [ext when you are happy wtth it. If you are uncom- 
fortatile w\[h your typewriter you'll love TAT, TAT is not for expert 
typists. (TAT IS for TRS 80'^' models I and III ) 

FEATURES: 

• Works with tape, disk ot wafer 

• Non-destiuctive cursor, forward and reverse 

• Tabs forward and backward 

• Repeating control keys 

■ Character insert and delete 

■ One stroke line duplication 

• Left and right marginjustification 

• Block mcwe [move line groups) 

• Push/pull (move data to/from previous/next line to/from 
current line) 

• Scroll Scanning 

• Quicker entry mode (without above correction feature)* 

• Slower entry mcxJe [with above correction features)* 
'Enter your text in quicker mode- ihen sciin. fix and adjust 

TAT also available with 

GORM " will combine a TAT text file, letter, contract, etc with a 

TAT substitution list to give that personal touch to form letters 
CAGE™ Page Chainer-merges TAT I files. Best for low 

memory users 
MIST ■" List maker wrth fast sorL reguires TAT [Available soon) ^2« 



WITH THIS ORDER 

TAT 1 .0 now only S 1 9.95 

GORM I4.9S 

CAGE 8,9b 



SOLO SEPARATELY 



normally S24 95 
19 95 
1)95 



Programs are distributed on cassette tapes Please specify your 
computer model and attachments- 
Minimum System-I6K level II 




Look for future programs from 



Send me 




P.O. Box 6 1 44. Whiineyvtile, CT 065 1 7 

^^^^^.^ TAT 1,0 Programis) on cassette for 

only SI9.95each plus SI, 50 for postage and handling Also 
include on TAT I 

U GORM at S 1 4 95 C CAGE at S8 95 

D Cash C Check U Money Order 



Type of Model I own 



NdfTIf 



Ai.1i1fes\ 



Civ 



Siale 



I'P 



f IfdSf jlk-iw 2- i WitHt!, lor deltvpfy 

Co'inc(.|i(.u( t('Si(lr'nr\ .^ik) 7 ' % ■will"'. I.>» 
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Clock and Cassette Speed-ups 



Manufacturer Model Clock or Cassette speedup Compatible Computers 



Archbold Electronics Speed-up Unit Ciock Model I 

10708 Segovia Way Level I or 11 

Rancho Cordova, CA 95670 



Exatron Speed-up kit Clock Model I 

181 Commerctat St. Level i or II 

Sunnyvale, CA 94086 



JPC Products Co. TC-8 Cassette Model I 

12021 PaisanoCt. Level H 

Albuquerque. NM 87112 



Mumford Micro Systems SK-2 Clock Model I 

Box 400-E Level I or 11 

Summerland, CA 93067 



Personal Micro Computers, Inc. Fastload FCI-80 Cassette Model I, Level II 

475 Ellis St. PMC-80 

Mountain View, CA 94043 



Expansion Interfaces 

Model Compatible Computer Memory Size 



Manufacturer 



LNW Research Corp. System Expansion Mod I. Level II 32K 

2620 Walnut 
Tustin, CA 92680 



Lobo Drives International LA-*iO Moa i 32K 

354 S. Fairview Ave, 
Goleta.CA 93117 



Micro Design MDX-1. MDX.2 Mod I 32K 

PO Box 748 
Manchaca. TX 78652 



The MicfoMint, Inc. Disk 80 Mod I 16K/32K 

917 Midway 
Woodmere, NY 11598 



Tandy/Radio Shack Expansion Interface Modi 0/16K/32K 

1600 Tandy Center 
Fort Worth. TX 76102 



Exatron Color Computer Color Computer 32K 

181 Commercial St. Interlace (CCJ) 

Sunnyvale, CA 94086 



Daltex Systems Internal Expansion Board Mod I 32K 

5308 Prince lEB 

Lake Dallas. TX 75065 
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Load Baud Rate Save Baud Rate 



Acceptable 

Cassetle Length Speedup LEDs 



Price 









2-3X 


Tri-colored LED 


$45 








2X 


1 LED. toggle 


$19.95 


3100 


3100 


10-60 min. 




N 


$90 kit 
$120 








1.5-2X 


Optional 


$24.95 


8000 


500 


20min. 




N 


$155 



Drives Printer 

Supported Supported 



RS-232 EPROM 



Y(4) 



Y(4) 



Y(4) 



N 



optional 



LDOS 
EPROM 



2K or 4K 



Real-Time 
Clock 



Data 
Separator 



P.C. Board 
only 



optional N 



2716 



optional Y 



N 



NA 



Price 



$89.95 



$862 



$64,95 

$74.95 



$329.95 
$379.95 



$299 
$398 
$497 



$199 



$30 
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Memory Expansions 



Manufacturer 



Model 



Compatible Computer Expansion Size 



141 Harvard Ave, 
Tacoma, WA 98466 

Spectral Associates 



Cecdat, Inc. 


The Patch 


Mod 1, Level II 


vartM 


PO Box 487 








Hayden Lake, ID fOKVi 








Displayed Video 


U3000 


Mod t. Level tl 


IK 


7538 JacKson Rd. 








Ann Arbor. Ml 48103 








Displayed Video 


2K Hideaway 


Mod 1. Lov«l II 


2K 


Holmes Engineering 


IM-1B, IM-2 


Mod 1, Level II 


32K/48K 


6246 West 3705 South 


The Internal Memory 






Salt Lake City. UT 84120 








Micro-Labs, Inc. 


CMEMORY 


Color Computer 


8K 


902 Pinecrest 








Richardson, TX 75060 








The Peripheral People 


Sidecar Memory 


Modi 


2K 


PO Box 524 








Mercer Island. WA 98040 








Spectral Associates 


Ramcharger 


Color Computer 


16K-32K 



Supercharger 



Color Computer 



64K 



Video Displays 



Manufacturer 


Model 


Bandwidth 


Screen Size 


Resolution 


Amdek Corp. 


Color-1 


3-4 MHz 


ir 


260x300 pixels 


2420 E. Oakton St.. Suite E 


Color-2 


8-9 MHz 


13" 


560x240 pixels 


Arlington Heights. IL 60005 










Eiectrohome, Ltd. 


Q07 


5.S MHz 


13". 19" 


370x235 pixels 


809 Wellington St. North 










Kitchener. Ontario 










Canada N2G 4J6 




• 






Eiectrohome 


ECM 1302-1 


6 MHz 


ir 


370x235 pixels 


Eiectrohome 


ECM 1302-2 


10 MHz 


13" 


580x235 pixels 


Eiectrohome 


609 


25 MHz 


13" 


720x512 pixels 


Eiectrohome 


C5&O90 


6 MHz 


10" 


370 X 235 pixels 


Image 21 /Sony 


UM2112 


3 MHz 


ir 


525x300 pixels 


1303 Broadway 










Dakota City. NE 68731 










Image 2l/Sony 


RM2112 


3 MHz 


ir 


525x300 pixels 


Radio Shack 


TRSSO 


NA 


13" 


NA 


1600 One Tandy Center 


Color Video 








Fort Worth, TX 76102 
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Soldering Software Extended Basic 

Memory Area Required Availabie Chip(s) Used Compatible Price 



0000-2FFF 


N 


Self-contained 


2532 


Y 


$94.97 






3000-37FF 
3000-3FFF 


N 

N 


Y 
NA 


2114 

2716 


N 
N 


$64.95 

$49.95 






8000- 
8000- 


BFFF 
FFFF 


N 


Not needed 


2K RAMS 


Y 


$59.50 (less RAM) $85.50 (W/16K RAM) 
$89.50 (less RAM) $140.00 (w/32K RAM) 


COOO 


-EOOO 


N 


N 


2K RAM or 
2716 EPROM 


NA 


$24.95 

$19.95 






3000- 


-3FFF 


N 


Y 


2114,2716 


N 


NA 






NA 

NA 




N 
N 


NA 
NA 


NA 

NA 


Y 
Y 


$99.95 
$299.95 







Features 



Composite Input 
RGB input 



Hardware {Modification Required Price 



$449r$999 



Controls: Video Drives— Red and Green, CRT cut off Red, Green and 
Blue. Focus, Screen, Vertical Linearity, Vertical Height, Vertical Hold, 
Horizontal Frequency. 
Tabs: Vertical Centering, Horizontal Centering, Both 3 position. 

Brightness Control, Off/On Switch with Pilot Light 

Brightness Control, Off/On Switch with Pilot Light 

Brightness control 

TTL computer control, RF In, video in, RGB in, video out. Mix RGB wl video N 



$408, $444 



$550 
$950 
$633 
$900 



Loop through in video and audio 



Modification on video output 



NA 



$725 

$750 
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Modems and 
Acoustic Couplers 




Manufacturer 



Model 



Hayes Smartmodem 

Compatible Computer Baud Rate 



Blzcomp 

PO Box 7498 Menlo Park, CA 94025 


Model 1080 
Versa Modem 


Alt 


0-300 




Bizcomp 


Model 1084 
Intelligent Modem 


All 


110, 134.5. 
150. 200, 300 




Blzcomp 


Mode! 1022 
Intelligent Modem 


All 


110, 134.5, 
150. 200, 300 




Bizcomp 


Model 1030 

Intelligent Modem 


All 


110,134.5, 
150.200,300 




Bizcomp 


Model 1031 
Intelligent Modem 


All 


110. 134,5 
150,200, 300 




Emtrol Systems. Inc. {ESI) 
123 Locust St- 
Lancaster, PA 17602 


Lynx 


Mod 1 or 111 


300 




Hayes Microcomputer Products, Inc. 
5835 Peachtree Corners East 
Norcross. GA 30092 


Smartmodem 


All 


300 




ICROM Enterprises. Ltd. 
1240 Bay St., Suite 505 
Toronto, Canada M5R 2A7 


Modem-80 


Mod 1, Level 11 


25-300 




Kesa Co. 

774 San Miguel Ave. 

Sunnyvale, CA 94086 


data Speak 
Model O/A-30 


All 


300 




Micromale Electronics 

2094 Front St- 

East Meadow, NY 11554 


Micronet 
Model AM-232 


A)) 


0-300 

1,200 optional 




The Microperipheral Corp. 
2643-151st Place N.E. 
Redmond, WA 98052 


MicroConnection 


Mod 1, Level 1 & II 


300 




Microperipheral Corp. 


MicroConnection 


Mod II or III 


300 




Novation 

18664 Oxnard St. 

Tarzana.CA 91356 


D-CAT 


All 


0-300 




Novation 


CAT 


All 


0-300 




Radio Shack 

1600 One Tandy Center 

Fort Worth. TX 76102 


Modem 1 


All 


300/600 




Radio Shack 


Telephone Interface II 


All 


0-300 




Syntex Electronic Innovations 

Box 4034 

Lancaster, PA 17604-4034 


Phodem 


Mod 1 or III 


300 
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Full Half RS-232 Receive Transmit 

Duplex Duplex Simplex Required Sensitivity Sensitivity Modes 



Acoustic (A) or 
Modem (M) Price 



Y 


N 


N 


N 


-46dBm 


<-9dBm 


Talk/Data 


M 


$119 


Y 


N 


N 


Y 


-46dBm 


<-9dBm 


Auto Answer/Auto Dial. 
Command/Data 


M 


$299 


Y 


N 


N 


Y 


-SOdBm 


<-9dBm 


Auto Answer/Auto Dial, Command/ 
Data, Auto-Repeat Dial, Self-test 


M 


$595 


Y 


N 


N 


Y 


-50dBm 


<-9dBm 


Auto Answer/Auto Dial, Command/ 

Date, Auto-Repeat Dial 


M 


$395 


Y 


N 


N 


Y 


-50dBm 


<-9dBm 


Auto Answer/Auto Dial, Command/ 
Data, Auto-Repeat Dial, Self-test 


M 


$496 


Y 


Y 


N 


N 


-50dBm 


<-9dBm 


Manual originate/Answer or Auto M 


$279,95 Mod 1 














Dial/Auto Answer 




$299.95 Mod lit 


Y 


Y 


N 


Y 


-50dBm 


-lOdBm 


Auto Answer/Auto Dial 


M 


$279 


Y 


Y 


N 


N 


NA 


NA 


Auto Answer/Auto Dial 


M 


$249 


Y 


N 


N 


Y 


-50dBm 


-9dBm 


Originate/Answer. Normal, Test 


M 


$129 


Y 


Y 


N 


Y 


up to -45dBm<-9dBm 


Auto Answer/Auto Dial, 


















Manual Originate/Answer 


M 


$249.50 


Y 


Y 


N 


N 


uplo -60dBm 


-lOdBm 


Aulo Answer/Auto Dial (optional) 


M 


$249 


Y 


Y 


N 


Y 


up to -60dBm 


- lOdBm 


Auto Answer/Auto Dial (optional) 


M 


199.50 


Y 


Y 


N 


. Y 


-45dBm 


NA 


Data, Talk, Monitor, Normal, Test M 


$199 


Y 


Y 


N 


Y 


NA 


NA 




A 


$189 


Y 


N 


N 


Y 


- 45dBm 


-lOdBm 


Originate, Answer 


M 


$149 


Y 


Y 


N 


Y 


- 45dBm 


NA 


Originate, Answer, Test 


A 


$199 


Y 


NA 


NA 


Optional 


NA 


NA 


NA 


M 


$85 
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CONSTRUCTION 



A to D wizardry. 



Real World Interface— Part III 



Elliot K. Rand 
P.O. Box 552 
Melbourne, FL 32901 



Editor's Note: Part I of Mr. Rand's series on 
the real world interface appeared in ttie Oc- 
tober 1981 issue of BO Microcomputing and 
part II ran last month. 



u 



ntil now you have been unable to leavb 
the keyt>oard to enter new data into the 
system and alter program results. But I will 
show you how physical Information can be 
converted into a form the computer can use. 
Before a computer can interact in a so- 
phisticated way with the real world, It must 
receive a detailed electrical picture of a 
physical condition. Microphones and pho- 



VOLTaGE TO PHEOUENCT 
CONVEBTEH 



FIV, 1 



COMPUTES) 



Fig. 1. Voltage-to-Frequency Method 







<«feh£«:e 

VOLTtGE 
SOUttCE 
< V,(t> 








la} 




"■SUFBl-Y 



(c) 





<b) 



(d) 



Fig. 2. Comparator Operation. If the voltage at a comparator's positive input is more 
positive than the voltage at Its negative input, the capacitor's output is pulled high. If the 
voltage at the negative input becomes more positive than the voltage at the positive in- 
put, the capacitor's output becomes low. In most applications, introduction of a small 
amount of positive feedback (hysteresis) will eliminate noise at the crossover voltage. 
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totransistors make that kind of electrical 
analogy. So do transducers. But the pic- 
tures painted by the analog voltages of the 
transducers must be converted into a digi- 
tal equivalent before the computer can un- 
derstand them. 

The computer counts in whole numbers 
which change abruptly. Analog voltages in 
the transducers are almost continuous. 
(The voltages change quickly but not in- 
stantaneously.) Converting these voltages 
to digital in an eight-bit system creates er- 
rors as great as .4 percent in the analog to 
digital conversions. The conversions are 
made by an analog-to-digital converter. Six 
types of converters are voltage-to-frequen- 
cy, dual-slope, flash (or parallel), ramp, 
tracking and successive approximation. 

Volt age-to- frequency converters gener- 
ate an output frequency proportional to an 
Input voltage (See Fig. 1). The output may be 
gated and counted, and the count will be 
proportional to the input. Other than using 
the computer as a counter, the approach is 
hardware oriented. It is slow and requires 
specialized integrated circuits. Its main use 
is for data transmission in audio form. 

The remaining five converters use com- 
parators (See Fig. 2). 

The dual-slope (See Fig. 3) is a common 
converter used In digital voltmeters and 
multimeters. It is inexpensive and can be 
made very accurate with precision compo- 
nents. But it is extremely slow and hard- 
ware-determined and essentially reduces 
the computer to a counter-timer. 

The faster converter is the parallel or 
flash (See Fig. 4). A comparator circuit is 
provided for each anticipated voltage. To 
measure all the voltages In an eight-bit 
system would require 255 comparators and 
255 reference voltages and a means to con- 



now an 
eprom 

programmer 
you can 
afford 



1. Self contained Power Supply. 

2. Fully assembled and tested Printed 
Circuit Board. 

3. Complete with Ribbon Cable and 
40 Pin edge connector, can be 
plugged into keyboard unit or 
screen printer board of the 
expansion interface. 

4. Complete with Software for any 
Level II System (16K plus), now an 
EPROM program you can afford. 

5. Zero insertion force socket. 

6. 90 day factory warranty. 




Blank 271 6 EPROM's @ $4.95 plus postage 




SYSTEMS IIMC 



BUILDING 1 ENTRANCE A 165 FRONT ST 
CHICOPEE MA 01013 ^257 

Software included with system 
available on Cassette Tape 
or Formatted-only diskette. 

Please check appropriate box below. 

n Tape 

n Formatted Diskette' 
* Please add $5.00 for disk version. 



2716 EPROM Programmer $79.00 

Blank 271 6 EPROM's @$4.95 ea. plus 1.50 postage 

Enclosed is my check or money order for $ 

Please charge my credit card below: ~ vba a M«reB chai»« 



L-L 



Signature 
Send to: 
Name_„ 



(Required on charge orders) 



Address. 



City. 



Mass residents add 5% Tax 



State. 



Zip 





IIIIIIIIIIIIIIK 



'The successive approximation 
technique is unbeaten 
for speed and efficiency. " 



vert the output signals— which are not bi- 
nary—to a usabie form. Since the converter 
is ail hardware, it requires no counter or 
timer circuitry. For my interfacing experi- 
ments, I will be using a version of flash — 
the window comparator (Fig. 5). 

Although there are differences in soft- 
ware, the hardware is identical in the re- 
maining converters (See Fig. 6.). They fully 
use the microprocessor rather than spoon 
feeding it with a specialized integrated 
circuit and suffering hardware-imposed 
limitations. 

In the ramp converter (See Fig. 7), the 
computer causes the digital-to-analog con- 
verter output to rise to zero until it exceeds 
the unknown voltage. Then the comparator 
switches, telling the microprocessor the un- 
known voltage is between its previous and 
present count. For low voltages, the ramp 



CALL 0A7F 


NUMBER LOG ENTRIES 


LD(6B551, HL 


STORE » ENTRIES 


RET 


RETURN TO BASIC 


CALL 0A7F 


GET DELAY INTO HL 


LD (6B60), HL 


STORE IT 


EXX 


PRIME REGISTERS 


LD DE, (6B55) 


LOG ENTRIES 


LD BC, (6B60) 


DELAY INFO 


EXX 


MAIN REGISTERS 


LD DE, 6000 


DATA STORAGE 


LD A, 89 


INSTRUCT B255 


OUT (7F),A 


OUTPUT TO 8255 


EXX 




LOOP1 DEC DE 


COUNT LOG ENTRIES 


EXX 




NOP 




LD HL, 0080 


fiJD ROUTINE 


LDA, L 




LDC, H 




ORG 




LOOP2 OUT(7C).A 




NOP 




NOP 




NOP 




IN A,(7E) 




AND 01 




JH NZ. 


SKIP 


LDA, L 




ORG 




LDC, A 




SKIP LD A, L 




RRCA 




LDL, A 




JRNC, 


,LOOP2 


LDA, G 




LD (DE), A 


;STORE DATA 


INCDE 




OUT (7C1,A 




EXX 




LD BC, (6B60) 




LOOP3 DEC BC 


; DELAY 


LDA. B 




ORG 




JRNZ, 


,LOOP3 


LDA, D 




ORE 




JRNZ, 


;L00P1 


EXX 




HET 




Source 


Listing 



converter is fast, but for higher ones it is 
very slow. It is infrequently used with micro- 
processors because it reduces them to 
binary counters. 

The tracking converter starts out like a 
ramp but once acquiring the unknown volt- 
age it follows it by decrementing the digital- 
to-analog converter's output when the com- 
parator's output goes high. If it goes low, 
the digital-to-analog converter's output is 
incremented. After acquisition of the un- 
known voltage, the ramp Is the fastest soft- 



ware-controlled converter (See Fig. 8). 

The successive approximation technique 
is unbeaten for speed and efficiency. It 
requires only eight counts regardless of 
the analog voltage value. And its output is 
binary, so conversions to that form are 
unnecessary (See Fig. 9). 

Anatog-to-Digltal Circuitry 

Some additional circuitry is needed for 
the real world interface to function as an an- 
alog-to-digital converter (See Fig. 10). It 



SWITCH I '"*■- 

LOGIC 




INTEGRATOn 



^ 




COMPARaT0« 



COUNTER/TIMER 
CONTHOL LOGIC 
I0« COMPUTERl 



DATA OUTPUT 




SWITCHING LOGIC 
CHANCES INPUT FROM V, 
TO -V„( 

ItNTEGRATOfi C DISCHARGES 
THRU H UNTIL COMPftRATOR 
INDICATES ZERO-CROSSING) 



INTERVAL 
PROPORTIONAL 
TO VOLTAOe 



Fig. 3. Dual-slope Converter. This converter integrates an unknown voltage for a fixed 
period of time. The result is a positive slope that is approximately linear At the end of 
the time period, the input voltage is switched to a negative reference voltage. The com- 
parator output remains high until the integrator output reaches zero. Because the inte- 
grator averages the unknown voltage, it is virtually immune to noise, hum and other 
kinds of interference. 




Fig, 4. Flash (Parallel) Comparator. 
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Enter The Soft Sector Marketing 

ARCADE CENTER 



J. 



J 



i 



ALIEN 
DEFENSE 

1981 Soft Sector Mkt 

Mod I or 111 Tape, 16K 

$19.95 
Mod I or III Disk*, 32K 

$24.95 

Onh/ i^Axl III vefson has 
ExTenaed GfODhics 




ROBOT AHACK 

by 3iQ 5 

Mod I & III Tape 

$15.95 
Mod I & III Disk 

$19.95 



GALAXY 
INVASION 

Dv Big 5 

Mod I & III Tape 

$15.95 
Mod I & III' Disk 

$19.95 




SUPER 
VADERS 

*^1981 Soft Sector MkT 

Mod I or III Tape $19.95 
Mod I Disk $24.95 
Mod 111 Disk $24.95 

-2 Plover- 10 Levels - 

Ask tof uograde info tor 

IWADEfJS PLUS & 

TPS-SUPEf? NVADE^S 




SCARFMAN 

^1981 Comsott Group 

Mod 1 & III Tape 
$15.95 

Mod 1 & III Disk 
$19.95 



METEOR 
MISSION 2 

by Big 5 

Mod I & 111 Tape 

$15.95 
Mod 1 & III Disk' 

$19.95 





ATTACK FORCE 

ov 9ig s 
Mod I & III Tape 

$15.95 
Mod I & lit Disk* 

$19.95 



R 




SUPER NOVA 

Dy Big 5 
Mod I & HI Tape 

$15.95 
Mod I & III* Disk 

$19.95 



MQ'M 
tOi lA lOi rih A A Kh lOt Ai 



LUNAR LANDER 

Dv AcJventure 

Mod I & III Tape 

$15.95 

Mod I & III Disk 

$20.95 




ft 




STAR FIGHTER 

Mod I & III Tape 

$24.95 

Mod I Disk 

$29.95 



•These Disk versions save hjgh score to diSK 

SPECIAL DEAL - This Month Only 

Purchase 1 Game - List Price / Purchase 2 Games - Deduct 10% 
^ Purchase 3 Games - Deduct 15% 

^>--r( - SPECIAL DEAL oDDiiGs oriv to go^nes Dufchased from tnis ac. at or^ time, and ot list once - 



COD- comftea cnocn. M O oi co*i o^v '^cw onsn 

Pt»Ci*aoO0 2*Qr S:M. wTicrwNWr b Ngnai tor »^^'Dp.flO 
nii.fiUjijiiiwinnii panM-mi "r — "—«■"" t.-.i~ 
COD i > 9i »j nq (Ji»cia tqif 3 >.iaiBtocWor CUottn* 
counnv oroan aoa S10 00 aUn incoro 
" ms 80 n a DfooucKrt Dooo Shocn <»v o( f» FonOv Oyo 



SOFTSECTOP MARKETING, 

6250 Middlebelt •Garden City. Michigan 48135 

Order Line 800-521-6504 

Mictiigan Orders & Questions 313-425-4020 
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". . . Tandy failed to make the powerful 
Z80 modes zero and two interrupts 
available to users." 



includes a window-comparator circuit en- 
abling you to use a software interrupt in 
Basic programs. You need this because 
Tandy faiied to maite ttie powerful Z80 
modes zero and two interrupts available to 
users. 



The data bus cannot t>e turned around by 
the interrupt-acknowledge signal without 
modifying the internal hardware of the 
TRS-80. 

The window-comparator brackets the 
converter's voltage output. This feature per- 




mits the system's software to require an 
analog-to-digital conversion only when a 
voltage change occurs. That frees the com- 
puter to perform other functions and ana- 
log-to-digital operations concurrently, inter- 
rupting only when an update is necessary. 

Conversion Experiments 

Turn on the five volt power supply. All 
light-emitting diodes (LEDs) should light. 
When you turn on the 15 volt supply, the 
voltmeter should read about 10.25 volts. 
Next turn on the 0-10 volt supply and the 
TRS-80. 

When the memory prompt appearson the 
screen, hit Enter to get into Level II Basic. 

Enter and run the following program: 



^. / -OUT 



Fig. 5, Window-Comparator. Within the window, comparator outputs can be pulled high. 
If the outputs are ORed, the window output will go low — but only if the unknown voltage 
rises or falls outside the window. If the reference voltage is made variable, the window 
can be moved around. 



MICROCOMPUTER 



OaiA 8US OUT 



D 



DIGITAL TO 

DNALOG 

CONVERTER 



COMPARATOR 



c 



DATA BUS IN 



Fig. 6. Ramp. Tracking arid Successive Approximation Converters. 




EOMPARA'OR 

OUTPUT 
I'TL LOGIC 
LEVELS! 



Fig. 7. Ramp Converter. 
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4000 CLS:DEFINT AD:A = O:B = 0;C = 0:D = 

4020 OUT127,137 

4050 B = 128:DUT124,B:A=INPI126]:A = AAND1;PRINT@ 

10,1-AIFATHENB = 
4150 C=B:B = 64;D = B0RC.0UT124,D A = INP(126):A 

= AAND1:PHINT@15,1-AIFATHENB = 
4200 C = C0RB:B = 32.D = BOBC 0UT124,D:A = INP[126): 

A = AAND1 PRINT® 20,1 -ANFATHENB^O 
4250 C = CORB:B= 16 D= B0RC:0UT124,D:A = INP(126): 

A = AAND1:PRINT®25,1-A:IFATHENB = 
4275 C = CORB:B = 8:D = BORC:OUT124,D:A = INP(126]: 

A = AAND1:PRINT@30,1-A:IFATHENB = 
4300 C = CORB B = 4.D = BORC:OUT124,D A = .r^126l- 

A = AAND1PR1NT@35.1A:IFATHENB = 
4325 C = CORB 8 = 20= BORC.OUT124.D:A = INP(126I: 

A = AAND1:PRINT* 40,1-A:IFATHENB = 
4350 C = CORB:B = 1:D = BORC:OUT124,D:A = INP|126): 

A = AAND1:PRINT@45,1-AIFATHENB = 
4375 C = CORB:OUT124,C:E = C-0.046:PR1NT®513.E: 

PHINT@520, 'VOLTS "iGOTOAOSO 

The LEDs should strobe from left to right 
several times per second. Binary and deci- 
mal readings appear on the video screen. 
As the Vx input varies, the readings change 
accordingly. By adjusting the decimal 
quantity in the third statement of line 4375 
(E = C-0.046) variations in the reference 
Zener voltage may be compensated for. 

This program runs continuously regard- 
tess of whether Vx is changing or constant. 

Enter and run the following program: 

5000 OUT127,137CLSGOTO5040 

5005 V=INP(126lV = VAND2IFVTHENGOTO5040 

5010 GOTO5005 

5040 DEFINT AD:A = 0:B = 0:C = 0:D = 

5050 B=128.0UT124,B:A = INPl1261:A = AANDl: 

IFATHENB = 
5150 C= B B = 64:D = BORC:OUT124,D:A = INP(1261: 

A = AAND1:IFATHENB = 
5200 C = CORB:B = 32:0 = BOBC:OUT124,D:A = AAND1: 

IFATHENB = 
5250 C = CORB B = 16 D = BORC OUT124,D:A = INP(126): 

A = AAND1:IFATHeNB = 
5275 C = CORB:B = 8:D = BORC:OUT124,D:A = INP1126]: 

A = AAND1:IFATHENB = 
5300 C = CORB.B = 4:D = BORC:OUT124,D.A = INP(126). 

A = AAND1 IFATHENB = 
5325 C = CORB B = 2:D = BORC:OUT124,D.A = INP(126): 

A = AAND1:1FATHENB = 
5350 C = CORB:B=1:D = BORC:OUT124,D:A = INP(126l: 

A = AAND1.IFATHENB = 
5375 C = CORBOUT124,GE = C-0.046CLS:GOTO5999 
5999 1FE>100UT7,255:PRINT@513,E:PRINT@520, 
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Utilities 



BOSS ill 



The 

BASIC 

OPERATIC 

SNGL= 

STEPPEi^ 



M981 Soft Sector Marketing, inc 
for Mod III 

This Machine Language utilify is designed to aia 
you m creoting and dGduggirig pfograms wntten 
■n BASIC The utility allows vou tc riace the 
Dfogrom flow. *o single step the BASIC program 
to obsefve the conditions o( vanaotes during 
Dfogram execution, arvd to pusn youi basic 
program on the stock durng ptogrom develop- 
(T«t. The uriljtv IS kixjwn tc operate with Mod m 
TRS-DOS a Moa lll Rom BASIC 
Cassette (goes to disk) $18.95 

- N«w Low<«r Pric* - 
Also ton 2.1 vwvlon 2.2 '=■1980 VB Heste* '-■ 
Moa I Cassette (goes to disK) $11.95 

OngirKN eeneavl by V 1. HMl«t. 



Do you reap only mysteries from 
your TRS-80 ROMs? 
Your book has orrtved! 

MOD III ROM 

COMMENTED 

Copvnght"1981 Soft Sec'or Marketing, inc 

^tot just a rehash ot ok3 infomation out detailed 
comments on the ROMS in the latest rrxiChinG 
from Tarvl',' 



MCWniROM 
€^QMBii£NT£I> 



TAPE COPY 2 

= *981 Softer SectOf Marketing Irx; 
"his program will load most onv TRS-80 500 Baun 
system tope (standard Mod I speed) onatoac t 
info n-^emorv arv3 save it at either 500 or '500 
Baud on the Mod III rJOKNOMfOGEOfMACHiNE 
LANGUAGE NEEDED Now it gives vou a way to 
Dock up a machine language program that 
oaas at "he lower speed orxJ mokes cassette 
oadingintoyournewMod III a much taster, more 
reltapte process. Works with Mod r & Mod m 

Only 514.95 

'^*Dd I looos ond saves at 500 Boud only 




e#«U 

sfSOMff 



List $22.50 

Special $15.00 tii Dec. 31 





'•^Sl bv Jomes Limkemnnn 




A S^lt. relocating Macnin* Languor* Uonrloi 
lot MOD I I MOD III 



BUO-f 

=1981 by J LimKemann 3ug+ is a powerful 
machii*>e language monitor The one pomt most 
improved over offset monitors, is the tape write. 
Bug+ has the ability to write a dean taoe(at 
5(X) oQ\j(S). this tope will reoa mto the TRS-80 
urv3er the system comnKina. wittKiut the proD- 
lems previousiv associated with the volume set- 
tirtg Regordless what version DOSiC vou fxave or 
■-irf^ether or not vou r^cr^e a Rooio Shock cassette 
tix. "his monitor will improve the reiiooihty of vour 
cassette Dv 100% 'hereisaisoaventycommana 
'hat works the same as a CLOACr' except 
when on error s found, the memory aadress and 
jvnot IS found on tf>e tape is displavea 
=irK3iiy a break point tho' ^or^s' When a break 
point IS reached, thtere is a bunking astnsK m rtie 
tXJttom right hanc corr^et vou are aple to see 
wnai IS on the screen oetore the monitor takes 
control =>ress the enter Key the screen clears orw 
tne fnonitor comes to 'ife When you continue 
from o oreok point me monitor will restore the 
screen firsTt">en'oad the CPU registers and return 
•o vour program Vou ao not lose vour program or 
GiSDlay arx: it does nvorki 
9ug+ aiso "^os an the commands cf T-6ug. thiev 
usf '.work oettet Bug-*- loods .nfo low memory 
rtien relocates tsei' 

Mod 1 1| has all tne c ommonasot the Mod I version 
plus ' gives ,'Ou (■^e aontv ."f 'eaang of wff nq 
15CX] baud or 500 boud tapes, vou con reoa at 
one rote and write at arxilher MOD I ot ni. 4K. 
both on some tape 
Cassette $14,95 
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#20 SOFTWARE 



ULTIMATE SOFTWARE PLAN 



We II match any advertised price on any 
Item thai we carry And if you tind a lower 
puce on wtiat you bougtii wrihm 30 days ot 
buying il. jusi show us ihe ad and we II 
refund the difference 
lis ttiat simole 



DISK WITH 
MANUAL / 

ARTIFICIAL INTELLIGENCE 

Wr.1ir..il PAS-.l S849 J40 

Dfntal PAS-3 5849 S4C 

ASVST DESIGN 

Prot li'^c Accounlifig 1549. S40 

Generai Sub'ouime JZ69, »40 

AopKcairon Utilities J439. S40 
COMPLETE BUS. SYSTEMS 

C'eanir S?69 i?b 

RcpO'tLT Slt)9 S20 

6(itli i399 S45 

COMPUTER CONTROL 



PjDS B 

Jll-aSor 



I li 



SI 59 S20 
St59 %2b 



COMPUTER PATHWAYS 

Pea'i iL'vt^. ■ i 99 %2b 

Pi'arl ■cjci 2 *299 J40 

Pca'i ;evi=i 3 iS49 ibO 

DIGITAL RESEARCH 

QP M22 

NorinSta' 

TRS-80 Moapl II P ■ 

Mic'ooo'is 

Ct am eTico 

PL i-eo 

BT-eO 
Mac 
Sin 
Z-S.fi 

Tr.. 

DeSDOOt 

DMA 

Ascum 

DMA-DOS 

CBS 

F'.Tmuia 

GRAHAM-DORIAN 

G'-opcal LprtQf 

AtLi RecivaOif 

AccI PayaCle 

Job Costing 

Payroll » 

invefilo'y II 

Payoll 

InveiiOfy 

Casi Regisn-' 

AoailmpnT Mql 



it49 S?b 


T 1159. S3& 


*169 12b 


S189 (26 


»459 535 


1179 i30 


S 85 » 1 t 


$ 6S Jit 


S 90 Sl'i 


S 90 lib 


t 50 S10 


$459 $35 


i 98 $20 


5149 115 


5179 $35 


1369 14 5 


S539 S4 5 



i729 140 
ir29 540 
1729 140 
$7?9 540 
1729 140 
$739 540 
1493 140 
1493 $40 
1493 $4C 
5493 $40 



Mt-ryt 



MICRO- AP 

S-Basic 

b^'IKtOf IV 

MICRO DATA 

H[JBb 
MDBS 

DRS.ir QRSi 
MDBS PKG 
MICROPRO 
WordStar 
Cuslomiialion 
Mflil-Mergt' 
WordSla' Mai 
DaiaStar 
WorflMastC' 
Sutx-So't t 
Sd<:^1I Star 

MICROSOFT 

Basic 90 
Basic ComO'k-' 
Fprtran-80 
CotKJt-aO 
M-Sor! 

Macto-80 

Edit-aO 

MuS'Tip MuMath 

MuLiSD-eO 



1269 12b 
5469 $3^ 
BASE SYSTEMS 

%2b'i S3:i 

S745 140 

irRTL i2b9 510 

51?95 560 



5319 $60 
5 B9 Sna 
$109 125 

1419 let 

1249 160 
1119 $40 
$199 140 
l'/5 $40 



5289 
1329 
1349 
$574 

St 24 
$144 



1 84 

$224 
1174 



MANUAL 
ONLV 

MICROTAX 

^ inflividuai 

-' Professional 
>• Parlne(sHiD 
-^ Pachagi" 



Combine our pnce ptoleclion wfth the 
availability of full professional support and 
our automatic update service and you hsve 
the Ultimate Software Plan 

US a convenient, uncomplicated logical 
way to get your software 

k^ (New items or new prices) 

CP M users 

SD'ic. ty (list' svit'jms and torm.its Most larmats availaDIt 



5250 
IlOOO 
5 750 
$1600 



ORGANIC SOFTWARE 

TfiTWriter III 
DatfBook II 
Ml If' stone 

OSeORNE 

General Letige' 

Acct Rec. AcctPay 
Payroll wCosI 
All 3 

All 3 • CBAS(C-2 
tnnanceo Osborne 
Wnti C Basic 

PEACHTREE 

General LeOger 
AccI RficeivaCie 
Accl Payable 
Payroll 
(fivenlory 
Surveyor 
Prooetty Mgl 
CPA Client Wnte-uo 
P5 Version 



$111 i2b 
1369 12b 
1269 $30 



5 59 520 
$ 59 120 
1 59 520 
5129 560 
S199$75 
5269. 160 
1349 175 



$399 540 
1399 140 
$399 140 
$399 540 
$399 14C 
1399 140 
5799. 140 
5799 $40 
Aoa 1129 



SOFTWARE WORKS 

A!l.H>' CDOS'-CPM 1 69 Sna 
R.TI. .- 1 06 Sna 



SOHO GROUP 

MaIcr".*.^■.- 
WO'i-Sr-..-.. r 



S 9 7 120 
1177 120 



STRUCTURED SYSTEMS 

--GLor ARor APoiPay 5849 540 

^ Inventory Control 5849 140 

Analyst 1199 125 

Lollerighl 5179 125 

OSort $ 89 $20 

NAD $ 87 $20 

SUPERSOFT 

Diagroslic 1 49.120 

Diagnosis: ii S 84 S20 

Dis" Doctor $ 84.520 

Fortn e080orZ80 $149,530 

Fortran 1219130 

Foftrarw Rattd- 5289 535 

.^CCompilPt 1174 $20 

^Siar Edit iiflg 130 

Oilier less 10% 

TCS 

GLOiARorAPorPay 1 79 125 

All 4 5369 199 

Comoileoeach 5 99 525 



PASCAL 

Pascal MT- 5429 $30 

Pascal Z 1349 130 

Pascal UCSD 4 1429 150 

Pascal M 5 189 $20 

WORD PROCESSING 

WoidS'.-arch 1179 150 

Spi'llGudrd 5229 $25 

VT5 80 5259 $65 

Mag.c Wand 1289 145 

So. "I BindH' 5349 14b 

OTHER GOODIES 

Select 1269 S-'a 

Forecaster Ii99 Si.i 

^ MiC'oPlan 1419 V.i 

^ the Last One 5544 Sn,i 

SiiP>-'Calc 5<.'<-.'.< i--' 

Targei 1189 13. 

BSTAIyl $149 $1^ 

RSTMS 1149 S'b 

Tiny C 1 89 150 
Tiny C Compiler $229'550 

Nevada Coboi 1129.135 

MiCfOSlat 1224 125 

VeOH 5105 115 

MimModel 5449 550 

SlalPak $449 $40 

Micro B- 1229 520 

Raid i?l'4 13-: 

String. SO 1 64 $20 

Sifing.SO source 1279 Ir^a 

iSISIt 1199 ISO 

Plan 80 5269 130 



INFO UNLIMITED 

^ EasyWrile. 1199 

^Daladei $349 

Otner less 15. 
MtCBOSOFT 

^Soltcard Z-80CP M 5279 

Fortran $179 

CoDai 1499 

^ Taw- 1 1 39 
MICROPRO 

WofOslar iJ69 

MailMorge 1 99 

WordStar MailMeryf- 1349 

SuoerSo'i I l'b9 

-'SDcilsrai 5'?9 

PERSONAL SOFTWARE 



UNICOflN 

Mtnce 

Scribble 

Bom 

WHITESMITHS 

C Compilf 
Pascal irid C 

DATA BASE 

FMS BO 
-'OBASF II 
Condor II 

^ Access 80 Level 1 
-' Access 80 Level 2 
^ Access 80 Level 3 
Oolimuni 



5149 $25 
5149 $25 
1249 5 50 



1600 $30 
5850 545 



1649 14;. 

5 595 ibO 

1899 150 

5249 

1429 

5679 

5 749 150 



ViSicalc 3 3 

Desktac'Plan n 
Visilerm 

Visitten 

ViSrplOt 

Visiirena Visiolor 
^ Visil.le 

PEACHTREE ' 

Gencal L«il9e' 
Acct Receivable 
Accl Payable 
Payroll 

OTHER GOODIES 

^dBASE li 
VU =3R 

..use «. VisicalC' 
Contojil Connecior 

i.se w Visicaic 

Micro Courier 
TCS Apple 

complete business) 
5ui>er-Iejt II 

Data F actory 

DB Master 
Charles Mann 
STC 



llb9 
1159 
1129 
5159 
51-19 
5329 
S199 

5224 14C 
$224 14(L 

5224 140 
$2 34 140 

1??4 S4P 

Sb95 $50 

1 79 

1139 
1219 

$269. 599 
1127 
5134 
1184 

less 15' 
tr'S5 15 



ORDERS ONLY -CALL TOLL FRtt VISA - MASTERCHARGE 
1-800-654-2003 ext 823 - Calil 1-B0O-S22-1500 ext 823 

Overseas- add $10 pins additional postage ■ Add $2 50 postage and handling per each item ■ California 
residents add 6% sales ta" ■ Alio* 2 weeks on checks COD ok ■ Prices subject lo change vmihoul rvolice 
AM Items subiect to avaiiabriiiy • " - Mtgs Trademark 

THE DISCOUNT SOFTWARE GROUP 

6520 Selma Ave Suite 309 ■ Los Angeles, Ca 90028 ■ 213.. 837-5141 

Inl I TELEX 499-0032 BVHL Atln DiscSoft . USA TELEX 194-634 BVHL Attn DiscSofl 

TWX 910-321-3597 BVHl Ann DiscSofi 



^440 



■VOLTS SPRINT 3 766,' O U T OF 
SAFE RANGE '!'■■ FORAZ = 1T010:NEXT 
AZ OUT.DFORBZ = UOlO NEXTBZ.GOTOW05 
6000 IFE>9OUT7.170 PHINT(H513,E.PHIf-JTS(5?0, 

■ V O L T S ■ GOTO5005 

6010 IFE>80UT7,85 PRINTa513,E PRINTs520, 

■ VOLTS GOTO5005 

6015 IFE>7OUT7,I5:PRINT©513.E:PR1NT@520. 

■ V L T S ■ GOTO5005 

6020 lFf>6OUT7,240PfilNTa513,EPRINT(g520. 

■ VOLTS GOTO5005 

6030 IFE<10UT7,254 PRINT(K513,F PRINTaS20. 

■ VO L T S ■■ GOTO5005 

6032 IFE<2OUT7,2&3PHINTa513,E:PRINTM520, 

VO LTS'GOIOSOOS 
6034 IFE<3OUT7,25Z:PRINT0513,E PRINT®520, 

■ V O L T S ■ GOTO6006 

6037 IFE<40UT7,261 PRINTm513,E PRINT^620, 

■ V O L T S GOTO5005 

6040 OUT7,&PRINTi3513,EPFINTa520,- VOLTS 
.PHINT(J(535, ■ (NORMAL RANGE)" 
:GOTO5005 

The LEDs strobe only when V" is 
changed. Lines 5005 and 50l0 may be in- 
cluded In another program and frequently 
polled, interrupting the main program only 
when voltage information requires up- 
dating You may add messages to lines 
6000-6040 as desired. 

The Basic analog-to-digital routine runs 
slowly. An interesting speed comparison 
may be made by using a data statement to 
generate the test bits. 

Enter and run the following program: 



7010 A = OB = O.C = OD = OE = 0:F = 

7050 0UT127.137 

7100 DATA128.64.32. 16.842 I 

7125 READS 

7150 C^CORF D-BORCOUT124.D A = INP(l?6lF= B 

A = AAND1.IFATHENF -0 
7160 FOHXX = 1TO150 NEXTXX 
7175 IPS -OTHEN7250 
72O0 GOT07125 

7250 CLSE = C.046.PRlNT,ii400EPfllNT®406, 
■VOLTS .RESTORE:GOTO70l0 



This program runs slower than the two 
previous programs for analog-to-digital 
conversion. 

Delete line 7155 and observe the DC 
voltmeter. You will see tn slow motion the 
hunting action of Ihe successive approx- 
imation as it homes in on the unknown 
voltage. 

Increased program execution speeds 
may be achieved using the USR function, 
allowing the program to run in machine 
language and return the data to the Basic 
program- 
Enter and run the following program: 



60000 POKE27l36.62POKE27137,137.POKE2713fi,21l: 
POKE27139,127.POKE27140.33 POKE27141,128 
PQKE27142,0POKe27143.12S-POKE27l44 76 

60020 POKE27145.177 POKE27I46,211 POKE27147,124: 
POK E2714a,0: TO KE27 149.0 POKE27150,210 
PaKE27151,219POKE2715P,126POKF27l53.230 

60040 POKE27154,1 POKE2715S,32POKE27156,3POKE 
27157,125 POKE27158,177 POK£27l59,79 
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THE COMPLEAT IDIOFS BOOKKEEPER (TCIB) 

Product Overview 



GENERAL DESCRIPTION 

UCKOtOUND SEPARATE - I>iis oroofam reoas □ soocrtioa Oato (ite arxl crwcki eoch dote Each monrn s 

rCIB ■MOi written bv Lorrv Roo*' Lony ij a CNarrwoa Lile Uno«rwn1»< ariO hcwiseO Lifo "ransDctionsafBcac'oa into □ soDorore 'iW If fiero Ore rio fransoctioruloiaoNWi month no 

nsuioncaCounsetot Heho)coniiitBnnvraniieaQmono"^'ooSc»eiManaoer»notionai»v(n tile is creo'ea 'he Mej creo'aa □-» namoa jAN/DAT FEB/DAT etc Tfi.s ufiiifv con De fvjn 

iTii ccmpany foi me cxmI iwvorai v«af» i-te uiio i^tei sofKvofe toi niuroncB ariQ t>ooncoi several tuneiaunnoonoccour'n^ pefioa (fa reouifaa Txximiv Oato tile □I'eoaveuiit 'he 

DWnring coo^ictiTiara. ICIB come otxx;t ot a resjit o' a hurminnng vi*tt Lorrv moOa 'o na rew oofa w« be oOOea to it Cttiwwtte it wi" De Cfealea ond ffie riow aata enteioa nto it 

occoLiitant- conyirtg □ DneteojefuH ot unofoanizoa ctiociii roco>ofiana of^•'^'^anclal lit PORT GENERATOR - Thrs oiogiaiTi reoreienTt me final jteo m tfans»m-,ing ur.ofgaoiiea 

ihftDrmaton Asaresijtof mot viiit r^oecoea tr>efer)aa tnDeaDefeiwW rC]Blithei8»uH flnoncia aoto into useAji ^nanclal rotxrfs 

of triot expenence Aftef vouncWBiNSERTeQ voui'inarx:iai <Jata. EDITed it tovoufwfrrfocfion PURGEd. REFiLEa 

It II mtantJoO tfvat ttiii let ot programs shouW bo oositv usoDie Dv Ohv person who ha> to and SEPADATEd as vou wont you are rtowioodytoiNDEX 4 ona REPORT The rooortgoneratot 

keep higher own flnorcal recwds The nejrt section will oTOviOe on overview c*f^e specific piootof" flr^l reoOi tr«inae> vou ria\«Duiit and based on rtidt presentsvou wittia rinibh«i 

caoaOHittes of ttiis DOctioge DroOuct Each n-ta|cr Cdtegorylthofir!! it»m of you' inde") wll an O'ssanteo on a ieDorolB 

FWQOUC T CAPlilH ITItl poge Incomeontnei will besnownosa Mmp«o tormateo numHOi; volLje Expenseentries will 

.._ ._ _,^_ j^ be snowr in pOFenttiesei Eac-^ poQo w«ii contain a running suOioioi of the cuneni rrvaior 

WmImH TCII am categcry ^incoTie 'temi will beoOded. aujense ifomiwiiiDe suDfoctedl The juo- total will 

DaloO<#i«fci9-^CIBD'oviaeia»rTi(>ernetfioaof8niwirX¥OurfifV3nc>a(iri»orfTXTtioninroo aiai be cesontod m tfie aoo-jo (cxmat Finoffy o summarvpoge will Depnnted. ifemmng 

aW<<'*A(Q(rTxricfeenispr«sont90wtiicnw*ip<orriolvOu'0'«n''VCi'trtBreQuweadotafiiorn eoch -rxsor cotagory coywod ir the report (mch os iRS torm 1040 Lirie •') along wim ttyji 

your iwcorOi The fakjwmg «eK» otb oronoed cotegorvi suo-iorai %iaiN on ovoroii 'otol of aH entne* covwed Ov fr« rnoei will De 

NUMBER OF Dresentod to flnisn your reporf 

FtELD NAME CH>V!ACTERS MAKE-VC - An ooditionoi utility program is ovailaDW ot entracoil to otlow the transfer of iiios 

ICJentrflor 8 torn ICIB to ViaCALC tiis makes use ol VlSCAJ.Cs »r* lomiot ond is >«rv useful tor 

Dote ^ petformmg specioi computotionj wilti data gathered bv TCIB InciOentally it ,ou -rnih TCIB 

POVor/Povee 18 «(e) con also be ciwaieO by vOCAiC if vou conform to me requirements soecitied m the 

DeicnptKXi 18 MAKt-VC program 

Cafegorv/Accourrt 5 W» il u i. « Uii<*dltom- Belcre we c rea'e me i mprewion ttxjl tiMs program is ttie end oil and Be 

Income or E«»ni* . .. l oif letLUriaifontotaili about its roquirerrientiond lifrvtafoni Thishjlo' lim^ationsisDfOOOOty 

Deductible or NofvdeducTiOW 'ofaii-irxrIiaNe Doootieti sorneor^ewiii iind some way m when to pujnrtieonagram past its 

*''''°'^' imrfs ffyjf y«e r^ev«< thought of however this is a good sfarf PIEASE READ THIS SECTlOf^ 

A icreervcnentBd oOttor oilows you to »ee the wfraie recotd as you are ontwing it vou ai» CAR€RJU-V TO AVOID DISAPPOiNTMtNTi 

fT«e to mo\«ocxxjt in TtierBcctddnd change any data vou w«nOrx;e vou are sofrsfioawitti -jyvifh ttieeicoption of tfie screen input n>jtiheatxJtt« sort routine ttioDiogromsarewiitfen 

t^erB»urtlDrewngIha<£NTER>kwcauIesrhoprcgromto(1)lWl»*theaata•,^entBrea enfliWy in BASIC The programs arefurmtfied to vou in UNPROTEC-ED sourcecooe While mis 

tor coBtote errcrt - and (2) assuming no errors write ttie record to the diMc file g^^ ^^^ ^^^ opportunrty to study program ona/a modify it to you: icocal needs! AI VOUI) 

Since most peopte are ryjtabie or wiNirig to post Byeryfl none lOlttanjoction immediatBtvasil CMN RISK, OF COURSE) inforpretod BASIC lUSt isnt OS last as mocnir^o languoge 

occtrt prevision hoi been mode tor the foct ttxJt cotchir^g i« will aimor orwayi result m j) This progrcxn does a lQT o! strmg montxjiafion As a result at 'imos ttia computer wi" 

OuOcote entnes (e g you mrjy enter the lorr^e Check twv::a or enter a check and receipt Seasonally rvy^ to itoo and collect its wrt* {la oo gorpoge coitecfion on its swing 

covanngtheiamotraniacftxi) ARjRGFDnsorariauKJeithecomouter'osearchvout'iWor jooce) 

files tor Dooioe dupiicato entnes ana if found present ttiem 'oyou tor disposition .,^ .-.. ^ _ 

^^ Thaanswwrtomrspeculianfvn IX>fTPAN(C - *ehaven«>v»r saeno gortxige cotiection 

P^a MartpulBton- in oOditpn to the PURGF capoD.lity(uitdescnt)od(tBchn-conyoddta aiurdown mow ttvana tew moments Just watci (or tnecursor Kitunashingaiiisweiiandyou 

mancuiofion teafute). TCIB olso foofure* otr«r imporfont ocjfa manouiaTion oOiHtioi ^^^ pioceed with data entry it rt is not flaihing. retoio rrximent and proceed wtien it resumes 

EDfT - 9)ota you W retrwwe. edit or delete any FBCrsrO in any TCIB tile vou con roineva a (tosnmg You can typo as tost as you wont in data mpuf i^Jafiovwvet tosaeoowneoWe to 

lecofd bv ifi record numbai Vou can search any (lekl al oil or port of a file lor anv record type lailer than the progiom can accept the data 

contc.n«>3 your search ttTgel oi an or port o< the torget field vou can also do o multiple file. ^j y^^„ ^,^ ^^^ ,^^ restnctiohs on the arrvjunt of dota vou com nondle wrth lOB 

uriglBotmutttptef«ld»earcholfrom1 to2Q5eoaiatoni«inosingieseorchaftorbui(dingfhe ^ ,. _ ^ .^ _ >.,<-,_, -. ^ ..^ ™„^., 

ap^«xx«^,no«<Any.irr«osearchre»u.fs,n,etT«vtngarecadfherec^wH.^ D«. Storage- oioofa Per>a used ov the prog-oms WSI beondis-^moun^ondtiv*^^ 

ard vou -.« hove me cr««» of COnyiryj out ony Oes«a ed,tv.g furx:f«ns When you ore currently ,n use Sv^ppinoordatod^ksOurihaorooramoperat^iWsO supposed YouCOn 

lnaf«d wflh me reccw currentty oe-ng d-sDoyed you wi« tvT« me cfx>ceot continuing with ^«>*«'. ^» <=> ^"^ ^»^ °> «^' ^'<^'« ohd °o«ahng syfl^n will '"'^^^f';^}^ 

theieor:h .^tumir^ to rxxmol edit tunctto™ edit.rg oryDthertiW or returning to me ma«. oe ab* to use ony type of dak you. hard-«re Gr<,coe«jtog ,yMmw.il suPPtWCW«ha^ 

m KPjn_ . = V ■« T* not 'ested the oogrom With anything besidesS'" »ivei but f proOiemj ofise. let us krysw 

arvd WW will do our oest to rieip vou Oiwcome mem ) 
■ itgOEX-INjoroofamoiicn-s the user to cxjiWo*ng«««v»K to ft^ contents o(ffomi to 20 . _,„ ■o^.-.r,.... - ...__. ,,w.^ t*. 

«ected fye* TbTndax can span or« o. rrx^e teS^.n o s,ng« record This intoonafK^ is ComPute. Memory - TC16 reou.es 48K «^ RAM (and uses every o. of ;• mgnt add.) The 

sorted and stored on tt« disk The REPORT GENERATOR and EDIT programs use me moex to I^DE«" °-^'^"' leaves 16000 bytes ^ee in when to Puiid a,, inde. ^^- ^-^ '> W 

tini tf«i rvrn-a tn thn f-hninn fikii main program iHTiitafion Theinden itself usesS tMesper rocordtor itjownoverheod AnirxJox 

'^°" ' built on trie category ti«d (5 Dytesi plus ttve date field (-1 bytes) would use Id Dyiei per recoid 

The inde» is iimrted to a manmumodOcrtarociotfiomeoch 0(1000 records rtmorethdnio (5^,6) As full 1000 records con oe handled wrth d smgieinOoKPuiit on these fields. On ttie 

cftoroctert par record ore us«J in DwWIng the inooi the numperc* records to whch It con other nana an inde. built on category (5 bytes} + cKite i a bytes) » oescrotion (1B bytes) 
Doinf will be recxjced proporfWnotatv Since the programs ore 'eterred to m unprotected ^^^^^ una 12 bytes per recora ;S-^+i 8*5) and couO only honole opout doo records 'ho 
source coda vou are ftee to' p*a¥ with' ttiaifilr>g woes and inaenotrays if your DOS lecTves bottom 1 me .s- don tout nxtre miornvitxinin your inoeithon vou REAi_L"^ea it vou want -o 

you rnore headroom maximize itie number of records you can hor>d>6 Also ■ keep on eve on avoiioDie aii* sooce 

R51LF - The purpose of mis uMify orogtam is to olkjwyou to buiW □ rvew file Dy copying ony when vou am building an >ridei. Be sure mere is enough room or vou 11 wind updoii^g ''owet If 
iwcofOs in cTi old file which satisfy your search requirements to trie n»iv tile 'ou con also copy ttie prcQrom encounters o aisk (uif error while wnfi rig fhe inoen 'twill close the inde« tile, kill it 
5a<ected records ttom one Hie to arxjftiet in the sart>o way This search can be done with □ and taa vou to provide enough dak storage before trying ogoin 
MATCH or N0^4■^AArCH lejt For enompte. when you initnjct tt« EDIT program to DEi£TE o " 

roccra. It repioco* trie contents of ftva idenftfter tiekj with DELETED' Vou can then u» tt>e h>1«H I /ir III >1RI/ 1 Hm^^s &40 95 

REHtf uf«ltyfocopvaiii«cCTdiwnicnDOt*DTho«eDfl£TEDasfhe»K3entitlertoanew«le MCXJ I Of 111, ^iOK. l UTIvW *-»T.-ra 
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CftlTPATH* 

•1980 PM Ptogrammtng 
CMTFATtr wWh«lp 

- Detetmifie ftie eon losf pOMibte completion Oaf e tor your 
PtDiect 

- Identify the critical acttvltlos m your pcoiect: ttie loOs thiat 
ymll datov como*etlon of tt>e entire protect it !r>ey are not 
compietea on time 

- PtovHde vou with the sctieOuled stort arv3 flmtfi dote tot 
all protect octtvities so you con pOn your aooi arxi 
moterwl neeos to support the protect ccfnp*etion date 

■ Dey«lop trie information needed to petmit you to shift 
resources arid funds to critical ocfivittes from those 



QctTVities inoentilied Dy '^e progiom os oeirig capooie ot 
deiov witTiout oekaving the completion of the protect 
OHTFAnr prowtdM you wtlh 

- Both scfeenandcnntoioutputsof your schedule in worfc 
Ooyi taDulatlno the earliest stait/ finish ana latest stort/fV 
nish dovasweHasfhe totalfloaltoreachprDiectoctiviry 

- The lengtti of the critical path in wotv davv 

- A iistino 0*011 activities ffrat are on the cnticalpottiioOs 
thot connot be deOved vwifrioul oetoying the entire 
ptDiect 

- A pfintet output ot the octual caieivaor ootes for ft>e 
earliest itort/linish arxJ latest stoiT/firvsh aKxiQ ^^^ OCflr\ 
free ar« total fkxjt 'or each octtvifv 

- Vour choice of pnnting oulOafo sorted consecutivefy 



MAKE VC 

•t'Jai SFi Ctxjngos iDiOt tiles 'o VISi CALC mtarctvanga 
lorrtiat 01 take vC files and rrvofces if mio iDtOT reooaote tile 
t>4ow On^ t34.ta 

Moke vC reguiies Comptaot tdiots Bookkeeper 



Specially designed tor txiikJeti by a buiiaet Also works 

*re(l with fTvanv ott^er busjnewei 

MOO I $600.00 

MOO II! ... $750.00 

Monuol $80,00 

Overview Ffee 

Requires dSK, 2 disk drty«s ond 133 column prnter 



COD- certTtled check. M O or cosh only '.lost oroars 
Shipped noKt day All orOeo must riove shippirig included 
Plaoseooa ?* or $250. whichever rs higher tc< shipong 
Mchigon rasioenti pioaieoaa-11 tot Add enira S1 50 lor 
COD PwTOfXji Checks take 3 weeas to cleor Out ot the 
country orders odd S 10 CO eirtia jhipoing. 
" TOS-aO IS a product ot Rodw Shock d<v of ttie TarxJy Corp 



SOFT SECTOR MARKETING, 

INCORPORATED 
6250 Middlebelt •Garden City, Michigan 4B135 
Order Line S00-521-«504 
Michigan Orders & Questions 313-425-4 20 
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". . . the TRS-80 is now capable 

of better than 

10,000 observations per second. " 



5 

COMMAND? 








6A0O 


3E B9 


LD 


A. 89 


CONFIGURES 82551 


6A02 


D3 7F 


OUT 


7F 




6A04 


21 80 CXJ 


LD 


HL0080 


ZEROES H. SETS MSB INL 


6A07 


7D 


LD 


A. L 


SETS MSe IN A 


6A06 


*C 


LD 


C, H 


ZEROES C 


6A09 


B1 


OR 


C 


FORM TRIAL BYTE 


6A0A: 


03 7C 


OUT 


7C 


OUTPUT TRIAL BYTE TO DAC 


6A0C: 


00 


NOP 






6A0D 


00 


NOP 




12 MICROSECOND 


6A0E: 


00 


NOP 






6A0F 


DB 7E 


IN 


7E 


GET COMPARATOR RESULT 


6A11 


E6 01 


AND 


01 


MASK OUT HIGHER BITS 


6A13: 


20 03 


JR 


NZ, 6A18 


TOO HIGH, DISCARD TEST 8IT 


6A15: 


70 


LD 


A. L 


PUT TEST BtT IN A 


6A16: 


B1 


OR 


C 


PUT IT INTO TEST BYTE 


6A17. 


4F 


LD 


C, A 


STORE NEW BYTE BACK INTO C 


6A18 


7D 


LD 


A, L 


PUT TEST BIT BACK IN A 


6A19 


OF 


RRCA 




GENERATE NEXT TEST BIT 


6A1A 


6F 


LD 


L. A 


SAVE IT IN L 


6A1B 


30 EC 


JR 


NC, 6A09 


DONE EIGHT TIMES' 


6A1D 


69 


LD 


L, C 




6AIE 


7D 


LD 


A, L 


PUT RESULTANT BYTE INTO A 


6A1F: 


D3 7C 


OUT 


7C 


PUT IT OUT ON PORT 124, LIGHT LEDS 


6A21 


C3 9A OA 


JP 


0A9A 


TRANSFER BYTE AND CONTROL TO BASIC 








Program Listing 



COMPILER 
WORKSTATION 

TRSSO Model I and III 

Your BASIC program developmer^t 
could go faster. . 

EDIT Fjl -Screei B*SlC ecitoi *i'f toaling curwr i^C sjto- 
■eoeal Vo'e '.nan 33 caninana; inc lundions .el yoj .X 
lOijst'iia cnjnqe .nseT de'tie -esiace -es icate ci)3* 
move r (wsition BASiC let: x tie cna-acte- iifirg ir>e o' 
D-oc"! leve, DeveiopeC in B'llaii Dy Souiricfn SoMware Mc] i 
III S40 00+ 1 SQ shipping 

PACKER- (Collage Soll*are) EOrlitig tool will jnpack. shonen. 
repack renjrnber all or part ol yojr BASIC le<I The UNPACK 
segment is very useful when p'epanfig BASIC source pro 

g-ams 'or cofrdation Cy ACCE.2 Mod 'U S?9 95 * ' 00 
stippinS 

Then your BASIC program 
could go faster. . 

ACCEL?: Compiler tor IRSBO MM i Mod III Disk BASIC Ne* 
tundinnal improvemenls m place to give more ease-ot-u^.e 
QUicder compilation ot large programs oelter cliammgofcom 
pileO ana noncompiien programs Si^e readiiut helps lOu 
T^nilor code growth Cunigcompilalion HEM NOAHRAVop' on 
lel! yen use vanaoe OOi-na arrays Pro'essiorais lole Z-:'r. 
p:eher;s ve ^nsfucvo^S SW* now to o-ganize your comp eC 
programs '0' resale on tape ES f wa'e'O'C'S" ^0'aya!les' 
Deve^coean Bntan oy So:.thern Solwa'e Spec-'y MoO lO' 'M 
S88 95 *i2 OOshippng 

TS«E Writes compiler ojipul lo maependent SYSTEM lape 
i9 95 + 11 00 Shipping 

EXEC Command List Processor lor IRS-80 Mod I Prep.ie 
eiecute pass as nary as n ne pararrele-s to lists at 'RSHE 
0' Nf WDOS :omnanOs and cr BAS C siaiefTenls Si-non' es 
■epetit.e procedures sjc^ as po*e'-i.p segjences ''le ■,*t 
jps etc Canpatip'e *.th ACr,K2 romp/er (3is« oulcjt 
Oewwea .n Br>tjin Oy Soullem Solware S22 M » SI 10 

y>wf>g \j, ^^7q 



AHan Gelder Sattwire 
M/CVISA R Box 11721 Main Poit DftlCB 
CA add 6% vV S>n Francisco, CA 94101 
[i\i) 381-3131 

TRS&O TRSDOSt"- PaCio Shao ES ' tm Exat'O" 



POKE271G0.125 POKE27161,15 POKE27162.1 1 1 
60060 POKE27163,46:POKE27164,236.POKE27165,105 
POKE27166,125:POKE27167,211.POKE2716fl,124: 
POKE37169.195:POKE27170,I54:POKE271 71.10 

The POKE Statements load the following 
machine language routine into memory 
beginning at memory location 6A00H (See 
Program Listing). 

Line 60080 causes the U5R instruction to 
branch to 6A00H, assigning a value be- 
tween zero and 255— proportional to the 
unknown voltage Vx to the variable X in the 
program. 

Varying V^ will cause the window- 



^ H/vnj^ 



D/4 UuTPUT 



I 

C0I»PI1"*'0I» 

OUTPUT 
I'T. LOGIC 
LtVf LSI 



Fig. 8. Tracking Converter. This converter 
causes the count to dither constantly 
around Vx, so it monopolizes microproces- 
sor time even when V^ is constant. If the 
.voltage jumps too fast to be tracked, this 
converter loses acquisition and reverts 
to its slower ramp mode until acquisition 
is restored 



comparators to signal the need to update 
voltage information. The response time is 
much faster than the equivalent Basic Pro- 
gram run earlier. 

To poll the routine constantly, run 60300. 
Compare the speed of execution with the 
comparable Basic programs beginning at 
lines 4000 and 7000. The Basic routines run 
about 25-tlmes slower than the routine with 
the U5R call, but are limited to less than 100 
observations per second by this method. 

More efficient methods are available. 
They allow the use of Basic for convenient 
parameter entry. Instead of jumping 
repeatedly from Basic to machine language 
to develop a byte of information, then jump- 
ing back to Basic to display it, a block of 
memory for data storage can be assigned 
to perform the analog-to-digital conversion 
repeatedly until the memory block is filled. 
This is done In the microsecond execution 
times of machine language. What Is hap- 
pening is the system is acquiring data in 
real time but processing it in the abstract. 
So the TRS-80 Is now capable of better than 
10,000 observations per second. 

Once the data is developed and stored, it 
may be retrieved with creaky old Basic and 
processed in any way desired. You can 
develop graphs, arrays or whatever from 
this information. 

This procedure can be demonstrated by 
loading an assembly program (See Source 
Listing) using T-Bug, RSM or EDTASM. 
After loading the program, jump to Basic at 
1A19H and run: 

10 CLS.INPUT NUMBER OF READINGS ,A 

20 IF A> 32700 GOTO 10 

30 POKE 16526, OiPOKE 16527. 107 

40 X ^ USR |A] 

50 INPUT-DELAY BETWEEN READINGS (0 TO 

.5SECS)":D:B = D.65S35 

B-D-65535IF B-0 
60 POKE 1B526. 7 POKE 16527, 107 
70 X = USR (B) 
80 FOR N = TO A:C = 24576 + NY = PEEK (C) 

Z = 0043-Y: 

PRINT Z, NEXT N 
90 PRINT: INPUT'PRESS ENTER TO RESTART 

PROGRAM";G: GOTO 10 

Answer the prompts by requesting 100 
readings and a delay of .01 seconds. Vary 
Vx during the one-second interval while the 
program is storing real-time values. You will 
observe the Basic program retrieving those 
values stored in memory by the machine 
language program, outputting them to the 
screen. 

The limitation In line 20 prevents the 
storage of data over the machine language 
programs beginning at 6A00H. 

Intelligent Decisions and Control 

Port B has remained unemployed during 
this introduction to Interfacing with the real 
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^i^ GUARANTEE^^ 

Lazy Writer® comes with a 
30 DAY, MONEY BACKt GUARANTEE 
Guarantying There Is Nothing Even Close! 

tLess 10% rsstockirtg chotge. 



If you are looking for 

The Finest In 

Word Processing Systems 

you can . . . 

1. Purchase and examine all other 
word processing programs on the 
market, and then purchase Lazy 
Writei* 

or . . . 

2. You can purchase Lazy Writer® 
first If s your money! 

Lazy Writer® Mod i still only $125.00 

till Dec. 31, 1981 

Lazy Writer^ Mod III $175.00 

■Requires 2 Disk Drives to convert only. 




i^HiiB^^H^HH SPECIAL DEAL 

Purchase Lazy Writer® and receive, this month only, 
MICRO PROOF with the correction feature and patched to Lazy Writer® 

Only $149.50 extra 

Reg. $184.50 

Now available from 

MMMn SOFT SECTOR MARKETING, 

33Aftft INCORPORATED 

For those of you who requested 
Q spelling checker to use with Lazy Writer® 

MICRO PROOF 

Product ot Cornucopia Softwore 

EASY TO USE 

50,000 WORD VOCABULARY & EXPANDABLE 

RECOGNIZES PREFIXES & SUFFIXES 

REQUIRES ONLY 32K OF MEMORY & 2 DISK DRIVES 

AFFORDABLE & AVAILABLE IN THREE FORMS fully independent program to identify errors,' 
independent program to identify and correct errora' or with a conversion program that 
will permit MICRO PROOF to operate from within. 



New Lower Price! Was Now Onty 

TRSMODIorlliVersion $125.00 $89.00 
Correcting Feature Add $60.00 
Word Processing Con- 
version for Lazy Writer* Add $35.00 



Let MICRO PROOF 

Find Your Errors 

Before Sonneone Else Does! 
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SOFT SECTOR MARKETIIMQ, 

I -N corporate::) 

6250 Middtebelt .Garden Clfy. Michigan 48135 

Order Line 800-521-6504 

Micnigan Oraers & Questions 313-425-4020 
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"This permits monitoring the result 

of an action which is 

the result of another action." 



world. By replacing the terminating resistor 
package in S02 with a 16-pin DIP jumper 
cable to a solderless breadboard, you free 
up Port B lor experimentalJon. 

Port a is addressed through input-output 

Port 7DH {125 decimal). These signals are 
saved in Port B's internal latch until a new 
byte is received 

Simple control signals may be sent to 
Port B as a result of a condition in Port A. In 
Basic, the statement might be IF A>155 
OUT 125,100. An eight-input NAND gate can 
be configured to detect only 100 decimal on 
Port Bs bus. and the NANDs output would 
remain low until the latched output of Port 
B was updated with a different output. 

More sophisticated controls are more in- 
volved. Analog input Vx of the real world in- 
terface can be multiplexed with software 
selecting the source of the analog voltage 
through control of field-effect transistor 
switches. This permits monitoring the re- 
sult of an action which is the result of 
another action. 

I have designed a simple system to close 



the shutters to my house's windows and 
turn on the porch light at night; open the 



shutters and turn off the porch light at 
daybreak; and partially close the shutters if 
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fiq 9. Succestiye Approximation. This is a trial and error method The first trial asks 
whether the unknown is greater than half the reference voltage by setting the test byte's 
most significant bit (f/SB) to one. If the answer is yes. the MSB is saved: if not. it is ex- 
cluded from the test byte The process continues until the least significant bit (LSB) is 
reached. The test byte now has become a completed byte equal within one LSB to V^ 
The LSB only can provide the information the last test bit did or did not toggle the com- 
parator The Vref/255-uncert3inty limits the accuracy to .4 percent 



STOCKCHART • I 

MORE THAN JUST A COMPUTER PROGRAM 

IT'S AN INVESTMENT TOOL 



" requires 16K RAM tor cassetie. 32K 
RAM & l-dnve for dis*^ version 

• printer oplion 

• disk version $50 00 

• cassette wersion $30 00 

lo order, see youf local computer^SOtt- 
ware dealers or send chech, nioney ordef, 
or CO D lo 



mJ^ 



Micro Investment Software 
9621 BowlB Way 
Stockton, CA 95209 



■ TM u' Jjna, CO'O *DO'p Compurp' An-: 'eieeciie> 




AVAILABLE FOR THE 

TRS-80* Model I & I 
APPLE II* 
ATARI-800* 



• generate pfice-cfiarl from HIGH LOW, 
& CLOSE PRICES 

• price-trend analysis assist investors in 
BUY/SELL DECISION 

" aulo scaling (or price-cnaM generation 

• accepl tractions, anoiv users lo enter 
pfices as appear in newspapers 

• SPLIT routine to adjust prices for slock 
sptil 

• EDIT capability (or users lo change 
price data 

• STATUS rnode lo display pnceirend 
Signals 

• PURGE utility lo delete unwanted data 
(rom disk (disk version only] 
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^For Your Color Computer"\ 



MASTER CONTROL 

Copvfigf^t *1981 5c^ Sec*Cf Marketing, inc - Written Oy A. Swartz 
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COMTHOL 



Requnes 16-32K 

1 50 preprogrammed comnxina 
keys Stondcrd and Extended conn- 
mand. 

2, Direct contro* of motor, trace, 
and audio from kevtxwrd. 

3. Automatk; lir>e numOering 
A. Programrrtabte Custom Kev 
6 Direct Run Button 

6 KevtXDord overiav fof easy pro- 
gram use 

7 Easy entry of entire commartds 
into cormputer, 

Load Master Control into your rrxa- 
chiine then eitt^er type in a BASIC 
program or kDOd or^ in from tape 
to edit. Cuts programming tirr>e oy 
50% or more . . $24.95 



Coming for Chrlstmosl 

COLOR BONANZA 

50 Programs fof the Color Computer. 
Less than $1.00 o program! 

SorT>e4K some 1 6K some extended BASIC, sorrie for rorv 
exterydeci. 

Gomes - Personal Programs - Utility Programs 
List $49.95 

Expected shipping date December 1 or before 
Any prepaid ofders received before ttKJt date will pay only $39.95 

CONCENTRATION & CONNECT UP 4 

Twin Pock - 16K Extended 

$14.95 

Expected $hippir>g Date - ^DecemPer 1 or before 

From Other Vendors 

Spoco Invadoft. Spectral Assockates $21.95 

Spoco War. Spectral Associates, 'req. Joy Sticks $21.95 

Metoorokte*, Spectral Associates 'req Joysticks $21.95 

Bottlo Flo«t. Spectral Assocrates $14.95 

Spoco Tradors. Spectrol Associates $14.95 

Soflwaro D«volopRwnl Syttom Rom Pack $89.95 

C Bug Mor^llOf $29.95 

Dtoossomblor (Source Generator) $49.95 

Color Computor Nmm (Latest issue) $2.50 
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Non Extended BASIC 
Requires 16K 
$12.95 
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MICROCOMPUTERS 

We have ccfisistentiy offered the TRS 80 line 
at savjngs Bp to 20% . You can save up to 
$1500 by buying from Computer Discount of 
America. 

Model II 

26-^002 64K. 1 disc $3385.00 

Midel III 

261051 4K, Level I % 610.00 

26 1062 16K. Level III $ 84S.00 

261066 48K. Level II 2-drive/RS-232 %2mM 

Ctl«r Coiiputer 



26 3001 
26 3002 

EPSON 

MX70 
MX80 
MX80FT 


4K 
leKw/Eit. Basic 

Printer 
Printer 
Printer 

ARI" 

COMPUTERS ^ 

the full tine of A 
rs anrf systems. 


$ 325.10 
$ 419.00 

% 37S.00 
i 485.00 
$ 585.M 


Al 

MICR04 


IHHMHMH fi 
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sunlight overheats the inside of the house 
(See Fig. 12). 

There may be contlicts— the sensor for 
outdoor light may sense the porch light; a 
home's interior may be overheated before 
daybreak— but they must be resolved by 



the programmer and his or her software 



Ed, Note: The phantom Fig. 1 1 required cor- 
rections too late to be included in this issue. 
It will appear next month. 



Our savings are as big on expansion inter- 
faces, printers, diskettes, Apple Computers. 
OKIDATA Microline.CITOH Starwriter, 
Lexicon Modems — everything for your 
computer. 

We have the largest inventory in the North- 
east, and most models are in stock, for 
immediate delivery Our full price catalog or 
a price quote is as near as your phone. 



CALL TOLL FREE: 
800-526-5313 



Computer 



of America 



COMPUTER DISCOUNT OF AMERICA. INC. 
15 Marshall Hill Road. West Milford Mall 
West Milford. New Jersey 07480-2198 
In New Jersey Call 201-728-8080 
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Fig. 10. Additional Circuitry for the Real World Interface. Quad-comparator U7 provides 
tour independent comparators. Their uncommitted outputs allow themselves to be 
ORed and the digitalto-analog output levels to interface with transistor to transisitor lo- 
gic. Comparator U7a provides information on the relation of V^ to the digital-to-analog 
output. That status bit is returned to pin 14 and made available to the TRS-dO data bus. 
Comparators U7b and U7c form the window-comparator, its reference voltage con- 
trolled by the digital-to-analog converter's output. Comparator U7d inverts the output of 
the window-comparator and returns a status bit to C;. also made available to the data 
bus. 
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SECTOR 

MARKETING, INC. 

Is Now An O.E.iVL Of '""^//f 

TANDON DISK DRIVES 




\ 



40 Track Disk Drive, w/ power supply & case* $299.95 

80 Track Disk Drive, w/ power supply & case* $399.95 

t80 Track Dual Head Disk Drive, w/ power supply & case* $575.95 



■•■Sold modified for Mod III only 



SALE 



till Decembers!, 1981 

Our 40 Track Disk Drive, w/ power supply & case* 

$260.00 

Our 80 Track Disk Drive, w/ power supply & case* 

$365.00 



Add $5,CX) shipping per drive. 



40 Track Bare Disk Drive* $225.00 

80 Track Bare Disk Drive* $350.00 

80/160 Track Bare Disk Drive* $475.00 

2 Drive Cables, Mod 1 or III $25.00 

4 Drive Cables, Mod I only $35.00 

Disk Drive Extender Cable Cable $15.00 

Printer Extender Cable, 4 Foot (Great for MX-80) $25.00 



OTHER SPECIALS 



Okidata Microline 82A $525.00 

Okidata Microline 83A $800.00 

NEC PC-8023A $795.00 

Centronics 7391 $675.00 

[f you prepay, all printer prices include shipping in CJ.S. These prices expire December31. 1981 
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GENERAL 



Taking steps tovoard 

universal language processing and user independence. 



A Macroprocessor for Basic 
PartV 



This Is the last of a five part series on 
the development and use of a MetaBasic 
compiler- 

J Alar) Olmstead 

J. Olmstead Financial Engineering Systems 

3843 West St- fi/orltz Lane 

Phoenix, AZ 85023 

Preceding articles emphasized Basic and 
the reader may have deduced that I ad- 
vocate Basic over ail other languages That 
impression is incorrect. Actually Basic is 
useless as a language for the economic 
development of commercial software 
meant to execute under either an inter- 
preter or a Basic compiler. Basic is, how- 
ever, a useful pseudo-code, a linguistic 
block diagram of a program intended, from 
the outset, to be written in assembly lan- 
guage. In this respect, the preceding analy- 
sis of Basic is a prototype analysis of all 
other commonly used high-level languages, 
including Fortran, Cobol and Pascal. All 
these languages should translate into 
MetaBasic once you debug them in their 
native modes; and MetaBasic should in- 
clude a uniform method of creating assem- 
bly language source code (not object code), 
conforming to the instruction set of the ob- 
ject computer. 

MetaBasic frees the programmer from 
manufacturer dependencies, and permits 
him to program a project in traditional 
languages which he considers convenient, 
appropriate, preferable, or necessary. An 
application program's logic is separate 
from assembly language programming pro- 
cedures. Debug the application logic m the 
most convenient or necessary form; then 
create the assembly language code. To at- 
tempt both simultaneously is extremely 
complicated which is why so many pro- 
grammers decide not to work in assembly 
language. 

To maximize the yield from this proce- 
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dure, knowledge of the operating system's 
construction is crucial. 

Damn the Critics — Design the System 

All high-level languages share this trait: 
They permit convenient description of a de- 
sired result. Which language is best? Is it 
Basic? Cobol? Fortran? Pascal 

Native machine code is the only 
language of consequence. All other 
languages, including assembly language. 
are mere approaches to the execution of a 
result based only upon its convenient de- 
scription. 

To fashion a convenient language pro- 
cessing tool, one should ignore debates 
over this-versus-that high-level language. 

Much of the argument suggests the 
unkindly exercise of oral-compulsive 
behavior. Being good with words, and being 
good at using words to intimidate and then 
dominate readers is unacceptable conduct; 
nor does it comment on the issues even 
though il purports to monthly in all 
periodicals of this type. 

Further, much of the argument illustrates 
that people like what they are good at and 
dislike what they find hard to understand. 
Critics comment on the weaknesses of 
other languages and on the strengths of 
their own. We have spent 25 years in a con- 
tinuing effort to find better ways to describe 
desired results. Each of the four principal 
high-level languages has added more to the 
lexicon of good descriptive techniques. We 
should abandon none of what we have 
learned, A personal preference born of 
knowing all options or of ignorance ex- 
plains but cannot excuse language 
chauvinism. 

Much argument reveals that program- 
mers place language primarily in the con- 
text of writing programs and secondarily, if 
at all, in the context of running them. The 
design and construction of the underlying 



operating system is almost never dis- 
cussed during the language debate, A well- 
developed operating system would disinte- 
grate two-thirds of the language debate into 
questions of personal style or preference. 

Fig. 1 illustrates that no language pro- 
cessing system has the right arbitrarily to 
obligate one solution over another when 
solving an application program at the high- 
language program level. The problem may 
require combinations of one, two, or even 
three languages depending upon the in- 
dividual component problems which the 
programmer organizes into sub-programs, 
both internal and external to the main ap- 
plications module. No language designer is 
so omniscient about all kinds of problems. 
He should refrain from arbitrary statements 
that this or that high-level language is un- 
necessary or superfluous. 

Competent language processing design- 
ers recognize that the convenient descrip- 
tion of a desired result through any high- 
level language is not necessarily equivalent 
to the procedures which will evoke the solu- 
tion in machine code at run-time. The 
logical-physical relationship of program- 
ming components, referenced especially in 
the second article of this series, reappears 
again, not just with respect to a particular 
command, but with respect to the program- 
ming problem taken hollstically. Using the 
high-level language, the programmer can 
state a logical solution to the problem. The 
language processor relieves the applica- 
tions programmer of having to define fur- 
ther the physical solution to the problem. 
The logical solution is convenient, pre- 
ferred, or necessary; the physical solution 
is obligatory — the computer hardware 
demands it, 

A useful point of design departure sum- 
marizes the programming as a body of tech- 
niques independent of any language but 
occurring in all. Table 1 lists these 16 tech- 



"The language processor relieves the 
applications programmer of having to define 
the physical solution to the problem further." 
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Fig. 1. 



niques, excluding I/O. These techniques fall 
into three subgroups of commands and 
command functions. The first group con- 
tains executable command words; the sec- 
ond includes data manipulation functions; 
the third includes the single program 
documentation command, which is actually 
a non-command. 

This table lists elemental command func- 
tions essential for the high-level language 
programmer to solve problems. 

Second, a truly general purpose high- 
level language possesses the entire reper- 
toire of command functions. If a high-level 
language lacks one or more of these com- 
mand functions then it is a special-purpose 
language. Third, and central to the subject 
of this article, the table defines the range of 
language-support components which the 
operating system should Include to stan- 
dardize the methods which will fulfill these 

•'So* List ol Advwiisers on page 4 IB 



Specific programming needs for the pro- 
grammer, whatever high-level language he 
chooses. 

If the operating system supports these 
fifteen elemental programming functions 
(program comments do not require support), 
the high-level languages will perform uni- 
formly and the size of executable or run- 
time modules will drop dramatically— fre- 
quently 75 percent or more in disk file size. 
This Is because the performance of any one 
of these fifteen programming functions is 
located physically outside the applications 
program, within the operating system. The 
applications program merely constructs 
data address words and executes a CALL 
(assembly language GOSUB) to an address 
within the operating system which the link- 
loader provides when the run-time module 
is cataloged on the disk. This procedure is 
similar to a ROM interpreter for Basic, for 



example, but differs In degree. 

Implicit in the design concept Is the deci- 
sion that other, more generalized high pow- 
ered commands and functions variously 
combine these elements. The coding gen- 
erated first by the MetaBasIc translator and 
thereafter by the MetaBasic compiler would 
be multiple lines of operating system 
CALLS. It is common for the MetaBasic 
translator to generate as many as a dozen 
lines of MetaBasic source code from a sin- 
gle line of Basic (If. . .Then, For. . .Next), 
and each line of MetaBasic source code to 
generate 6-12 lines of assembly language 
source code. 

In this context language processing is a 
multiple-stage progression from the most 
general description of a problem's solution 
at the logical level to the absolute definition 
of the solution procedure at the machine- 
specific physical level. On the average, the 
completely translated and compiled pro- 
gram contains not less than four or five 
times more lines of assembly language 
source code than did the original high-level 
language source code listing. 

All language processing under the Meta- 
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TRS-80 Model I, II, III 

Five mulliple regression orocedures 
(including stepwise, backward elimination, all 
subset, and ridge), 24 transformations, com- 
prehensive data base manager (withi search 
and sort), descriptive statistics, hypothesis 
testing (7 tests), lime series analysis (7 
models), random variate generation, discrete 
probability distributions, sampling distribu- 
tions, nonparametrics (5 tests), and com- 
plete documentation 

Complete package with manual — $125 

To order, send payment plus $2.00 shipping 
and handling to: 

Quant BystexoB ^271 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

S.C residents add 4% sales tax 

Overseas orders add $7 for shipping 
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"The object is to eliminate reprogramming 
completed applications merely because more 
than one computer needs the program. " 



Basic concept must take place at the 
source code level, even in assembly lan- 
guage. The object is to eliminate repro- 
gramming completed applications merely 
because more than one computer needs the 
program due to several different computers 
running side-by-side simultaneously; or the 
need to support customers who ov*^n a varie- 
ty of machines; or changing one's computer 
a few years from now. Therefore, a lan- 
guage translation facility is useless if 
it Is tied directly or indirectly to any 
given machine. 

The object is also to eliminate language 
chauvinism. MetaBasic explicitly asserts 
that when a Fortran program solves a prob- 
lem, it is as good or bad as a problem solu- 
tion programmed in Basic or Cobol, and 
that good or bad is a judgement program- 
mers and programming managers should 
make, not a language processor 

The object is to facilitate adaptation of 
programs for other, perhaps earlier, com- 
puter models, even though there may be no 
language processors for those languages 
available for new, microprocessor based 
computer systems. f^letaBasic must be so 
elemental that it permits the easy construc- 
tion of a translator for IBM 1410 Autocoder, 
System 32 RPG-II, or even Honeywell 800 
assembly language from the earliest 
1960's- These old programs represent tens 
or hundreds of thousands of dollars of 
capital investment. Their useful lives 
should be extended without resorting to ex- 
pensive run-time emulators. 

The language utilities marketed by con- 
temporary manufacturers differ in their 
availability and their method of operation. 
But any contemporary computer which is 
more than a manufacturer-entrapment de- 
vice, offers an assembler program. There- 



fore, if MetaBasic generates a finished 

product in assembly language source code, 
a programmer may use any computer to 
write a program to assemble, catalogue and 
run on any other computer. You should be 
able to write, debug and test a Basic, For- 
tran or Cobol program on a Radio Shack 
Model I even though you expect to run it 
regularly on a Prime 750 time-shared multi- 
user system. 

MetaBasic aims to give the user final 
control over his own programs. If anything 
in the language processor obscures what 
and how it functions, the user will merely 
trade one kind of manufacturer dependency 
for another kind. No new freedom of 
language will be achieved. 

The Zmonltor Operating System 

A veil of sacred cow mystery shrouds 
operating systems generally. They perform 
a range of disk-oriented service functions 
like displaying a directory and copying files 
but they are programs like any other pro- 
gram, written by programmers who also buy 
their jeans at Sears, and the program may 
even contain components written in Fortran 
or Basic, 

Thereality of operating systems signifies 
this: If yours disenchants you change to 
another one. or replace it entirely if you 
assume both technical and administrative 
responsibility for the computer's operation. 
A less drastic and much easier step is to 
piggy back the manufacturer's system with 
a special purpose operating system which 
resides in memory alongside the original, 
filtering access to it as needed. The in- 
complete piggyback operating systems 
are usually called supervisor programs or 
monitors. Manufacturers do not like them, 
because they give the user market control. 



# 


DESCRIPTION 


EXAMPLE 


1 


Define type ana size □* daia 


DIM 


2 


Perform com putal ions 


',■,'.*-,- 


3 


Move and cuncatenale data 


= . + or & 


A 


Load and access internal program Oats 


OATA-READ-and RESTORE 


b 


Initialize anO manage control loops 


FORNEXT-STEP 


6 


Alter program seguence 


GOTO 


7 


Deline and access subprogratns 


GOSUB-RETURN 


e 


Perlorm tests and act jpon results 


IF-THEN-ELSe 


9 


Terminaie progfam eieculion 


STOP-END 


10 


Strip sign bus 


ABS 


11 


Convert data for Ireatrnent as a computational value based upon the col- 






lating sequence of the computer being iis*Kl. tfien reconverl back again 


ASC-CHRS 


12 


Strip o" fractional remainders 


INT 


13 


Dynamically compute data lengths 


LEN 


14 


Eitract data components 


MID$ 


15 


Convert data lor treatment as a computational value based upon the fo'm 






used to display the value, then reconver; back again 


VAL-STRi 


IB 


Document the program source code listing 

Table 1. Programming Techniques. 


REM of 



Radio Shack, for example, refuses to look at 

software which operates in conjunction 
with a monitor or supervisor program 
because if applications programs interface 
to the manufacturer's operating system by 
indirect means, changing to another 
manufacturer entails a huge reprogram- 
ming effort; but, if applicattons programs 
interface through a monitor or supervisor 
program, changing to another manufactur- 
er requires only a new monitor or super- 
visor—a single piece of programming. This 
prospect so frightened IBM that they never 
developed an assembler for the 5110/5120 
series. They did all programming In-house 
on a Model 370 with an object computer 
switch in the assembler for designating the 
5000 series output format. 

Although able to expand to a stand- 
alone, full-fledged operating system. I con- 
structed Zmonltor along the lines of the 
second description. It piggybacks TRSDOS 
which itself shrinks the task of controlling a 
complete computer system like the Model 1 
with all its special-purpose, manufacturer- 
specific and even model-specific jerry- 
rigged pitfalls, such as bootstrapping and 
interrupt management. Zmonltor relies on 
TRSDOS for the two functions it can possi- 
bly do well: boot up, and read a physical 
disk formal, particularly in connection with 
its own hodge-podge disk directory night- 
mare Beyond that, and even including com- 
petent disk management. Zmonltor goes its 
own way, thank you very much. 

The Zmonitor illustrated in Fig. 2 blue- 
prints the inevitable: effortless transition 
from M(3del i entrapments to new options 
which appear virtually daily. These options 
encompass both programs and disk- 
resident data files. 

To attain manufacturer-independence in 
thedatallledeslgn,Zmonitor uses Western 
Digital disk controllers, probably the most 
competently designed disk controllers in 
the industry. They program easily and 
recognize good work when they see it. 
Whatever other criticisms apply to IBM 
computers, the unadorned truth is that IBM 
pioneered and developed the most effective 
disk management procedures in the busi- 
ness decades ago. and it is useless and 
wasteful to change for the mere sake of 
changing. Built into every Western Digital 
disk controller are IBM compatibility 
modes. Manufacturer-specific techniques 
traditionally served the standard marketing 
goal of manufacturer lock-in IBM disk pro- 
cedures were so good that the quality itself 
perpetuated their market appeal and today 
IBM disk compatibility Is not lock-in. The 
Model I does not use it even though 
Western Digital built it into the hardware 
because it would give consumers real 
manufacturer independence. 
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LEVEL IV PRODUCTS, INC. 

- IS NOW OFFERING - 

The Full TRS-80* Line at Discount Prices, 

wltti Extended Warranty Coverage 











H 



MOD II COMPUTER 

32KCR) $2950 

64K(R) $3375 

Expansion [>#1 (f?) $999 
Expansion Dr#l-2-3CE) $695 



NOTE: THE MOD til CAN BE ASSEMBLED WITH UP TO 4 MEG UNFOf^MAHED FLOPPY DISK STOR- 
AGE CAPACITY (4-80 TRK DOUBLE SIDED DRIVES) - CALL FOR A QUOTE ON THE SYSTEM 
TAILORED TO YOUR EXACT NEEDS, 



COLOR COMPUTER 


MOD II COMPUTER 


16K(R) S440 


16K(R) $859 


16K(E) $359 


48K2-40 drives (R) $2010 


16Kw/ext basic (R) $529 


48K2-80 drives (F:) $1829 


16Kw/ext basic (E) $479 


48K2-80 drives (E) $2119 




48K 2-80/80 drives (E) $2419 




RS232 interfoce add $89 



PRINTERS 




MPI DRIVES FOI 


t: MOD 1, 


MOD III, & 


COLOR 


PERIPHERAU 




Line Printer IV (R) 


$849 


MCX)EL 


RAW 


SINGLE 


DUAL 


E,l,OK(R) 


$249 


Line Printer VI(R) 


$986 


4C TRK (E) 


$240 


$298 


$576 


E.l, 16K(R) 


$359 


Daisy Wheel II (R) 


$1679 


40/40 TRK (E) 


S360 


$419 


S818 


E,I,32K(R) 


S469 


C ITOH Stofwriters 


Call 


80 TRK (E) 


S360 


$419 


S818 


E.l, 16K(E) 


$305 


Centronics All 


Call 


80/80 TRK (E) 


S502 


$549 


$1078 


E.i.32KCE) 


S362 


Epson All 


All 










16KRAM(200MS) 


$39 


ArodexAil 


Call 















DEALER'S INQUIRIES INVITED, CALL FOR OUR WHOLESALE DEPARTMENT (313) 525-6201 



V 



WAWWITYPOUCY 

Items Including non-Radio 
Shock components (Er) ore 
covered bv on extended six- 
month ports/lobof vsOTonty in 
our tech seivice center 

Items constructed from Rodio 
Shock approved components 
([?) ore cowered by a 90<lay 
ports/labor warronty at ony 
Rodio StTOCk store, ptus an oddi- 
tionoi 90 doys in our tech set- 
vice center, 



THnUOFSAU 



2% Discount oiiowea on cosn 

pre-pQid orders Pei50no: 
checks require fwo weeks fa 
bcr^k cieororx:e 

Visa. Master Chorge ond COD 
orders accepted Add Si 50 fcr 
CODs 

Shipping/handling/insurance 
odd 1.5% or S2.50 minimum 

Prompt shipments from stock 



LEVEL IV PRODUCTS. INC. 
32461 SCHOOLCRAR ROAD 
UVONIA, MICMQAN 48150 

MICHICAN - (313) 52S6200 
TOU FREE - 600-521-3305 



•TRACeMARK OF TATMOV CORP 




"Zmonitor uses Western Digital disk controllers, probably 
the most competently designed controllers in the industry. 



Because IBM disk modes were available 
in the Model I, Zmonitor uses them as an op- 
tional file mode over TRSDOS. Any five- or 
eight-incti disk on a Model I may be format- 
ted in IBM compatibility mode, with data 
files copied from TRSDOS mode to IBM 
mode tor translation to foreign machines. 

Having eliminated the data file problem I 
tackled the program compatibility problem. 
Outputting assembly language source 
code, rather than object code, was the all- 
too-easy answer. A manufacturer-specific 
version of Zmonitor in both the sending and 
receiving computers enables assembly lan- 
guage source programs to be transmitted 
using IBM format data files. Since the 
manufacturer equips the receiving com- 
puter with its own assembler the correctly 
formatted object files require only a modest 
overhead of assembly time. 

The final step tovt^ard manufacturer-inde- 
pendence was the receding of Zmonitor in 
MetaBasic. Since Zmonitor restricts itself 
to fifteen basic programming functions the 
entire conversion from one computer like 
the Model I to any other computer requires 



new programming of fifteen or less subrou- 
tines in the native language of the new (re- 
ceiving) computer. This is about five days' 
work. After that, every program (regardless 
of which high-level source code) and every 
data file (regardless of which access) may 
be copied over to the new computer. 

Segmentation— Key to Flexibility 

As Fig. 2 illustrates program segmenta- 
tion is the key to flexible programming. 
Large and complicated jobs must be broken 
up at the source code level into more easily 
managed units because MetaBasic oper- 
ates entirely in source code. So the source 
program files, even without comments, are 
quite large. The ratio of a source file to its 
object counterpart may be as high as 10:1. 
The Concur command, described in an ear- 
lier article, eliminates any need to combine 
program segments into single units even 
though two or more must reside in memory 
concurrently before the program can run. 
Where two or more program segments do 
not need to be in memory concurrently, they 
may be designated for origin within either 
Ovrseg (for Zmonitor service functions) or 



COMPUTER 



AUDIO 



CASSETTES ^^ CASSETTES 




LENGTH 12PAK 24PAK 

C-05 69« 49« 

C-10 79« 59e 

C-20 99c 79e 



LENGTH 12PAK 24PAK 

C-30 1.19e .99e 

C-60 1.49« 1.29c 

C-90 1.69e 1.49c 



• 100% ERROR FREE • FULLY GUARANTEED • SUPERIOR SSCREW CONSTRUCTION • 

• HIGH FREQUENCY RESPONSE • VERY LOW NOISE* WIDE DYNAMIC RANGE* 

• USED BY SOFTWARE FIRMS. HOBBYISTS AND RECORDING STUDIOS NATIONWIDE • 

• BOXES SOLD ONLY WITH CASSETTES 10c EA*SZ.OO PER PAK SKIPPING* 



C.O.D. HOTLINE 1-206-675-6143 



MICRO-80' INC. . 

E-2665 BUSBY ROAD • OAK HARBOR, WA 98277 
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Keyseg (for application program functions); 
they will load into their respective overlay 
regions without further attention from pro- 
grammers. 

The second dimension of flexibility re- 
turns us to the question of which high-level 
source language will program a given appli- 
cation function. If you build program seg- 
mentation (address linkage and memory 
region management) into the language pro- 
cessor utilities initially and extend design 
to include segment linkage any of the avail- 
able languages can be used to program 
either the application main module or any 
of its overlay (Keyseg) service modules. By 
the time a program module approaches the 
physical problem-solving level, it has been 
translated into MetaBasic, and gives the 
programmer the operating reality of unre- 
stricted linkage of both data and addresses 
among all available languages. Basic may 
call Fortran, Assembly may call Cobol. or 
any other combination which serves the 
programmer who set out to define a result 
using the language tools at hand. 

The Rules 

The application programmer's Usrseg 
module controls the running of the applica- 
tions program. Appropriate functions used 
regularly remain in the resident Usrseg 
modules; other options are delegated to the 
user's Keyseg (overlay) region of mutually 
exclusive modules. One Keyseg module 
cannot call another Keyseg module be- 
cause, once entered, a Keyseg module may 
return only to Usrseg. This restriction ans- 
wers many program organization questions. 

All application program modules, wheth- 
er in Usrseg or in a Keyseg, perform their 
programming functions through calls to 
Ramseg linkage addresses. Ramseg edits 
the user-program calls to assure that the re- 
quested function can be performed. If not, it 
sets error flags and returns to the calling 
program. If the requested lunction is possi- 
ble it may be a service utility function per- 
formed by one or more Ovrseg modules 
(such as formatting a disk), or it may be a 
program utility function performed by 
Romseg modules. The user never enters 
Romseg or Ovrseg directly, because under- 
standing the internal construction of Zmon- 
itor is considered beyond the interest of the 
typical applications programmer. Unlike 
Level II ROM Basic or Disk Basic, Zmonitor 
never stops the applications program from 
running; it merely refuses to honor service 
requests and tells the calling program why. 
However, any programmer with the time 
and interest to carry a study that far could 
do so. Zmonitor has no secrets, especially 
with all the really competent disassemblers 
available. 

Using Basic as an example, this series 



"Large and complicated jobs must be 

broken up at the source code level 

Into more easily managed units." 



MANUFACTURER-SUPPLIED OPERATING SYSTEM 



ZMONITOR < 



5-FUNCTION ROMSEG 



RAMSEG 



OVRSEG MODULES 



USER S 
APPLICATIONS < 
PROGRAMS 



USRSEG 



KEYSEG MODULES 



Fig. 2 



proposed some judgements and suggested 

solutions. 

• The development of high-level lan- 
guages over the past twenty-plus years has 
taught us ways to describe desired results 
to data processing problems. We cannot 
abandon these in favor ot others because 



each made a valid contribution and too 
much capital has been invested in each, 

• No high-level language developed to 
date can stand alone. Language evolution 
is not even substantially finished. In the 
next twenty years, as much new develop- 
ment will occur as has already occurred. 



and no developer of language processing 
utilities can predict where this process 
will lead, 

• Both interpreters and compilers today 
suffer severe restrictions of utility, not the 
least of which is that they judge which high- 
level language is good and which is bad, 
even though a valid judgement is inherently 
impossible, 

• The next stage ot applications lan- 
guage development presupposes two as- 
sists. The vastly expanding base of users 
must cast their marketplace dollar votes to 
tell developers the kind of equipment and 
programming features they want. The verti- 
cal and horizontal integration of the market 
by a tew large manufacturers must slow 
and reverse in order to maximize customer 
options. 

• The proper role of a developer of lan- 
guage processing utilities is to produce de- 
vices which intercept and short-circuit man- 
ufacturers who attempt to integrate the 
marketplace vertically and horizontally, and 
which facilitate free choice of whatever 
high-level languages, in whatever forms, 
make most sense to the user, and to do this 
through devices which end the continued 
manufacturer tie-in through language form. 

Should there remain any question as to 
intent: The public needs to buy computers in 
the future as we buy radio, tv and stereo 
components now, out of personal prefer- 
ence, without regard to whether our pro- 
grams will run on them. In this process, tru- 
ly independent media such as 80 Microcom- 
puting serve the public. The author takes 
this opportunity to thank the publishers for 
their service. ■ 
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Wtiat 11 0MNITERM7 

OMHITERM IS a ptoffssional rammuricatioiis (aciagt foi tlw TRS-BO tliat allows 
yoi 10 easily communiult and traFisfw tiles ot programs with almost any Dlhti 
computer We've ntver lound a computer thai OMNITEUHl cant mi wHH It's a 
complet! package tiecaiise il includes not only tlie terminal program ilself but also 
conversion utilities, a text editor, special contlguntlon files, serious 
docurrKntatior and serious support 

Wtiy do I need It? 

Voii nrad OMNITERM if yoii need to communicate etfibentty witfi many different 
computers, or it you want to citslomiie your TRS-80 foi use with one particular 
CDm(Hiter You need OMMITERM lo SOLVE your commufiications problems once 
and tor all 

Wtist do I get? 
The OMNITEflNl package includes ttie OMHITEnHI iMtninal program lour 
conversion utilities a teil rtitoi and sitting files fo( use witti popular computers 
sucii as CompoServt the Source anil Dow Jonr — |usl as samples of wtial you can 

lindbergh Systems 



The ULTIMATE TRS-80 Terminal Package 



do tor the computer ywj want lo work with The package irKlwIes su programs seven 
data tiles and real ilKumertation aTS-pagemaniia'ltiai lias twen called 'Ihe best in 
the Industry." And OMNITERM comes with real use; support We can lie reached 
via CompuServe Source plwne or maiMoprompIty answer your questions about using 
OMNITERM 

What do I need to use OMNITERM? 

A Model 1 or Model III TRS-80 al least 3?K of memory one disk and the RS ?3? 
interface OMNITERM works with all ROMs and OOSes. and will work wilh your 
special keytroard drivers 

What will It do? 
OMNITERM allows you to translate any character going to any device' printer, screen 
disk keyboard ortommunicalionslme givingyouDOmplelecontrolandallowiiKiyouto 
ledefiriE the character sEts ol ail devices II will let you transfer data and lun your 
printer while connected tni a record ot Everyllung that happens OMNITERM car 
'etormat your screen so that 8(1 52 or 40 column hues are easy to read and look neat on 
your IRS-eo sceen It ever lets you get m lemote computers *'th lust one Veystroke* 
T!)e program lets you send special characters echo ctiaracte'5 count UARI eriors 
condsii'e m' UARI send true Breaks and use lowe- case li accepts VIOfOTEX codes 
qivng you full cursor control. M wiii even let you revew teit tliat has scrolled nl' 
the screen' Best ol all OMNITERM will save aspecialfilewitliallyouicliangessc. you 



can Quickly use OMNITERM 'or arv 
one of many ditterent computen bv 
loading the proper tiie h s easy to use 
since lis menu driven and 9've5 you a 
full status display so you can eiaiiinf 
and ctiange everything 
"OMNITERM has my vote as the top 
TRS-80 terminal program available today 
Kilobaud Microcomputing lune 1981 
pages 16-19 

OMNITERM IS S95 Iplus shipping il 
COO) Call for 24 hour shipment Manual 
alone S15. applied toward complete pack- 
age Visa. M/C and COO accepted MA 
residents add b\ ta» Dealer inquiries 
invited 

Contact tinflbergh Systems for your 
custom programming needs We are 
eipert at writing software to work with 
YOUR hardware m assembler high-level 

lanquaoe or Forth 

^391 
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Practical Support For Model I, II & III 



• PRACTICAL APPLICATIONS 

• BUSINESS 

• GAMBLING • GAMES 
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• NEW PRODUCTS 

• SOFTWARE EXCHANGE 
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A Complete Financial Analysts Package Used 



*^£« ^JFINCALC 

rt^C^ To Calculate Markup, Margin, Annuities, Compound Interest, Nominal 

^ O^ - And Effective Rates, Sinking Funds, Mortgage Calculations, Future Value, 

cSt^ Savings and Insurance, Percentage Difference Between Two Numbers. 

° Amorti;?ation Schedule and More 
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• ••EVERYTHING FOR YOUR TRS-80 ••• 



TRS-W" it a triideinark of the R«dio Shack Division of Tandy Corpofalion 



MOD-II PROGRAMS 



•k All orders processed within 24-Hours 
-k 30~Dav money back guarantee on all TRSDOS Software 
♦ Add $3 00 for shipping in UPS Areas 
*Add J4.00 /or COD. or NON-UPS Areas 
*Add $5.00 outside U.S.A., Canada & Mexico 
♦ We mill match any bonafide advertised price 
in any of the Major Computer Magazirtes 
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(1) ELECTRIC PENCIL (Michael Shfayer Sotlware] 
Complele wort) processor wilh eilensive B<)iting anO 
prinler (ormalling (ealures 1325 (STANDARD 
TRSDOS VERSION) 1350 (DIABLO, NEC OR OUME 
TRStJOS VERSION) 

(2) GENERAL LEDQEH. ACCOUNTS RECEIWABLE, 
ACCOUNTS PAVABLE. INVENTORV CONTROL. 
INVOICING AND PAYROLL [Small Business Systei'S 
Group! an enlensive business system 'or the senouS 
usei tan De used one module al a lime o< as a co 
ordinated syslem SZ25 per modute $1299 lO' the 
complete syslem 

O) GENERAL LEDCEH. ACCOUNTS RECEIVABLE. 
ACCOUNTS PAVABLE. INVENTORV CONTROL 
AND PAYROLL lCompuma>l a complele use On 
ented business sysrem can be used one module al a 
lime oi as a coordmaled system S'*0 por module 
S995 to' the complete system 

(4) MOO-ll UTILITY PACKAGE iRacpl Comoi,to5l 
adds imponani utilities lo TRSDOS copy liles 
SBPecliwely taster and more accurate tile copying 
repair Pad directories displays sorted directory ot 
all liles on 1 to a disk drives SUPEH2AP change 
disk ID and more 1150 

(S| ADVENTURE »1-iI9 (Scott Adams - Adventure 
Inlernalionall a series ot gamps formally only 
available on the large computers your goal is to work 
your <vav through a maze ot obstacles n order lo 
recover a secret treasure or complete a mission the 
package includes all 9 Adventures wnllen by Stotl 
AOams J99 95 

(B] GSF iRacel Computers) Generalized Subroui "e 
facility a series ot super last machine language 
utilities that can be called trom a BASIC program mo 
machine language knowledge required! sorts 1000 

Items in under 5 secor>ds allows PEEK and po«E 

statements move dala Clocks compress and un- 
compress data works under TRSDOS 150 

|T) DSM iRacel Computes! Disk Sort Merge sorts 
and merges large multiple diskette tiles on a 1 to 4 
drive system NOT At^ IN MEMORY SORT can 
actually alphabetize (or any other lype o( sorii 4 uis- 
drives «ortn o' data sorts one complete disk o( 
intormation into minutes mtormation is provided to 
use DSM with (he RS MAILING PROGRAM works 
under TRSDOS J150 

(•I RSM [Small Systems Soltwacel a machine 
language monitor and OisassemBler can be used lo 
see and modify memory or disk sectors contains a'l 
the commands tound on the Model-I version plus 
some additional commands lor tne MOD II works 
under TRSDOS 139 95 

(9) BLINK BASIC LINK FACILITY (Racei Computes! 
Link from one BASIC program to another saving all 
variables chain programs withoul losing variables 
J50 

MO) BASIC CROSS REFERENCE UTILITY iRacet 
Compulesi dsls all variables and strings used n a 
program (with the line numbers in which they appear) 
lists all GOTOs and GOSUBs (with the line num 
bets in which itiey appear) searches toi' any specitic 
variables or strings (with the line number in which 
they appear) 150 

Ml) DEVELOPMENT PACKAGE [Racet Computes) 
SUPERZAP (to see print or change any byte on a 
diskette) DisassemCler and MOD-II mienace to the 



HICnOSOfT EDfTOR ASSEMBLER PLUS including 
uploading services and patches tor Disk I/O assemble 
Oireclly into memory save al' or portions ot source 
lo disk Dynamic debug tacility {ZBUGl enlended 
editor commands 1125 

(1 J) HARD'SOFT DISK SYSTEM (Racel Computes) 
The software essential to interlace any ol Ihe popular 
large hard disk onves completely compatible with 
your eiisling soltware and tiles allows up lo 20 
megabytes o' storage (and larger) directory expand- 
able to handle thousands o' tiles 1400 

(t3) CAMEO HARD DISK DRIVE CONTROLLER 

coming soon (November H) 

(14) HARD DISK DRIVES coming soon (Nov f) 

(11) H ft E COMPUTRONICS, INC. SHARE-A- 
PHOGRAM DISKETTE >l works under TRSDOS a 
collection ot programs wnllen by MOD-(( owners 
programs include Oata Dase manaoement a word 
processor mail syslem mortgage calculations 
checkbook register and many others IB (add 13 
postage outside ot the United Stales Canada and 
Meiico) FREE it you send us a diskette conlainmg 
a program that can be added lo the SHARE-A-PRO- 
GHAM DISKETTE 

(IB) WABASH CERTIFIED DISKETTES 139 95 (per 

bo« ot 10) 

(IT) FLIP SORT DISKETTE STORAGE TRAY Stores 
50Oisketies comes complete with mden-diviOers Tilt 
plates and aOiustable spacing i4ii 95 
(111 MASTER PAC 100 100 esseniial" programs 
BUSINESS PERSONAL FINANCE STATISTICS 
MATH GAMBLING GAMES includes <2b page 
manual and 2 diskettes S99 95 

<I9) BUSINESS PAC 100 100 essential business 
programs INVENTORY CONTROL PAVROU 
BOOKKEEPING SYSTEM STOCK CALCULA- 
TIONS CHECKBOOK MAINTENANCE AC- 
COUNTS RECEIVABLE ACCOUNTS PAYABLE 
ncludes 1^5 page manual and two diskeiies I1il9 95 

|20) EDITOR ASSEMBLER iGaiaclic Sottware Ltd i 

the tirst user oriented Editor Assembler toi the 
MODEL II and was designed lo utilise aM Ihe features 
of Ihe MODEL 11 II Tcludes innovative features foi 
ease o' codmg and debugging and complete docu- 
mentation lOver 120 pages! works under TRSDOS 
IZ29 00 

(21) BASIC COMPILER (Microsoll) changes your 
source programs into machine language increases 
program execution by 3-101imes (395 

|22) MAIL/FILE SYSTEM from Galactic Software Ltd 
stores 2 500 names per Orsk No sorting time is 
required since Ihe tile is aulomatically sorted by 'ir$l 
and last name plus Zip CoOe on input Retrieve by any 
combination of 19 user codes Supports an 11 digit 
alphanumerica Zip Supports a message line Comes 
complele with user-onenled documenlation (100- 
page manual) Allows 'or company name and individ- 
ual of a company and complete phone number land 
eilensioni works under TRSDOS 1199 00 

(23) INCOME TAX PAC Pro'essional income ta. 
package most forms and schedules output to video 
or line printE' aulomaim memory storage o' all 
inlurmalion data can be loaded Irom diskette 
changed and edited built m error checking 1199 95 

(24) COMPUTER GAMES (SB5G) Mean Checker 
Machine. Sla' Trek III Concentration Treasu'eHunt 
Banco Dog Star Adventure 174 95 



•CQinPUTHQMICS 



C ^d 



so N. PASCACK ROAD 

SPRING VALLEY, NEW YORK 10977 



HOUR 

ORDER 

LINE 



(914) 425-1535 




NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N Y STATE) 

(800) 431-2818 



(1) CP/M (Li'eboat AssocilleSI an alternative 
operating syslem lor the MOD-II that allows MOO-ll 
owners lo use any of the hundreds o' programs 
available under CP/M 1170 

(2) CP/M HANDBOOK (Sybeil a slep-by-step 
guide to CP/M lakes the reader Ihrough each of the 
CP/M commands numborous sample programs 
practical hints reference tables 113 95 

0) GENERAL LEDGER, ACCOUNTS RECEIVABLE, 
ACCOUNTS PAVABLE, INVENTORY CONTROL, 
AND PAYROLL (Peachlree Software) requites CP/M 
and MICROSOFT BASIC professional business 
systems turn key operation can be used as single 
modules or as a coordinated system J600 per 
module 12500 tor the Complele System 

(4) WORD-STAR The ultimate word processor a 
menu driven word processing syslem that can be used 
wiin any printer All standard word processing 
commands are mcliided plua many uniquo com 
mands only tound on WORD STAR requires CP/M 
1495 

IS) MAIL LIST MERGE An add an package that 

allows Ihe user lo send lorm letters (created on 
VyORD-STAR) lo any compiled mailing list (using any 
CP M based mail program such as the PEACHTREE 
MAIL PROGRAM) requires CPM. WORD STAR and 
anOy CP M based mail program 1150 

(6) SELECTOR III (Micro-Api complete data 
management syslem user defined fields and codes 
manages any hsl defined by the user includes 
additional modules for simplified inventory control, 
accounts receivable and accounts payable requires 
CBASIC-2 1295 

(T) SELECTOR IV (Micro-Ap) the ultimate data 
management syslem all features use the SELECTOR 
111 plus dala hie format conversions full page report 
lormatter compulations global searcfi and replace 
hard disk compalible oala/le>t merging J550 

(>) GLECTDR (Micro-Api add on package lo the 
SELECTOR general ledger thai allows the user lo 

deline a customired chart rit accounts 1350 

(8) CBASIC-2 a non-mleractive BASIC used tor 
many programs Ihal run under CP/M allows user lo 
make mo:e efficieni use of disk files eliminates the 
use ot most line number references require on such 
programs as the SELECTOR 1120 

(10) MICROSOFT BASIC an enhanced version olthe 
MICROSOFT BASIC tound on TRSDOS adds 
commands such as chaining (allows the user to LOAD 
and RUN a new program without losing the variables 
currently in memory) long variable length file 
records. WHILE'WEND and others can be used with 
Ihe BASIC COMPILER lo speed up programs (3-10 
times faster e.eculion) 1325 

(11) MASTER TAX (CPAids) professional la> 
preparation program prepares schedules A B C. D 
E F. G RRP SE.TC.ES and forms2106. 2119. 2210 
3468 3903. 2441 4625. 4726 4797 4972. 5695 and 
6521 Printing can be on readily available pre-prmled 
continuous forms on overlays, or on compuier 
generated IRS approved forms Maintains clint history 
hies inieraclive with CP Aids General Ledger 1995 

(12) GENERAL LEDGER II (CPAids) designed tor 
CPA s stores complete 12 month detailed history ol 
transactions generates linancial stalemenls. 
depreciation loan amorliiations. journals trial 
balances statements ot changes in financial position 
and compilation letters includes payroll syslem with 
automating posting lo general ledgers prints 
payroll register W2 s and payroll checks 1450 

(13) ELECTRIC PENCIL (Michael Shrayer Software] 
Complete word processor with extensive editing 

and printer formatting features 1275 (Standard 
printer version) J300 (DIABLO NEC or QUME 

version) 

(14) BASIC COMPILER (Microsottl changes your 
source programs into machirie language increases 
program execution by 3-10 times 1395 

> (CP/M IS A REGISTERED TRADEMARK 
OF DIGITAL RESEARCH) 
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• • • EVERYTHING FOR YOUR TRS-80 • • • 



TRS-M" h a tr«Jemark of the Radio Shack DivHion of Tandy Corporation 



100 sW^l ; MASTER P AC 100 

— qqH^M* : 2nd ElMTION (COMPLETCLY REVISED)^ 

FOR YOUR TRS-80'" LEVEL II MICROCOMPUTER 



ALL ON CASSETTE OR DISKETTE 



SlTitS* 



BUSINESS AND PERSONAL FINANCE 
1 CHtCKHCMJK MAIN TKNANCE 
.' TIME FOH MONEY TO DOUBLE 
i KEDERAL. HCA& y.lTHHOLDlNG IA\ 
^ COMPL'TAMONS 

4 HOME Br[)GET ANA[ YSIS 

5 ANNCITV fOMPLTATKJN _ 
h (NIT PHICTNC. AU 
: CHANt.f- FROM PLKCHAJiF "^ 
» NEBS CHFCK PRINTFK 

4 DAYS BETWEEN IJATES 
1(1 MORTGA<iE AMORTl/AHON TABl F- 
11 INVENTORY CONTKO; 
\2 PORTFOLIO VALUE COMPUTATIONS 
Vi VAUJF OF A SHARE O! STOCK 
M SALES RECORD KEEF'INI.i SYSTEM 
;S hLTURF "^ALUE OF AN IN^-ESTMENT 
Ih FFFFCTKE INTEREST KATE LOAN) 
i: PRESENT \.ALUE OF A H TL'RE AMCXINT 
;,■» RATE OF RFTURN V. AHIABl.E INFLOW 
1" RATE OF RFTURN LON--TANT INFIOW 
:m REGL'LAR WIIHDRA^^Al FROM [N\TSTMENT 
2: STRAIGHT LINE DEPRECIATION 
22 SUM OF DIGITS DEPRtC lATION 
2.< [)£CLINING BALANCE DEPRECIATION 
n BREAK EVEN ANALYSIS 
2S SALVAGE VAI UE OF INVESTMENT 
2b PAYMENT ON A LOAN 

27 FUTURE SALES PROTECTIONS 

28 CREDIT CARD FILE 

W ECONOMIC ORDER QUANTITY .EOQ' 

INVENTOH". MODEL 
JO \.ALCEOF HOUSE CONTENT 

31 TEXT EraTOR 

32 MONTHl >■ CALENDAR 
3.j DAY OF WEEK 
3-) CASHFiOWVS DEPRECIATION 

35 COMPI FTE MAIL SYSTEM 

36 INTEREST RATE ON A LEASE 



■TISTICS 



pERSOHAt 
FINANCE 



STATISTICS AND MATHEMATIC S 

t: RANDOM SAMPl E SELECTION 
IC ANCU.O METIC CONVERSION 
3^ MfAN STANDARL"D DE\.'lATiON 

MAXIML'M AN1> MINIMUM 
jr SIMPLE LINEAR REGRESSION 
-;; MUl TIPLE REGRESSION ANA11S1S 
■,2 GEOMETRIC RFcRESSION 
■1' EXPONENTlAi RFCiRESSlON 
a SiMPlE MOV.'INi, AV'ERAGl 
4,S SIMPLE TTEST cTV 

ih CHISQUARF TFSI 5» » **■ 

47 NORMAL PROBABILITIES 

48 BINOMIAL PHOBARII.ITY 
A1 POISSON PROBABIITTY 

'jO MATRIX ADL>iriON AND SI 'BIRACTION 

b: MAIHIX TRANSPOSE 

i2 MATRIX IN>.T.RSi 

SJ MATRIX MLI IIF'LICATION 

Si SOLUTION Of SIMULTANEOUS EQUATIONS 

5t QUADRATIC FOHMUl^ 

56 LINEAR EQUA I ION SOLUTIONS 

57 ROOT HALF INUH^AL SEARC H 
bS ROOTS OF P{J1 "iNOMlALS 

S"* ROOTS NEWTON S METHODS 

60 PRIME FACTORS OF INTECiER 

61 lEAST COMMON DENOMINATOR 

62 RADIAN DEGREE CONVERSION 
M NUMERICAL INTEGRATION 

ITILFTIES 

W QUICK SORT ROUTINE 

hb PROGRAM STORAGE INDEX 

66 MU'LTIPLE CHOICE QUIZ BUTLDER 

67 FORM LETTER WRITER 
6ri SHELL SORT 
bt CASSETTE LABEl MAKER 

70 CODES MESSA(;FS 

71 MIRGETW'O FILES 

72 SORT WITH REPI ACEMFNT 



MATH 



(JHAPHICS 

7t DRAUS BAR (iRAPH 
■; DRAWS HISTOGRAM 
- MOVING BANNlR Dlsl'! A\ 

GAMBLING AND GAMES 

76 RANDOM SPORTS QUI/ 

77 GOVERNMtNT Q1.I7 
^x HORbt RACE 
71 MAGIC SQUARE 
Kii ARITHMI IK TEACHER 
m; HIGH LOW CAMBI F 
H2 UNSCRAMBLE I FTTiRS 
81 HANCiMAN 
Hi CiAMEOF NIM 
M-. RUSSIAN ROULETTE 
f* HOUIETIF GAME 
«7 ONE ARM! I> BANDIl 
88 HIT THE lARGET 

8'* WAl KINO DKL'NK 

•^t^ STATE t APIIAL QUI/ 

41 TICTAC lOL 

42 OICEGAMF 

41 1 UNAR I ANDAR GAMI 

4i BIORmTHM 

% HORSE Sll FCIOR H. I ASS LAIC Ul AIORi 

* RANDOM DICE ROLl 

47 RANDOM ROULE I I E HOLE 

W RANDOM CARD DEAl tK 
*J GUESS IHF NUMBER 
100 WHITE our SCREEN 



GXMBVn*** 



110 PA<^^ 



-,«« no PA**"- 



GUARANTEED SATISFACTION 

30 DAY MONEY BACK GUARANTEE ON ALL SOFTWARE 



iCQinPLJTHQMlCS 



PV^TV-^Pv^A*! 



I 

H 

E t^9 



50 N PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 

PLEASE SEND ME: 



a MASTER PAC 100 CASSETTE VERSION 559 95 

D MASTER PAC 100 DISKETTE VERSION $59.95 

a MASTER PAC 100 (TRS 80 MODEL II VERSION! $99.95 



-^gt^\ ^ ^ HOUR 
^^24 ORDER 
LINE 

(914) 425-1535 




NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 

A- All orders process^ within 24-Hours 

# SO-Day monty back guarantte on all Software 



CREDIT CARD NUMBER EXP DATE. 



SJGNATURE. 



NAME 

ADDRESS CITY STATE ZIP 

■** ADD MM KM WirriNG IN UPS AREAS • ADD HM FOR C.O.D. OR NON-UPS AREAS • ADD $5.M OUTSIDE U.S.A, CANADA & M[XICO 
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■CQinPlJTHQMlCSg 

EVERYTHING FOR YOUR TRS-80™«». 

^M ■ -■- 1- -^^^ ^ ^ ^^^^^^^^ ^j j^^ Hadio Shat k Dlvtslon o( Tandy Orporallon 

BUSINESS PAC 100 

100 Ready-To-Run 
Business Programs 



Softujare 



(ON CASSETTE OR DISKETTE) Includes 1 10 Page Users Manual 5 Cassettes (Or Diskettes) 

Inventoiy Control Payroll Bookkeeping System Stock Calculations 

Checkbook Maintenance.... Accounts Receivable — Accounts Payable 



BUSINESS 100 PROGRAM UST 



1 RGLETS 



ANMUl 

DATE 

DAYYEAR 

LEASEJMT 

BREAKEW 

DEPRSL 

8 DEPRSY 

9 DEPRDB 

1 DEPRDDB 
H TAXDEP 

12 CHECK2 

13 CHECKBK1 

14 MORTGAGE/A 

1 5 MULTMOM 

16 SALVAGE 

17 RRVARIM 
Ifl RRCOMST 

19 EFFECT 

20 FVAL 

21 PVAL 

22 LOANPAY 

23 REGwmi 

24 SWPDISK 

25 DATtVAL 

26 AMMUDEF 

27 MARKUP 
2B SIMW^UMD 

29 BOMDVAL 

30 DEPLETE 

31 BLACKSH 

32 STOCVALl 

33 WARVAL 

34 BOMDVAL2 

35 EPSEST 

36 BETAALPH 

37 SHARTCl 
3B OPTWRITE 

39 RIVAL 

40 EXPVAL 

41 BAYES 

42 VALPRIMF 

43 VALADIMF 

44 UTILITY 

45 SIMPLEX 

46 TRAMS 

47 EOQ 
4B QUEUE 1 

49 CVP 

50 COfiDPROF 

51 OPTLOSS 

52 FQUOQ 



MAME 

53 FQEOWSH 

54 FQEOQPB 

55 QUEUECB 

56 NCFANAL 

57 PROFIMD 

58 CAPl 



Intefea Apportonment by Rule of the 78 s 

Annurty computatiofi program 

Time between dates 

Day of year a particular date talis on 

Interest rate on lease 

Breakeven analysis 

Straightline depreciation 

Sum ol the digits depreciation 

Declining balance deprcoaoon 

DoiJple declining balance deprecabon 

Cash flow v5 depreciabofi tables 

Prints NEBS checks along with daity register 

Cbectt)ook maintenance program 

^^ort9age amortization laWe 

Computes Qme needed for nxmey to doybte, tiipte, etc 

Determines salvage value of an investment 

Rate o( return on investmenl with vanable inflows 

Rate of retum on investment with constant inftows 

Effectve interest rate of a loan 

Future value of an investment (compound interest) 

Present value of a future amoont 

Amount of payrDent on a loan 

Equal withdrawals from investment to leave over 

Simple discount anatysis 

Equivalent G nonequivalent dated svlues toe oUig. 

Present value of deferred armuittes 

% Maikup analysis for items 

Sinking fund amortiiation [xogiam 

Value of a bond 

Depletion analysis 

Black Sctxsles options analysis 

Expected retum on stock via discounts diVKtends 

Value of a warrant 

ViJue 0* a bortd 

Estirrwte of future eafrur\gs per share tor company 

Computes alpha and beta variables for stock 

Portfolio selection nxidel i.e v.4u4 Mocks to hold 

Option writing computations 

Value of B right ^ 

Expected value attalysis 

Bayeslan decisions 

Value of perfect information 

Value of additional Information 

Derives utility function 

Linear programming solution by simplex method 

Transportation method for lirtear programmirtg 

EcorHHMic order quantity inventory model 

Single server queueing (waiting line) model 

Cost- volume- profit analysis 

Conditional profit tables 

Opportunity loss tables 

Fixed quantity economic order quMthy model 



DESCRIPTION 

As above but with shortages permitted 

As above but with quantity price breaks 

Cost-benefit waitirtg line analysis 

Met cash -flow analysis for simple investment 

Profitability Index of a pro)ect 

Cap, Asset Pr. Model analysis of project 



59 WACC Weighted average cost of capital 

60 COMPBAL True rote on loan with compensating bd reqiared 

61 DISCBAL True rate on discounted toan 

62 f'^ERGATlAL Merger analysis computWKXis 

63 RHRAT Financial ratxjs lor a firm 

64 MPV ISet present value of pro(ecl 

65 PRIMDLAS Laspeyres pnce irxJex 

66 PRJMDPA Paasche prKe inden 

67 SEASIMD Constructs seasonal quantity indices for company 

68 TIMETR Time senes analysis linear trend 

69 TIMEMOV Time senes analysis moving average trervJ 

70 FUPRINF Future price esOmador Mth inflation 

71 WULPAC Mailing list system 

72 LETWRT Leaer writing syslem-fcnte with MALPAC 

73 SOfrr3 Sorts list of names 

74 LABEL I Shipping label maker 

75 LABEL2 Name label maker 

76 BUSBUD DOME business bookkeeping system 

77 TV\ECLCK Computes weeks total hours from timeckxrk irio. 

78 ACCTPAY In memory accounts payable system- storage permitted 

79 iriVOICE Generate invoice on screen and print on pnrner 

80 IMVEf1T2 In memory inventory control system 

81 TELDIR Compujterued telephone directory 
62 TWUSAT* Time use anafysis 

83 ASSIGN Use ol assignment algorithm for opUmaJ job assign 

84 ACCTREC tn memory accounts receivable system-storage ok 
B5 TERMSPAY Compares 3 metfiods of lepayrrienl of loans 

86 PAYNET Computes gross pay required for grvwi net 

87 SELLPR Computes selling pnce (or given after tax arriount 

88 ARBCOMP Aitiitrage computat>ons 

89 DEPRSF Sinking fund depreciation 

90 UPSZOrSE Finds UPS lones from zip code 

91 ENVELOPE Types envelope including return address 

92 AUTOEXP Automobile expense analysis 

93 IMSFILE Insurance polkry file 

94 PAYROU-2 hi menxiry payroll system 

95 DiLAKAL Dilution analysis 

96 LOATHAfTD Loan amount a borrower can afford 

97 RErfTWCH Purchase price for rental property 
96 SALELEAS Sale^easebsck analysis 

99 RRCOffVBD Investor s rate of retum on convwtaWe borxJ 

100 PORTVAL9 Stock market pottlobo storage-vajuatior program 



CASSETTE VERSION »99 

DISKETTE VERSION »99 

TR8-80* MODEL n VERSION »149 

ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 
ADD $5.00 OUTSIDE U.S.A. CANADA & MEXICO 



" ORDER, if.^^ 



CQnPUTHQf^lCS 



MAn-tf-VVTZ/J ^ ^ 



i-jinL.r-1-} ^ i-^CE 



SO N. PASCACK ROAD 
Sf>RING VALLEY, NEW YORK 10»77 




HOUB 
9 A oROEft ^ 
^^ UNE 
^(914)425-1535 



• S&9 Lill otAtfwiiura on paga 4 18 
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• • • EVERYTHING FOR YOUR TRS-80 '• • • 




TRS-ao la ■ IrMlrniBrk of fhr Radtn shark Division of Tandy Corporation 

* AH orders processed within 24-Hours 
•k 30-Dasi money back guarantee on all Software 
• Add 13.00 for shipping in UPS Areas 
* Add $4.00 for COD. or NON-UPS Areas 
n VT^Wl^VCJC * Add $5.00 outside U.S.A., Canada & Mexico 



COORDINATED 



SMALL BUSINESS 
SYSTEMS GROUP 



SYSTEMS 




icxppita?. 



FACTS ABOUT THE S.B.S.G. BUSINESS PACKAGES 

1 S.B.S.G. IS a sophisticated Business Sottware System designed tor the serious businessman 

2 Each ot the S.B.S.G. Butlnati Modulet may be purchased separately or you may purchase the entire coordinated business system 

3 Modules pu re Inased separately do not coordinate witti the General Ledger (although forthestandardS.B.S.G.Iee. the user may upgrade his 

individual modules tor the coordinated system). 

4 Foolproof, Step-By-Step procedures are supplied, planned and documented for the First-Time Computer Uter. All programs are self- 
explanatory, telling the user what is required at every step. 

5. Programs are written in BASIC and the source code listing is supplied for those users who decide to modify the original system. 

6 A complete users manual is supplied with each module 

7 Oemo Data diskettes are supplied with sample data 

6 S.B.S.G. has an In-House staff that can answer questions and problems related to the proper use of the S.B.S.G. Butln*aBSysl«ni (on the 

telephone or through the mail). 

9 First-Time Computer Owners Note-Instructions are provided tor entering state payroll withholding tables. There is an additional charge if 
you prefer to have S.B.S.G. Programmars insert the correct data 

10 Minimum system requiremeni is 2-drives to run any single module 

11 Minimum system requirement is 3-drives to run the coordinated business system |AR-AP-GL) or (AR-AP-GL with PAYROLL). 

12 Minimum system requirement is 4-drtves to run the extended coordinated system jAR-AP-GL-PH and INVENTORY/INVOICING) 

13 The A. OSBORNE A ASSOCIATES business manuals are provided FREE with each order (they may be purchased separately at $20 per 
manual) 

14. The INVENTORY and INVOICING modules are original programs written by S.B.S.G. 

15 Each module can t>e purchased as independent modules to run on a 2 or more drtve system except INVOICING 

16 Memory requirement is 4aK for the MODEL-I and 64K lor the MODEL-II 

17 AIIS.B.S.G. BUSINESS SYSTEMS may be upgraded up to 4-disk drives No data is ever lost during an upgrade There is a standard S.B.S.G. 
charge tor all upgrades 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks m payment ot outstanding invoices In 
addition, it produces cash management reports This system aids m 
tight financial control over all cash disbursements of the business 
Several reports are available and supp'y information needed for the 
analysis of payments, expenses, purchases and cash requirements. All 
A/P data feeds General Ledger so that data is entered into the system 
just once. These programs were developed 5 years ago for the Wang 
micro-computer and have been tested in many environments Since 
then The package has been converted to the TRS-80'" and is now well 
documented, on-line, interactive micro-computer system with the 
capabilities of (or exceeding many larger systems) 
CAPABILITIES: 

* menu driven, easy to use. full screen prompting and cursor control 

* invoice oriented, everything revolves around the invoice, handles 
new invoice or credit memo or debit memo 

* invoce information recorded, invoice <». description, buyer, check 
register ff. invoice date, age date, amount of invoice, discount (in %). 
freight, tax ($), total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure, allows checks to be calculated 
for a set of vendors-or-(or specific vendors 

* program prints your checks, contiguous computer checks with your 
company letterhead can be purchased from SBSG 

* reports include (samples on back): 

• open item listing/closed item listing - both detail and summary 

• debit memo listing/credit memo listing 

• aging 

• check register report (to give an audit trail of checks printed) 
■ vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER; each invoice can be distributed 
to as many as five (5) different GL accounts, system automatically 
posts to cash and A/P accounts 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers Management can 
generate information required to control the amount of credit extended 
and the collection of money owed in order to maximize profitable credit 
sales while minimizing losses from bad debts. The programs com- 
posing this system were developed 5 years ago, especially tor small 
businesses using the Wang Microcomputer They have been tested in 
many environments since then. Each module can be used stand alone 
or can feed General Ledger for a fully integrated system. 

CAPABILITIES: 

* menu driven; easy to use. full screen prompting and cursor control 

* invoice oriented; invoices can be entered t>efore ready for billing, 
when ready for billing, after billing or after paid 

* allows entry of new invoice, credit memo, debit memo, or change/ 
delete invoice 

* allows for progress payment 

* transaction information includes 

• type of A/R transaction ■ billing date 

" customer P.O # • general ledger account number 

" description of P O • invoice amount 

• shipping/transportation charges 

■ tax charges 

• payment 

• progress payment information 

• transaction print & tile maintenance procedures insure accuracy 

* customer statements printed, computer statements with your corn- 
pay letterhead can be purchased from SBSG 

* reports include: (samples on back) 

• listing of invoices not yet billed 

■ open Items (unpaid invoices) 

■ closed Items (paid irwoices) 

• aging 

* fully linked to General Ledger; will post to applicable accounts: 
debit A/R, credits account you specify 
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PAYROLL 
Payroll invoices many complex calculations and the production of 
reports and documents, many of which are required by government 
agencies It is an ideal candidate tor the computer With thts Payroll 
system m-house, you can promptly and accurately pay your employees 
and generate accruate documents/reports to management . employees, 
and appropriate government agencies concerning earnings, taxes, and 
other deductions The package has been converted to the TRS-80" and 
IS new a well documented, op-line. Interactive, micro-computer system 
with the capabilities o1 (or exceeding) many larger systems 
CAPABILITIES: 

* performs all r>eces5ary payroti tasks inctuding 

• (ite maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive: 

■ hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• ovenirne pay 

* employees can be paid using any combination of pay types (except, 
hourly cannot receive salary and salary cannot receive hourly) 

* special non-taxable or taxable [ump sums can be paid regularly or 
one time (bonus, reimbursements, etc) 

* health and welfare deductions can be automatically calculated for 
each employee 

* earnings-to-date are accumulated and added to permanent records; 
taxes are computed and deducted US income tax, Social Security 
tax. state income tax. other deductions (regular or one time) 

* paychecks are printed; computer checks with your company letter- 
head can be purchased from SBSG 

* calculations are accumulated for. employee pay history. 941A re- 
port, W-3 report, insurance report, absentee report 

* fully linked to General Ledger Each employee's payroll information 
can be distributed to as many as (12) twelve different GL accounts, 
system automatically posts to cash account 



INVENTORY CONTROL/INVOICING 

* ISAM {Indexed Sequential Access Method) eliminates the necessity 
for time consuming sort. 

* Pre- Allocated Files for IMMEDIATE update and inquiry capabilities 

* Fast Disk storage and retrieval 

* Inventory Master Record includes class SKU Division Retail 
Cost Beginning Balance Period Sale Units Period Receipts On 
Order On Hand Minimum Reorder Point Recommended Re- 
order Amount Vendor Number Period Sale Dollars YTD Sate 
Units. YTD Sale Dollars 

* Calculated and Displayed Formulas include Gross Margin (S) 
Gross Margin {%) Gross Margin ROI (%) Average Inventory Retail 
(J) Average Inventory Cost ($) Turn-Over (%) 

* Reports Generated include .Master File Listing Class Description 
Listing Transaction Audit Trail Minimum Reorder Point by Ven- 
dor Retail Price List Retail & Cost Price List. Period Sales Report 

Year to Date Sales Report. Stock Status (Screen or printer output) 
Commission Report (for salesmen and buyers) 

* Transaction Types include Sales. Vendor Receipts. Vendor 
Orders Customer Returns Vendor Returns Transfer Stock 



PRICING 

ACCOUNTS RECEIVABLE 
ACCOUNTS PAYABLE . . 
GENERAL LEDGER ... 
PAYROLL 



GENERAL LEDGER 

The General Ledger accounting system consolidates financial data 
from other accounting subsystems (A/R. A/P, Payroll, direct posting) in 
an accurateand timely manner. Major reports include the Income State- 
ment and Balance Sheet and a "special" report designed by rr^anage- 
ment. The beauty of this General Ledger system is that it is completely 
user formatted You "customize" the account numbers, descriptions, 
and report formats to suit particular business requirements These 
programs were developed 5 years ago for the Wang micro-computer 
and have been tested in many environments smcethen. The package 
has been converted to the TRS-BO" and is now a well documented, on- 
line, interactive micro-computer system with the capabtlities of (or 
exceeding) many larger systems 

CAPABILITIES: 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 

* more than 1,750 transactions may be entered via: 

■ direct posting; done by hand, validated against the account file 
before acceptance 

• external posting; generated by A/R, A/P, Payroll or any other 
user source 

* data is maintained and reported by: 

• rrronth 

• quarter 

• year 

• previous three quarters 

* reports (samples on back) include: 

• tnal balances 

• income statement 

• balance sheet 

• special accounts reports and more.. 

* user formats reports with the following designated as you wish 

• titles 

■ headings 

■ account numtjers 
' descriptions 

• subtotals 

• totals 

• skip lines 

• skip pages 

* up to eight levels of totals - fully user designated 

* menu driven; easy to use; full screen prompting and cursor control 



iCQlnRJTHQI>^lCSI 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIOE OF N.Y. STATE) 

(800) 431-2818 




HOUR ^^ 
24 ORDER ^ 
LINE 

(914) 425-1535 



INVENTORY 

INVOICING 

COORDINATED INVENTORY/INVOICING ACCOUNTS RECEIVABLE 

COORDINATED AR-AP-GL 

COORDINATED AR-AP GL with PAYROLL 



EXTENDED COORDINATED AR-AP-GL INVOICING/INVENTORY with PAYROLL 



MOD-1 
VERSION 

S125 
$125 
$125 
$125 
$175 
$150 
$449 
$375 
$495 
$799 



MOD-II 
VERSION 
$225 
$225 
$225 
$225 
$275 
$250 
S749 
$675 
$899 
S1299 



MOD-tll 
VERSION 

S199 95 
$199 95 
$199 95 
$199 95 
$199 95 
$199 95 
$599 95 
$599 95 
$79995 
$1199 95 



'fi4Mt 1 im nt Arivprliserson oaae 418 
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CQnPJTRQMlCS 



• • • EVERYTHING For Your TRS-80* Model I or Model III • • • 



' TRS-80'' IS a trademark of Tandy Corp 



REMsoFT. Inc 



' All orders processed within 24 Hours 
• 30-Day money bach guarantee 
• Add S3 00 tor shipping in UPS Areas 
• Add $4 00 for C □ or NON-UPS Areas 
• Add S5 00 to Canada or Mexico 
• Add e«act postage to all oifier countries 



Let Your TRS-80^" 
Teach You 

ASSEMBLY LANGUAGE 


LEARN TRS-80 "^ 
ASSEMBLY LANGUAGE 

DISK I/O 


REMASSEM-1 

Tiredof bi.ying book after book on assembly languaq*; programming and 
SUM not knowing your POP from your PUSH? 

REMsOFT proudly announces a more efficient way. using your own 
TRS-SO'" to learn the (jnda menials of assembly language programming 
al YOUR pace and at YOUR convenience 

Ou' unique package -INTRODUCTION TO TRS-80 ' ASSEMBLY 
PROGRAMMING", will provide you with ine following 

* Ten 46-minute lessons on audio cassettes 

* A driver program to make your THS-BO" video monitor serve as a 
blackboard (or the instructor 

*■ A display program (or eacti lesson to provide ill ustration and rein- 
forcement for what you are hearing 

* A textbook on TRS-SO" Assembly language Programming 

* Step-Dy-slep dissection of complete and useful routines to test 
memory and to gam direcl control over the keyboard, video moni- 
tor, and printer 

* How to access and use powerful routines in your Level 11 ROM 
This course was developed and recorded by Joseph E Willis and is based 
en the successful series of courses he has taught al Meta Technologies 
Corporation the Radio Shack Computer Center, and other locations m 
Northern Ohio The minimum system required isa Level II. 16K RAM 


REMDISK-1 

Your disk system and you can really step out with REMs-"' ■ ^ Educational 
Module. REMDISK-1. a shortcourse revealing the details of DISK 1 
PROGRAMMING using assembly language 

Using tf'e same format as our extremely popular introduction to assem- 
bly language programming this -ASSEMBLY LANGUAGE DISK I/O 
PROGRAMMING" course mctudes 

♦ Two 45-rninulP lessons on audio cassette 

• A driver program to make your TRS-80" video monitor serve as a 
blackboard for the instructor 

* AdiBp'ay progra''^ torRSCh lesson toprovideil'ustraiionandrein- 
fo'cement tor whal you are hearing 

• A booklel of comprehensive fully-commented program listings 
illustrating sequential file 1 O random-access fill' 1 and track 
and sector 1 O 

• A diskette with machmi^-readabie source codes for an programs 
diGcusS'-'d. in both Radio shack EDTASM and Macro formats 

* Roiilinos to convert frorr' one assembler format to the other 
This course was developed and recorded by Joseph E Willis for the 
student with experience in assembly language programming it is an 
intermediate- to advanced- level course Minimum hardware required is a 
Model 1 Level II 16K RAM one disk drive System 











■CQiriRJTHQI^lCS! 



►^9 




50 N, PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



HOUR 

ORDER 
LINE 



LINE ^ 
(914) 425-1535 




PLEASE SEND ME: 

DREMASSEM-1 (TRS-80MODEL ICASSETTE) S69 95 

D REMASSEM-1 (TRS-80 MODEL I DISKETTE] $74 95 

D REMASSEM-1 (TRS-80 MODEL III CASSETTE] $74 95 

n REMASSEM-1 (TRS-80 MODEL III DISKETTE) $79 95 

DREMDISK-I (TRS-80MODEL I DISKETTf-:) $29 95 

DREMDISK-I (TRS-80MQDEL 111 DISKETTE) S34 95 



CREDIT CARD NUMBER EXP DATE 

SIGNATURE NAME 

ADDRESS 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



CITY STATE... 

' ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE *" 



ZIP. 
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from ug^ mfmiM^ 

FOR THE TRS-80 MODEL I AND MODEL IH 



System Diagnostic 



„ent Of j£!2ULie^^ por Cassette or Disk 



- — IS YOUR COMPUTER WORKING? 



^^^ -»_ ARE YOU SURE? 

^^^^■^^B ^y^ ROM: checksum test 

^^W^^»0 ' ^^ RAM: (our separate tests including every address and data value. 

^ ^ vmtr* nicPi av- character generator, video RAM, and video signal. 

every key contact tested. 
character test, 
read /write/verify data. 

connector fault, data transmission, traming. data loop, baud rale generator. 

disk controller, drive select and restore, track seek and verify data, read/wrile/verify all tracks and 
sectors with or without erasing, sector formatting, disk drive tirner, disk head cleaner. 

— Individual tests of each device with operator monitoring and intervention. 

— Continuous sysem tests run continually for hours testing each component, with diagnostic reports optionally written on line printer. 

— One program adapts to any system configuration and hardware. 

— Complete irtstructions and documentation. 



ROM: 

RAM: 

VIDEO DISPLAV: 

KEYBOARD: 

LINE PRINTER: 

CASSETTE RECORDER: 

HS-232-C INTERFACE: 

DISK DRIVES: 



MON-3 and MON-4 

The TRS-BO Monitor Pro-ams "3 and >>4 are powerful utility programs 
enabling you to interact direc:lly with (he TRS-80 in Machine Language. 
They are as useful for beginners as for advanced programmers. 

• BEGINNERS can learn to interact directly with the computer in 
Machine Language. 

• 40-PACE MANUAL provided with each program. 

• SIMPLE commands, easy to use. 

The Features Of The Monitor Pro g rams Enable You To The Followin g 

• DISPLAY men>ory in different ways- 

• DISASSEMBLE memory to see Machine Language commands. 

• MOVE and COMPARE memory areas. 

• SEARCH through memory to find specific values. 

• MODIFY memory In various ways. 

• RELOCATE object programs. 

• PRINT output on video display or hne printer. 

• READ and WRITE object tapes in SYSTEM Format. 

• UNLOAD programs using low RAM on disk. 

• SAVE and READ disk files (MON-4 Only). 

• INPUT and OUTPUT of disk sectors (MON-4 Only). 

• SEND and RECEIVE data over RS-232-C Interface (MON-4 Only). 

• Create SYMBOLIC Tapes (MONO) or Files (MON-4) of Disassem- 
bled output lor Editor /Assembler program. 

MON-} (For Casacttc Systcnu) $39.9S 
MON-4 (For IHak Systems) S44-9S 



SMART TERMINAL 

Enables your TRS-BO to be used as a remote terminal to a lime sharing 
computer system. Supports upper/tower case and full range of control 
keys, including controFkey mapping into any ASCII character. Automatic 
transmission oT files between TRS-80 and host computer. Files can be read 
from or written to cassette tape of disk. Incoming data can be printed on 
Kite printer or stored in memory for subsequent save to cassette or disk. 
Disk and tape files are fully compatible witli the ELECTRIC PENCIL pro- 
gram. Baud rate and RS-232-C sense switches can be reset without open- 
mg Expansion Interlace. Requires RS-232-C interface and modem. 

Cassette or IMsk Version «*«.« 



MAIUNG UST 

Maintains mailing lists of over 1000 names. Commands allow adding, 
changing, deleting, and finding names. Sorting is done by machine lan- 
guage accordinc to the information in any field (i.e., name, address, lip 
code). Labels printed in 1, 2, or 3 columns, in master list on one line, or ot\ 
video display. 

Disk Version Only M9-9S 



HOME BUDGET 

Combines the maintenance of your checkbook with analysis ol your 
Income, expenses, and monthly bills. Handles data including bills, in- 
cluding bills, income, deposits, checks and debits lo your checking ac- 
count, and cash eipenses. Computes checkbook balance, list ot unpaid 
bills, monthly and year-to-dale summaries of income and expenses show- 
ing income tax deductions. All output printed on video display or line 
prmter at user's option. Complete instructions for customizing to suit 
your own budget. 

DUk Version Only $44-9S 



SMALL BUSINESS ACCOUNTING 

Based on Dome Bookkeeping Record n612, this program keeps track of 
income, expenditures, and payroll for a small business ol uplo 16 employ- 
ees. Income and expenditures can be entered on a dally, weekly, or 
monthly basis, and the program computes monthly, through last month, 
and vear-to-date summaries. Payroll section keeps record of individual 
employees and their paychecks with up lo six categories of pavroll de- 
ductions. Employee payroll record and year-to-date payroll lot^s can be 
computed. Manual contains complete instructions for customizing lo suit 
your business. 

Disk Version S49-9S 
Cassette Version Slf-Vf 
(Cassette Version does not contain payroll) 



FASTSORT 

A series of machine-language subroutines (for 16K, 32K and 4BK Sys- 
tems) to sort data from BASIC programs. Data mav be alphabetic (string) 
or numeric (integer only). Works equally well witn Level II or Disk Basic. 
Complete instructions and examples provided for interfacing with your 
BASIC programs. 

Cassette or DUk Version S9-95 



iCQinPlJTRQMlCSi 



so N PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 



tSTjRt:^'' 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N Y STATE) 

(800) 431-2818 




-^ HOUR 
24 ORDER 
LINE 

(914) 425-1535 



' All orders processed within 24 Hours 
" 30-Day money back guarantee 
• Add $3 00 for shipping in UPS Areas 
• Add 54 00 (or C O D or NON-UPS Areas 
• Add $5 00 to Canada or Mexico 
• Add exact postage to all other countries 



V Sw Lfsr at A<Jvenis9rs on page 4 18 
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EDUCATION 



LOAD 80 



When a TRS-80 is your assistant, 
everyone gets out of the physics lab on time. 



Specific Heat 



John Fetchko 
505 Ninth St. 
Windber. PA 15963 



In most high school physics 
and chemistry courses, 
laboratory investigations are 
done to test scientific prin- 
cipies learned in the class- 
room. Often the purpose of the 
study may be to experimentally 
measure quantities with known 
values (i.e., acceleration due to 
gravity, the charge of an elec- 
tron, etc.). 

When a student gets an 
answer unreasonably far from 



the accepted value, does that 
mean he has made an error in 
his calculations or does it 
reflect poor measuring tech- 
nique? The best way to tell is to 
look at all the measurements, 
see If they seem reasonable, 
and then check the student's 
math. When you multiply this 
by 25 students you can readily 
see the time science teachers 
spend helping students deter- 
mine their sources of error. 

As a high school physics 
teacher, I have found that the 
TRS-80 is an excellent device to 
help with this problem. After 
completing an experiment, a 



Specific Heat of Metals 

Measuremenls 
1. Mass ol meiai 

2 Mass ol calOTiTieler 

3 Mass ol calDiimeler ana water 

4 Specific f'eal ot caio'imelef 

5 Temperatu'e o( rnelal initial 

6 Tempe'alure ol calonrneier and 
*alef. inriial 

7 Tempcalure ol calonrpctet. water, 
and metal, final 

Calculations 
S Mass ol walet 

9 Temperature cfiange ol calorimeter 

and water 
10 Calories gamed by water 

1 1 . Calories gained by calonmetei 

12. Total calories gamed = calOf 1*8 loal 
Dy melal 

13 Temperature change o( melal 

14. Specific heat of metal. eiperimBOtal 

15. Accepted value for specilic heal of 
metal 

16. Percent error 



N«iTie . 

Metal used. 



Table 1. Data Sheet for Specific Heat Laboratory Experiment. 



student can type his measure- 
ments as well as the results of 
his calculations into the com- 
puter. The TRS-80 can quickly 
tell him if his measurements are 
reasonable and his calculations 
correct. 

An example of an experiment 
well suited to this purpose Is 
the determination of the 
specific heat of metals. 
Specific heat is defined as the 
number of calories required to 
raise the temperature of one 
gram of a substance by one 



Evaluation 

Your Answers are very close to mine, 
(Your results differ Irom mine by 2%) 
Your math must be correcl' 

Your eipeninental error is not Too bad 
(Youf eipe'imenial error was S'dI 
However, you can t>e more precise in your 
measurements 

Press Enter' to start another trial 

Fig. 1. Computer's Evaluation ot 
Laboratory Results. 



degree Celsius, In order to 
determine the specific heat of a 
metal specimen, it is heated in 
boiling water and then placed 
Into cold water in an insulated 
(calorimeter) container. By 
measuring the change in the 
temperature of the cold water, 
the specific heat of the metal 
can be calculated. 

In Table 1, notice that steps 
one through seven consist of 
the measurements students 
make. Steps eight to 16 break 
down the calculation of 
specific heat to a step-by-step 
process. Therefore, if the 
students have made math 
mistakes, they can easily find 
them by comparing their 
results with the computer's 
answers. 

After my students complete 
their calculations, they take 
their data sheet to the TRS-80 
and let the computer evaluate 
their results. The Program 
Listing requires no previous 
knowledge of the TRS-80, The 



Calculations 








8 Mass of Water 






300 Grams 


9. Temperature Change ol Calorimeter arid Walec 




lOCelsius Deg 


10. Calories Gained Oy the Water 






3000 Calories 


11. Calories Gained by the Calorimeter 






220 Calories 


12, Total Calories Gamed 






3220 Calories 


13. Temperalure Change Ol Metal 






70 Calories 


14. specific Heat of Metal (Exp.) 






092 Cal/GC 


15. Specific Heat of Metal (Ace.) 






1 CaKGC 


16 Percent Error 






8% 


Note. Your Calculated Value for Specific Heal Was 


09 CAUGC 1 


Type Enter' for an Evaluation 








Table 2. Computer 


Calculations 
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program starts over after each 
trial so it is ready as each stu- 
dent finishes his math. 

But the program does more 
than take the student's mea- 
surements and tell him what 
the -answers should be {see 
Table 2). It evaluates the ac- 
curacy of the student's math by 
comparing the student's 



answers with the computed 
ones. It also evaluates the stu- 
dent's laboratory technique by 
comparing his results with the 
accepted ones (see Fig. 1). 

Teachers can use this pro- 
gram in its present form or can 
customize it by adding addi- 
tional checks. For example, if 
he knows that all his calori- 



meters weigh within two per- 
cent of 100 grams, he can add: 



191 IF ABS (MC-IO0yMC<.O2 THEN 

200 

192 PRINT'TOUR VALUE FOR THE 
MASS OF THE CALORIMETER IS 
NOT REASONABLE." 

193 PRiNT'YOU BETTER GO BACK 
AND CHECK IT BEFORE PRO- 
CEEDING." 

194 GOTO 140 



Additional checks can be 
made for any of the other 
measurements the instructor 
believes should fall within a 
definite range. ■ 

John Fetchko teaches 
physics at the Greater Johns- 
town Vocational-Technical 
School in Johnstown, PA. 



Program Listing 




X9tt lLS 


580 CM-CG/[MM*MT) 




110 PRINTP386,"THE PURPOSE OF THIS PROGRAM IS TO CALCULATE THE" 


590 PRINT-14. SPECIFIC BEAT OF METAL ( EXP. ) " !TAa[ 46) jCK; 


"CAL/GC* 


12B fRIKTg45B,"SPEriFIC HEAT OF HETALS FRCM YOUR LABORATORY DATA 


600 PRINT"15. SPECIFIC HEAT OF METAL ( ACC. ) ■;TAB 1 461 ; AV 


"CAL/GC- 


. ' 


610 LET PE-AflS( (CM-AV)"lfl0/AV) 




130 FOR I-l TO Iflll: HEXTI 'TIHE DELAY 


620 PRINT"16. PERCENT ERROR" ;TAB( 46) ; PE; "%" 




140 CLS 


630 PRINT"NOTE: YOUR CALCULATED VALUE FOR SPECIFIC HEAT 


WAS' 


15B PRINT'TYPE IN YOUR EXPEHIHEMTAL VALUES FOR THE FOLLOWING ITE 


640 PRINTTAB(71 ;CVi"CAL/GC" 




KS:" 


650 PRINT 




160 PRINT 


660 PRINT"TYPE 'ENTER' FOR AN EVALUATION"; 




178 INPUT'l. WHAT IS THE MASS OF YOUR METAL (IN GRAMSI'jKM 


670 LET AS-INXEYS 




180 IF MM<-e THEN 17B 


680 IF AS-"" THEN67B 




19B INPUT"2. WHAT IS YOUR CALORIMETER'S MASS (IN GRAMS)";HC 


690 CLS 




200 PRINT'S. WHAT IS YOUR TOTAL MASS FOR THE CALORIMETER AND" 


700 PRINT'EVALUATION:" 




210 INPUT" T!!R WATER (IN GRAMS) ";» 


710 PRINT 




220 IF M>-MC THEN 250 


720 LET ME-ABSI(CM-CV)"1BB/AV) 




230 PHINT-YOUR CALORIMETER'S MASS IS GREATER THAN THE TOTAL MASS 


730 IF HE<1B THEN 780 




! " 


740 PRINT-YOUR CALCULATIONS ARE MUCH DIFFERENT THAN MINE 


■ 


240 GOTO190 


750 GOSUB1B70 




250 INPUT-4. WHAT IS THE SPECIFIC HEAT OF YOUR CALORIMETER" ; SC 


760 PRINT'YOU BETTER CHECK YOUR MATH!" 




260 PRINT'S. WHAT IS THE INITIAL TEMPERATURE OF YOUR METAL" 


7 70 G0TOB6B 




270 INPUT" (IN DEG. CELSIUS) "(TM 


780 IF ME<5 THEN B3e 




260 PRINT'6. WHAT IS THE INITIAL TEMPERATURE OF THE CALORIMETER" 


790 PRINT'YOUR ANSWERS ARE FAIRLY CLOSE TO MINE" 
880 GOSUB107O 




298 INPUT" AND WATER |1N DEG. CEI^IUS1*(TW 


810 PRINT-BE MORE CAREFUL IN ROUNDING OFF YOUR NUMBERSI" 




300 PRINT"?. WHAT IS THE FINAL TEMPERATURE OF METAL, WATER, AND" 


82 8 GOTO 860 

830 PRINT'YOUR ANSWERS ARE VERY CLOSE TO MINE." 




310 INPUT" CALORIMETER (IN DEG. CELSIUS) "(TF 


840 GOSUB1070 




320 IF TF<-TW THEN 350 


850 PRINT'YOUR MATH MUST BE CORRECT!" 




330 IF TF>-™ THEN 3B0 


860 PRINT 




340 GOTO 400 


B70 IF PE<20 THEN 920 




350 PRINT"FINAL TEMPERATURE OF WATER IS ALWAYS GREATER THAN THE" 


880 PRINT'YOUB EXPERIMENTAL ERROR IS VERY HIGH!" 
890 GOSUB1110 




369 PRINT"INITIAL TEMPERATUHEi " 


900 PRINT"YOU HAY HAVE MADE SOME MISTAKES IN YOUR MEASUREMENTS." | 


370 GOTO280 


9ie GOTO1000 




380 PRINT"FINAl, TEMPERATURE IS ALWAYS LESS THAN THE METAL'S TQIP 


920 IP PE<5 THE1I978 




.11" 


930 PRINT"YOUR EXPERIMENTAL ERROR IS NOT TOO BAD." 




3 90 GOTO26 


940 GOSUB1110 




400 PRINT"WHAT IS YOUR CALCULATED VALUE FOR THE SPECIFIC HEAT OF 


950 PHINT"HOWEVER, YOU CAN BE MORE PRECISE IN YOUR MEASUREMENTS. 1 


410 INPUT"YOUR METAL |FROM STEP 14 IN YOUR LAB)";CV 


960 GOTOIB0B 




420 INPUT"ACCEPTED VALUE FOR SPECIFIC HEAT OF HETAL"(AV 


970 PRINT'YOUH EXPERIMENTAL ERROR IS VERY LOW!" 




43B CLS 


98B GOSUBlllB 




440 LET MW-H-HC 


99B PRINT'YOU MUST BE A GOOD SCIENTIST!!" 




45B PRINT'CALCULATIONS: " 


IBBa PRINT 




460 PRINT" 8. MAES OF WATER" !TAB( 46) ! MKj "GRAMS" 


1810 PRINT-PRESS 'ENTER' TO START ANOTHER TRIAL"; 




470 TC=TF-TW 


1820 LET AS-INKEYS 




480 PRINT" 9. TEMPERATURE CHANGE OF CALORIMETER AND" 


1030 IF AS*"" THEN 102B 




49B PRINT" WATER";TAB(46) |TCj"CELSIUS DEG." 


1040 GOTO140 




500 CW-MW*TC 


105B END 




510 PRINT"10. CALORIES GAINED BY THE WATER" ; TAB( 46) ;CW; "CALORIES 


1060 REM CALCULATE »-ERROH AND EXPERIMENTAL ERROR 




* 


1078 PRINT"1Y0UE RESULTS DIFFER FROU MINE BY "; 




520 CC-MC*SC*TC 


1080 IF ME<2 THEN PRINT "ONLY "; 




530 PRINT"11. CALORIES GAINED BY CALORIMETER" ;TftB| 46) jCC; "CALORI 


1090 PRINT ME;"%1 " 




ES" 


110B RETURN 




540 CG-CW+CC 


1118 PRINT"1Y0UR EXPERIMENTAL ERROR WAS "j 




650 PHINT"12. TOTAL CALORIES GAINED" jTAB( 46] ;CG; "CALORIES" 


1128 IF PE<5 THEN PRINT 'ONLY -| 




560 MT-TM-TF 


1138 PRINT PE;'I) " 




570 PRINT"13. TEMPERATURE CHANGE OF METAL" ;TAB( 46) iMT; "CALORIES" 


1140 RETURN 





Features of the FATIGUE FIGHTER : 







s 




a 



REOUCCa OPERATOR FATMHIE THEREBY AIXOWINO MORE EFFI- 
CIENT USE OF THE COMPUTER. 

INSTUU EAMLY WITH PRESSURE SENSTTIVE ADHESIVE. MO 
SCREWS, CUPS, OR DRILUMG TO OAMAOE MONTTOR. 
DESIQNEO TO MATCH TR»«0« BTYUMO FROM THE BLACK AMD 
SILVER BORDER TO THE LETTERIMO TYPE FACE. 
MADE OF TOUGH 1/S IMCH THICK ACRYLIC SHEET FOR DURABH.- 
ITY, EASE OF CLfAMIMG, AMD A QUALITY APPEARAMCE. 
FITS BOTH THE MODEL I AMD THE MODEL H. 
DOES MOT VOID THE COMPUTER WARRANTY. 



TO ORDER 



TRS-BO tS A TRADEMARK OF TAMOV 



S«id Nam* < AddnH T^Md <■ Ctoarly Prtnlvd with 
CtiwHi or M«n*y Ordar for StZ.«S EKh. Induding Shlp- 
ftng. COD'i ar* 12.50 Addttbona! Pi Ord« ft ar* Ac- 
oaptMl by M«H or »T Calling «>«-17>-24M t-S M-F. 
Florida Raaktonto Add 4% Salaa Tax 

SOUTHERN INNOVATIVE 0E8IGN 
1520 NORTHEAST 12TH STREET 
GAINESVILLE, FLORIDA 32601 ^373 



1nt« (BT-oduol r*«uli«4 tr-tm Ut» 

roltoMir*** r«voholi>ttto>l BUirttva 
*»>Mf «r*«n to b* Most pIvAcwit 
for •KttfrMtod wi*wlrt9. Cw.Mnal- 
livitw p*»k% In th» ar»«n band 
of th* Mbtfctn*. Conl«-»*t is an- 
•->«nc*d bv rvducirvg th# aabiant 
ll«hi #«lltn« on a CRT. ThM* 
U w d facior* otmbtnm t« fight 
ot>«r«tor f*tl9U». Tinallvi u* 
wani«<l mor* than Jlm* fwiction. 



■t«tch*d TBS-ee stvlins. Piotwr«« 



i^rotfuct M* ar* pr-oud or. 



yi 



MMMMMWiiMiaHk ) 



''See List ol A(fvortisers on page 418 
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UTILITY 



Don't be tied up by that slow printer. 



The Spooler 



Roger B. Gault 

9603 Mountain Quail Road 

Austin, TX 78758 



I love my Line Printer IV, but 22 
lines per minute is slow, and 
patience can be costly. So, 
armed witti various Radio Shack 
manuals and James Farvour's 
Microsoft Basic Decoded & 
Other Mysteries, I set out to 
write a print spooler. 

A print spooler Is a program 
which sends information to the 
printer from a storage area 
while the computer is doing 
something else, like continuing 
with the program which requires 
the printing. I have seen spool- 
ers which print from a disk file, 
but that ties up the disks and i 
want disk access during print- 
ing. Consequently, I decided to 
write an "in-memory" spooler. 

The Radio Shack Expansion 
Interface provides the mechan- 
ism in the form of the 25 
microsecond interrupt for ac- 
complishing this. Every 25 
microseconds, the Expansion 
Interface sends an interrupt 
signal to the Central Processing 
Unit (CPU). This causes the CPU 
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to execute a Restart 38H in- 
struction which Is just like a 
subroutine call to ROM address 
38H. This interrupt is used by 
the DOS to update the real-time 
clock. PEEKing around in the 
ROM {or in Farvour's book) will 
show a Jump 4012H stored in 
38H. This is a RAM address 
which contains yet another 
jump to the interrupt handling 
routine. 

At first glance, this seems a 
likely place to break into the in- 
terrupt chain and print a char- 
acter. However, the disk drive 
controller also creates inter- 
rupts, so it seems wiser to 
follow the interrupt handling 
routine until It gets to the clock 
update subroutine and break in 
there. 

The clock update subroutine 
address is stored in RAM at 
405BH. By replacing that 
stored address with the ad- 
dress of the spooler output 
subroutineand then jumping to 
the clock output subroutine 
after printing a character, the 
spooler can be inserted into the 
interrupt handler. This will give 
a character to the printer every 
25 microseconds, or 40 times a 
second. That's pretty slow, but 
at least the system can get on 
with its business while that is 
going on. In the case of the Line 
Printer IV, the print speed is 
atjout two-thirds what it is 
normally. 

Program Description 

The spooler is made up of 



four parts. The first section, 
lines 260-310, establishes the 
buffer area and sets the input 
and output pointers. The buffer 
is IK long, assembled. This 
length can be changed by 
changing the origin value in line 
260. For example, an origin 
value of F782H would give a 2K 
buffer. INPTR is the input 
pointer and points to the last 
character placed in the buffer. 
OUTPTR is the output pointer 
and points to the last character 
sent to the print driver routine. 
Both pointers are initialized to 
the top of the buffer. 

Section two, lines 370-500, is 
run when the spooler is loaded: 
it initializes the system. First it 
disables the interrupts so an 
interrupt can't occur while the 
interrupt handling chain is be- 
ing changed. It then changes 
the top of memory pointer 
stored at 4049H to a number 
which is one less than the ad- 
dress of the bottom of the buf- 
fer (BTMBUF). Then it gets the 
address of the print driver 
routine which is stored at 
4026H and stores it in line 860 
as the Call address. 

The address of the section 
which receives a character for 
storage in the buffer (RECCHR) 
is then placed in 4026H; instead 
of going to the printer through 
the print driver routine, a char- 
acter to be printed is stored in 
the buffer. The clock update 
routine address stored in 
405BH is then placed in Iine910 
to tell the spooler where to 



jump after a character is 
printed. The clock update rou- 
tine address is replaced at 
405BH with the address of the 
section which sends a char- 
acter from the buffer to the 
print driver (OUTCHR). The in- 
terrupts are enabled and con- 
trol returned to the DOS. 

Section three, lines 550-910, 
is the section which sends a 
character from the buffer to the 
printer. When an interrupt oc- 
curs, the interrupt handling 
routine decides what kind of in- 
terrupt it is and, if it is the 25 
microsecond clock interrupt, 
executes a jump to the address 
stored in 405BH. Since that ad- 
dress has been replaced with 
the address of this section by 
the initialization part of the 
spooler, control is passed to 
line 550. 

The registers are saved and a 
comparison made between the 
two buffer pointers, INPTR and 
OUTPTR. If they are equal, the 
buffer does not contain char- 
acters to be printed and the pro- 
gram jumps to RESTOR in line 
870 and from there continues 
back to the clock routine. If 
there is text in the buffer, a 
check is made to see if the 
printer is ready for a character. 
If it is not, the program jumps to 
RESTOR. 

I included this test because 
the Line Printer IV will not ac- 
cept characters while it is ex- 
ecuting a carriage return. Since 
this is half the time while the 
printer is printing, and the 



CHRISTMAS SPECIALS 



Books 



To help you understand your micro, LTD Is offering these 
popular SELF TEACHING GUIDES. \)(/fre so sure you'll like 
these books, we re offering a 15 day money back 
guaranteel Shipping Information — 2 lbs. each. 

TRS 80 BASIC "OUTSTANDING. " 
(Computronics Monthly News.) Packed vwth games, 
graphics, artd practical applications, this exciting new book 
helps you get maximum enjoyment and use from your 
TRS-80 S8.95 

MORE TRS-80 BASIC ,. 

this interactive guide explains all TRS-80 Level II BASIC 
statements, commands and features not covered in TRS-80 
BASIC. t)u get several different metfiods to display 
graphics, including "super graphics " and files harxlling 
techniques. $8 95 

8080/Z80 ASSEMBLY LANGUAGE. , 
For both intermediate and advanced programmers, learn 
assembly language by developing a powerful system 
monitor in a step-by-step, top-down approach. Over 100 
pages of programs are included, ^bu learn branching, 
rotation, and shifting, one's and two's complement 
arithmetic, stack operations and use of the CP/M 
operating system for all I/O. S9.95 

DATA FIL£ PROGRAMMING IN BASIC... 
Data files are the key to the successful use of micro- 
computers. It uses the most popular variants of BASIC. 
TRS-80 BASIC, and Microsoft BASIC-80. S9,95 

FLOWCHARTING... 

A Tool for Understanding Computer Logic S8.95 

USING CP/M... 

The first complete, detailed, self-paced introduction to 
CP/M -Control Program/Microcomputers, the most 
widely used microcomputer operating system. Packed with 
examples and experience. S8.95 

BUY I BOOK — list minus 5%/2 BOOKS— minus 10% 
3 OR MORE — minus 15% 



Software. 

MASTERGUESS - See July ad 1-lb 
REFLEC-TRS —See Oct. ad 1-Ib 
ELVES CUBE —See Nov. ad t-ib 
S6.95ea/3forS15.00 

Billist —See July ad 1-lb 

SII.95cassette/S2I,95disc 

Hardware 



Remove harmful oxides from your disc drive heads: 
Size Price Weight 

SPECIAL— 3 N HEAD Cleaner Kit 

5'/*' S22.95 

8' S23.95 

FUP SORT— holds 50-60 Diskettes 



5'/4- 
8" 
PLASTIC LIBRARY CASE for: 
5" 



S21.95 
S25.95 



1-lb 
1-lb 

1-lb 
l-tt) 

1-lb 
IHb 



Mb 



S 2 99 
8" 5 4.99 

VERBATIM MD 525-01, 10. 16 SS/dd 1-lb 

525,95 for lO/add S2 50 per box for library case 

VERBATIM FD 34-8000 S39.95/10 

with hub ring and haul tX)X S43. 95/10 I-lb 

DYSAN, WABASH, BASF, SCOTCH 3M, 
MEMOREX AVAILABLE —CAa 



OKIDATA PRINTERS 

We believe OKIDATA to be the t>est value for the money. 
The time proven design guarantees 2 MILLION high 
density characters from a DISPOSABLE PRINT HEADI The 
82A and 83A are 120 CPS FAST, have upper and lower case 
(with decenders), graphics and logic seeking. WE SELL 
MORE OKIDATA THAN ANY OTHER PRINTERI 
microline80-S377 *[reg. 389) 
82A-532 * (reg. 549) 
83A-804 - [reg. 829) 
•price includes 3% cash discount 
.MEMORY CHIPS — Motorola ceramic 16K 200AS 
SI4.95/8 THIS MONTH ONLY 1-lb 



SHIPPING 

• domestic — S2.50(UPS ground) 

• over S50 — ship free (UPS ground) 
- COD— addS2.00 

• P.O. Boxes — include phone for UPS 

• allow 1 to 2 weeks for checks to clear 

DISCOUNT 3% Cash Discount from total (including shipping 
and handling) 
Cash. Check, M,0, or COD 



P.O. Box 1567 Wheatridge. CO 80034 

CALL COLLECT (8AM-5PM MST] 303-431-4154 




ATA INC. 



■See Listoi Advenisefs on page 418 
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Announcing the quick and easy way 
to write custom business applications 
. in hours instead of weeks. 



At last, you can get a microcompuler 
business application development system 
ttiat IS designed for one purpose 
only . . . last production of bug-free 
professional-looking custom business 
applications 

"Thinks" the Way Business Thinks 

Quic-N-Easi is the revolutionary screen- 
tormat-onented application development 
system that thinks in terms of transactions, 
records and fields. Tlie same way business 
thinks. Quic-N-Easi expects an application 
to include custom formatted key entry It 
lets you set up the cliaracter, field, and 
record validity checks business wants by 
merely filling in the blanks. It automatically 
signals in real time when errors occur 
and explains' what is wrong in plain 
English messages you select (or each 
custom application. 

Much Faster than BASIC 

Quic-N-Easi programming is much faster 
than BASIC because the standard busi- 
ness applications (key input, file handling, 
and output reporting) are handled via 
pre-programmed parameter driven sub- 
routines. To produce finished professional 
looking custom business programs, you 
merely: 

r^] Draw the business formats directly 
^— ' on tlie CRT in minutes, 

^ Fill in the blanks for field attributes, 
validations, tables, etc, 

7_] Invoke the Quic-N-Easi tnierpreter 

to check fields against tables, check 
limits, access data files, and perform 
business calculations, etc. 
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FT] Optionally define file and output 
■ formats right on the screen 

Pays for Itself in a Week 

By eliminating the coding drudgery of 
writing screen, 'ield. 'ile, and formal 
programs in BASIC, programmers are 
free to concentrate on the unique business 
aspects of each custom application. No 
professional programmer can afford to 
develop one more business application 
without Quic-N-Easi The savings are so 
significant with Quic-N-Easi. it can actually 
pay for itself in only one week. 

Gives You IMuch More than a 
Screen Builder . . . the Only 
Complete Business Development 
System for Microcomputers 

Quic-N-Easi handles the entire application 
development job from key entry to final 
output. You get everything you need, 
including detailed documentation to begin 
writing professional programs the first 
day You get . . . 

,_ A singularly capable Quic-N-Easi 

screen builder 

,.' A comprehensive parameter driven 
' Qutc-N-Easi content editor 

r.I; A full Quic-N-Easi interpreter 
'- — ' language 

r^j A complete Quic-N-Easi file 
'-- ' management system with Index 
Sequential, Random, and 
Sequential File Access Method 

r^\ A complete Quic-N-Easi print format 
■- — ' handler 

r^ A detailed Quic-N-Easi reference 
' — ' manual 



I ,. A Quic-N-Easi self-teaching guide 

r«.' A Ouic-N-Easi quick reference card 
r,_' An interface to other program tiles 

ORDER NOW— Don't Waste 
One More Day Coding BASIC 

Your time is too valuable to waste hours 
on end writing BASIC code. The first 
week you use Quic-N-Easi, your finished 
business programs will look better, run 
better, and return more dollars to you. 
Don t delay Order Quick-N-Easi today- 
Phone . . .215 968-0689 



nuic-n-Easi 

STANDARD MICROSYSTEMS INC. -^u 

136 GRANfTE HILL COURT, LAMGHORNE, PA 19047 



Pricing Information 

■ Complete Quic-N-Easi system $395 

■ Manual only $60 

■ Visa and Mastercard accepted 

■ Dealer Inquiries Invited 

Minimum System Requirements 

48K • CP/M • Z80 • Floppy Disc 

Other Disk Formats • 8" Single Density 
Vector Graphics • Micropolis Model 2 

Customized Versions • TRS80 Mod II. 
TRS80 Mod III, APPLE, OSBORNE. 
INTERTEC, VECTOR .ZENITH 

Apple. CP/W. Interlec. Wicropolis, and TRS80 are 
Irademarks of Apple Computer. Digital Research, Inlertec 
Data Systems, Mictopolis Corp , and Tandy Corp. 



TM 



printer prints a line about every 
three seconds, the system was 
locked up for 1 Yi seconds every 
three seconds. Keyboard input 
is nearly impossible under those 
circumstances, it you have a dif- 
ferent type of printer you might 
try deleting this test (lines 730- 
760). OUTPTR is moved to the 
next character position if these 
tests lead to a character being 
printed. A check is made to see 



if that is the bottom of the buf- 
fer, and if it is, the OUTPTR is 
set to the top of the buffer 
where the next character is 
stored. The OUTPTR is then 
stored for use next time and the 
character which it points to is 
placed in the C register where 
the print driver routine expects 
to find it. A subroutine Call is 
executed to the print driver 
which prints the character and 
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ROGER B. GAULT 
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AUSTIN, TEXAS 
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HI SI 






; 




■il«« 


THIS 


PROGRAM INTERCEPTS THE OLTPUT TO THE LINE 1 




IIITI 


PBIMTEF AHD STORES IT 


IN A BLTFER. UP<»I EACH 25HS 




• •JSI 


IHTEBRUPT IF THERE WE CHARACTERS TQ BE PRIHTED AND 1 




• «19l 


THE PRItlTEH IS READY, 


THE PROGRAM SENDS ONE CHARACTER ■ 




• «2II 


FROH 


THE BUFFKR TO THE LINE PRINTER DRIVER. AFTER 1 1 




••211 


THE CHARACTER IS PHIHTED, CONTROL IS RETURNED TO THE | j 




• 1221 


IITTEBllUPT HAMDLINC HOUTIHE. . 1 




••231 
••Iti 
• ■2Jf 






• 








...... 


rB«; 


• •26« 




ORG BFB82H 


iTHIS IE THE BOTTOn OF THE BUFFER 


FBS? 


• •278 


BTHBL-F 


EQL S 


iDEFISE BOTTOH OF BUFFER 


FPB2 


• •28* 




ORG ■Fr62H 


lORIGIN OF PROGRAN 


FFai 


••I9B TOFBUF 


EOi; S-1 


IDEFINE TOP OF BL'FFER 


FF82 SIFF 


• •3SI 


NPTR 


DEFW TOPBUF 


iSET BUFFER LOAD POINTER LOC . 


rFB« BIFF 


• Bin OUTPTR 
••}2( - 


DEFH TOPBUF 


iSET OUTPUT CHAR. POINTER LOC. 




••33* 




THIS SECTION IE 


EXECUTED ON PROGRAN LOAD. IT 




••34t 




INSTALLS THE SPOOLER IN THE INTERRUPT HANDLING 1 




t93i§ 




CHAIN AND SETS MENORY SUE. 1 




»*yft 








FFB$ F3 


■ •)7I 


NIT 


DI 


■DISABLE INTERRUPTS FOR A HOHENT 


rFS7 JJSiFB 


ttist 




LD HL.BTNBUF 


;SET KEK SHE TO PROTECT SPOOLER 


FFSA !B 


iB39a 




DEC KL 




FFfiB 22<I4I 


BB4BB 




LD (4849H1 , HL 




FFSB lt,26it 


IB41I 




LD BL.|4B2eH) 


iCET PRINT DRIVER ADOR. 


FFIl JID3FF 


88421 




LD (PRINTt6l ,HL 


;STORE IT FOR CHAR. OUTPUT 


FF»< 21DCrF 


88*31 




LD HL.RECCHB 


iPUT BUFFER LOAD ROUTINE ADDRESS 


FK»7 iJI6<l 


884 4B 




LD (482tH) ,HL 


i IN LINE PRINTER DCB 


FF^A 2AbBtB 


184^8 




LD BL, ( 4a5B>l) 


.GET CLOOt ROUTINE ADDRESS 


FF9D 22DIITF 


88468 




LD (RESTOfl-!) ,HL;STORE IT FOR RETURN ERCd OUTPUT 1 


FFfit ilJiBFF 


88478 




LD BL,OCTCHR 


(INSERT PRINT ROUTINE INTO 


FFII3 liSBH 


■ ■4SB 




LD [4a5BHJ ,HL 


1 INTERRUPT HANDLING CHAIN 


FFA6 FE 


BB498 




El 


iRESTORE INTERRUPTS 


FFA? e9 


8)^88 




RET 


f RETURN TO DOS 




Msai 1 


THIS SECTION GETS A CHARACTER FROM 1 




■■91I 1 


THE BUFFER ANB PRIHTE IT 1 




••54* 








FFAB F^ 


i855» OOTCHB 


PUSH AF 


;SAVE REGISTERS 


rFA9 D^ 


■ 8^61 




PUSH DE 




FFAA CS 


11571 




PUSH BC 




FFAB E'j 


• 1588 




PUSH HL 




FFAC 2A82FF 


■ B5»« 




LD HL.dNPTR) 


jCHECH TO SEE IF ANY TEXT 


FFAF EDSBStFF IBeiB 




LD DE, (OUTPTRI 


lis IN BUFFER 


FFB3 E7 


mil 




OR A 


; CLEAR CARRY FLAG 


FFB4 EDb2 


B8628 




SBC HI. .DE 


;(INPTR)-(0UTPTH)7 


FFB6 I81D 


88638 
886 48 




JR IiBESTOR 


.SKIP PRINT IF EMPTY 




81658 


THE FOLLOWING 4 LINKS 


OF CODE ARE FOR A LINE PRINTER 




>l66e 


LISING THE NORMAL PARALLEL PORT. IF lOU HAVE A PRINTER 




• 8678 


USING THE RS-:33 IMTERFACf, REPLACE THEH WITH: 




•Besi 


98738 IN A,(EA) ;GET i-'ART STATUS 




88691 


98748 BIT 6, A ;TEST BIT 6 FOP HIGH 




IBTBB 


99758 JR Z.RESTDB ;SKIP PRINT IF HOX READY 




EB1IB 


BB769 NOT LSED 






8B72B 








FFBe 3AEB37 


887J8 




Ul A, 1 37E8H) 


;GET PRINTER STATUS 


>FBE E6FB 


08748 




AND 8FBH 


;HASX IT 


FfBu fiye 


88759 




CP 38H 


;CHEC( IF PRINTER IS READY 


FFEI 2BI4 


887(0 




JR NZ .REETOR 


;EFIP PRINT IF HOT 


F FC I IE 


89778 




DEC DE 


i ADJUST POINTER 


FFC; JlgJFR 


8B7Be 




LD HL.flinBUF 


iCHECK BOTTCtI OF BUFFER 


FfC5 B7 


Be; 9B 




OR A 


;CLEAR CARRY FLAG 


Free EDi; 


98698 




SBC HL.DE 


i (OUTPTR) -BTHBUF? 


FFC9 2193 


BBB18 




JR NI, PRINT 


;G0 TO PRINT IF NOT AT BOTTCd 


FFCA IIBIFF 


99928 




LD DE,TOPB[.'F 


lELSE POSITION TO TOP 


FFCD t6 


BBB3B 


BINT 


El Dl.HL 




FFCE 32B1FF 


889 48 




LD (OUTPTR) ,HL 


.-STORE POINTER 


FFDl <I. 


88959 




LD C. ( BL) 


IGET CHARACTER TO BE PRINTED 


FFDi CDoaaB 


88868 




CALL BBBBH 


jWILL CONTAIN PRINT DRIVER ADDR. 


FFD5 El 


BBBI8 


EETOR 


POP HL 


.RESTORE REGISTERS 


fTDt tl 


B88B8 




VO? BC 


.FOR RETURN TO INTERRUPT ROUTINE 


FFDl -Jl 


Bea49 




POP DE 




FFUe Fi 


88998 




POP AF 




FFi>« ciieee 


ami 
mii 

•■Ml 




JP 9888H 


.WILL CONTAIN CLOCK HC<!TJNE ADDR. 






JTHIS SECTION PUTS THE NEXT CHARACTER 




■■>4I 




jTHAT THE CALLING ROUTINE HAWT:^ 




•••s« 




! PRINTED IN THE 


BUFFER 




• •968 








FFEC Fi 


9(979 


ECCHR 


PUSH AF 


.SAVE RIGISTERS 


FFDD Di 


99989 




PUSH DE 




FFDt E5 


B«9»a 




PUSH Ml. 




FFDF ED5B82FF 


• !••• 




LD DE.UNPTRl 


;CET POINTER 


FFE3 IB 


8iei« 




DEC DE 


iPiOVE IT TO NEXT POSITION 


FFEI 2ie2FB 


91828 




LO HL,B'mBUF 


;SEE IF BOTTCB OF BUFFER 


FFF7 B7 


91838 




OR A 


.CLEAR CARRY FLAG 


FFtg tD52 


B1B48 




SBC HL,DE 


.(INPTR)-BmBUF7 


FFEA IBB} 


eiBSB 




JR NZ.PULOOP 


i IF HOT PROCEED 


FFEC IIBIFF 


81860 




LD DE, TOPBUF 


.ELSE SET POINTER AT TOP 


FFtr 2A84FF 


81876 F 


CLOOP 


LD HL, (OUTPTR) 


.CHECR It BUFFER IS FULL 


FFFi B7 


BIBBB 




□ R A 


.CLEAR CARRY FLAG 


FFFJ ED52 


B1B9B 




SBC HL.DE 


; (INPTR)-(0UTPTR17 


FFFi 2BIR 


911BB 




JR I,rULOOP 


;AND LOOP IF II IS 


FFF7 EB 


91118 




EX DE.HL 




FFFB 71 


91128 




LD (MI,),C 


jPUT CHARACTER IN BUFFER 


iFF9 22B2FF 


91138 




LD UNPTRI ,HL 


.UPDATE (INPTR) 


fFFC El 


Illt« 




POP HL 


.RESTORE REGISTERS 


FFFD Dl 


• 1158 




•OP DE 




FFFf Fl 


• !!«• 




POP HP 




FFFF C9 


BI17B 




•rr 


.RETURN TO CALLlltG ROUTINE 


FFee 


91169 




END INIT 


.START AT INIT 
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returns. The registers are 
restored to their original condi- 
tion and a Jump executed to 
the clock update routine. 

Section four, lines 970-1170, 
stores a character to be printed 
in the buffer. First it saves the 
registers and then INPTR is 
moved to the next character 
position. If that is the bottom of 
the buffer, INPTR is set to the 
top. Then a check is made to 
see if the buffer is full. 

If the buffer is full, INPTR will 
be equal to OUTPTR. If it is full, 
the program loops until an in- 
terrupt comes along and 
causes a character to be 
printed. It can then store the 
next character. If the spooler 
slows down your printer, you 
would not want to use it to print 
out a long listing or long file. 
Once the buffer is full the 
system acts like a normal 
system with a slower printer. If 
you have the room, you can 
always assemble it with a huge 
buffer; in any case, once the 
character is stored, the new 
value for INPTR is stored and 
the registers restored. Control 



is then passed back to the call- 
ing program. 

Notes 

I have one inexplicable prob- 
lem: When running one of my 
programs which accesses long 
disk files, the system kept get- 
ting the same physical record 
when the buffer filled up even 
though the physical record vari- 
able was changing properly. 
Moving the "GET 1,PR" state- 
ment to another line in the pro- 
gram solved the problem! If 
anyone has an explanation for 
this, please contact me. 

If you have a faster printer, it 
might be possible to rewrite the 
output section so two or more 
passes are made through lines 
550-860. That would output sev- 
eral characters per interrupt. 

If you assemble the program 
at a different memory location, 
be sure to change both origin 
value statements (lines 260 and 
280). 

I have used this spooler with 
both TRSDOS 2.3 and N EWDOS 

80 with equal success. ■ 



RELIABLE, SIMPLE MEMORY 
EXPANSION YOU CAN AFFORD! 




Shown above is rhe IM-2 48K INTERNAL MEMORY'"jnd a phillips ■^rey.- 
driver — cvcryrhing you need to ADD up to 32K RAM lo your TRS-80' Model I 
keyboard unii (for .i toi.il of 48K RAM], No solder ing or trace curling — just open 
Ilio case, remove your RAM thipi, plug the INTERNAL MEMORY (IM)into the 
RAM sockets, plug your chips b.ick in, connect 4 soldcrless clips [they i\ork!].ind 
close thec.ise [ Detailed, illustrated step-by-step instructions show you how lodo 
this]. You now have a 48K keyboard unit — and you didn't have to buy an 
exp,insion inierfacc! If you don't need 48K, a 32K version is available. 

Time and experience have shown that the TRS-80" expansion buss cannot 
reliably drive memory systems. Because the IM does not use the buss, it may be 
used with ANY exp,insion device for reliable memory operanor!. Some of our 
customers use an IM INSTEAD OF the RAM in their exp,irisron interface to 
eliminate El memory problems! 

Because the IMdrawsmostof its power from the 12 volt supply, power supply 
loading is not a problem Some additional heat is generated, but the TRS-80* r uns 
so hot anyway you probably wcjn't notice the increasr! 

The INTERNAL MEMORY is completely tested and assembled using only 
the finest maierials. You have IS days to return it for a refund if you don't like it, 
and it is guaranteed for I full year Installation is available tor a small fee. 

Send a S.A.S.E. for more information. 



PftlCPti IM-IB[32K) 

KKH^tb— |M-2(48K) 



*eS.50 (W/16K RAM) 
»140.00 (W/32K RAM) 

Prices include UPS shipping in U.S. 
Uwh residents 3dd 5% tax, FOREIGN ORDERS add 15%. 



6246 West 3705 Soutti Sail Lake City, UT 84120 (801) 967-2324 



•^ Soe List ol Advertisers on page 418 
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GAME 



LOAD 80 



After dinner on long winter evenings, get pegged. 



Dessert Solitaire 



Program Listing 



>••<*****• 



THE GOLF TEE PROBLEM - BY RICHARD B. DUNCAN 
LISTING IN "MATHEMATICS TEACHER" MAGAZINE 

JANUARY 1979 



ADAPTED FOR THE TRS-BB 
VI: FOR PRINTER 



MODIFIED BY RAY HATKE 
DECEHBER i, 19BB ** 



5 REM * 

18 REM 
15 REM 
21 REM 
25 REM 
30 REM 
35 REM 
41 REM 

45 REM •••••.•••••••••••••••••••.•••••«.•••• *.»...*....... 

5B CLS:PRINTTAB(141 "PEG SOLITAIRE ON A TRIANGULAR BOAHD'iPRINT 

bb PRINT'THIS PROGRAM WAS WRITTEN TO HAVE THE COMPUTER SEEK A 

LL SOLU- 

«e PRINT'TIONS OF THE PEG JUMP GAME KNOWN BY MANY DIFFERENT NAME 

S.'iPRINT 

65 PRIWT'IN ITS MOST COMHOH FORM, THE GAME IS PLAYED OH A TR 

I ANGULAR 

78 PRINT'BOARD IN WHICH 15 HOLES ARE DRILLED. AT TTiE DEGINKIN 

G OF THE 

75 PRINT'GAME, PEGS ARE PLACED IN EACH HOLE, AND THE PLAYER HAS 

THE OP- 
8* PmWT'TIOH OF REMOVING ANY ONE PEG, THE PLAY CONSISTS OF J 

UMPING A 
85 PRI!JT"PEG OVER ANOTHER ADJACENT PEG AND INTO A VACANT HOLE. 

THE PEG 
9B PRINT'WHICH IS JUMPED OVER IS THEN REMOVED FROM THE BOARD, J 
UMPS MAY 

95 PRINT'BE MADE HORIZONTALLY OR DIAGONALLY, EITHER FORWARDS 
OR BACK- 

lee PRINT"HflRDS.":PRINT:PRINT"PRESS ANY KEY TO CONTINUE. 

1B5 ZZS=INKEYS: I F7ZS^" 'THENIBSELSECLS : PRINTTABI 14 | "PEG SOLITAIRE 
ON A TRIANGULAR BOARD":PRINT 

IIB PRINT'THE OBJECT OF THE GAME IS TO HAVE ONLY ONE PEG LEF 

T ON THE 

115 PRINT'BOARD AT THE END. 

12B PRINT:PHINT"THE HOLES IN THE BOARD ARE LAID CXiT AND NUMBER 

ED AS WILL BE 

125 PRINT"SHOWN, SO THAT THE VARIOUS SOLUTIONS CAN BE IDENTIFIED 

.":PRINT:PRINT"IN THE FORM THE PROGRAM WAS ORIGINALLY WRITTEN, 
IT TOOK THE 

130 PRINT "COMPUTER ABOUT TWO HOURS TO FIND THE FIRST SOLUTION. 

TO SPEED 

135 PRINT"UP RESPONSE TIME, THE PROGRAM WAS SLIGHTLY REVISED. 
IT WILL 

140 PBINT"GENERATE THOUSANDS OP SOLUTIONS, BUT NOT ALL OF THE 
430,000 

145 PRINT'DIFFERENT ONES SAID TO BE POSSIBLE. CONSIDERING T 

HAT MANY 

158 PRINT"PEOPLE ARE HARD PRESSED TO FIND EVEN ONE SOLUTION, 
THIS IS 

155 PRINT-QUITE AN ACCOMPLISHMENT FOR THE COMPUTER. 

16B PR1KTTABI15) "PRESS ANY KEY TO CONTINUE.'; 

16 5 ZZS-INKEYS:IFZZS'""THEN165ELSECLS 

178 PRINT :PKINTTAfl(321 "1":PRINTS160,CHRS(131| 

175 PRINTTAB1271 ■2';TABI371 "3" :PRINTp2B3,CHR 5(1311 :PRINT§293,CHR 

S(131) 

18B PRINTTABI22) "4";TAB(32| "5"iTABl42) "6 " :PRlNTg4B5 ,CHRS ( 131 ) i PR 

lNTe416,CHRS(13I| :PRlNTe426,CHRS 11311 

185 PRINTTAB(17) "7", -TAB 127 1 'B",-TAB(37l "9", -TAB (46 1 ■lB'tPRINT3529, 

CHRS(1311 :PRINTS53 9,CHRS(1311 :PRINTe549,CHRSU311 r FRI!JT§559 ,CHRS 

(131) 

19B PRINTTAB(12> "ll"lTAB|211 •12";TAB(311 ■13"; TAB (411 "14", TAB (511 

■15";PRINTS652,CHRS(1311 : PRINTe662 ,CHRS ( 131) ;PRINTS672,CHRS(1311 

;PRINTe6B2,CHRS(131)iPRINTP692,CHRS(131) 

195 INPUT'ENTER NUMBER OF HOLE TO BE LEFT VACANT AT START"jO 

Program continues 



Ray Ratke 

3822 N. 75th Street 

Milwaukee, Wl 53216 



Aboard game, generally 
called Solitaire in literature 
relating to the game, has been 
popular for 200 years in many 
countries around the world. 

Holes are drilled In a board 
and pegs are inserted into each 
hole. At the beginning of the 
game the player removes one 
peg from a hole of his choice. 
Then, by a succession of jumps 
as in checkers, he tries to re- 
duce the number of pegs so 
that, at the end of the game, 
only one remains on the board. 
The holes are arranged in a geo- 
metric pattern to form a square, 
rectangle or other shape. This 
article deals with the triangular 
form. 

Jumps can be made when 
two pegs in adjacent rows are 
accompanied by a vacant hole 
in the next row, all three being in 
a straight line. The end peg 
jumps over the next peg into the 
vacant hole, and the peg which 
was jumped over is removed 
from the board. Jumps can be 
made horizontally or diagonally, 
either forward or backward. 

in an article in The Mathe- 
matics Teacher magazine, Janu- 
ary 1979, Richard B. Duncan pre- 



sented a Basic program to find 
all solutions for each of the fif- 
teen different starting positions. 
He determined there is a grand 
total of 438,984 different solu- 
tions. This number, however, in- 
cludes solutions which are not 
fundamentally different from 
each other. For example, by ro- 
tating the board and suitably re- 
numbering the holes, the same 
sequence of moves will solve 
any of the three starting posi- 
tions with hole one, 11, or 15 va- 
cant at the start. 

Duncan's program was writ- 
ten for the DEC-10 computer. 
He found that the computer 
time required to find the first 
solution when hole one is va- 
cant at the start was a little 
longer than 90 minutes. I 
adapted his program to run on 
the 16K Level il machine. I 
found the time required to find 
the first solution somewhat 
longer than Duncan's. 

To speed up execution time, 1 
modified the program so one 
possible sequence of the first 
three moves for each different 
starting position was made be- 
fore the computer began its 
search for solutions. This mod- 
ified program is given in the 
Program Listing. The total com- 
puter time to find 30 solutions, 
the first two for each of the 15 
different starting positions, is 
approximately 30 minutes. Nat- 
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urally, some of the solutions are 
lost because of tfie modifica- 
tion, but there are still many 
thousands that can be found if 
you have the patience. 

There is a total of 36 legal 
jumps on the board. These are 
arranged In a table in arrays C, 
D, and E. For each jump made, 
the computer must check the 



table to see that the move Is 
valid. Apparently the order of 
the entries in the table makes a 
dramatic difference In the time 
required to find the first solu- 
tion. This could bean Important 
observation for a programmer 
working on an application less 
trivial than the one of this pro- 
gram. ■ 



Program continuMl 










29t 


IFO<10BO>15THEN195 










285 


PBIKTiPRIKT'THE COMPUTER IS NOW SEABCHIHG FOR 


SOLUTIONS . 


210 


DEFIWri,N,R-V,Z 










215 


DIHC(36) ,D(3«) ,E(36: 


,A[15) ,B113) 






22* 


FORU-1T036 : BEADC (Ul 


(JEXTU 








225 


DATA1,1,2,3,4,6,11,12,13,7,B,^ 


,4,2,5,6, 


1,5,4,6,7,18,11,15,13 | 


.14 


15,9,18,6,13,9,14,1: 


,8,12 








23S 


F0RR-1T036!READD(E) 


NEXTR 








235 


D*TA2,3,4,6,7,18,12 


13,14,8,9, 


5,8,5,9,9 


,5,8,2 


3,4,6,7,18,12, 


13, 14, 8, 9, 5, 8,5,9, 9, 5, B 










24B 


FORT-lT036iREADE[T) 


NEXTT 








245 


DATA4, 6, 7, 18, 11, 15, 13, 14, 15, 9, 


18,6,13,9 


,14,13 


8,12,1,1,2,3,4 


,6,11,12,13,7,8,4,4,2,5 


6,3,5 








258 


F0R£-1T015 : READA ( S] 


NEXTS 








255 


DATAl ,1,1,1,1,1,1,1 


1,1,1,1,1, 


1,1 






26 > 


IF0-10BQ-70RQ-18ORQ-13THENA111 


-B:A(2)-B 


:A(3)- 


l!A(5)-B 


265 


I FQ- 20HQ-60BQ- 1 lORQ- 1 4TliEHA [ 7 1 


-B:A(B)-I 


:A(11) 


.B:A{12)-8 


271 


IFQ-3ORQ-4OR0-12ORQ 


15THENA(91 


-8!A[18)- 


l:A(14]-B:A(15)-8 | 


275 


IFQ-STHENA(7)-8!A[B 


-B!A112)-I 


:A(13]-B 






288 


IP0-BTUENA(2)-B:A(3 


-8!A(5)-B- 


A(61-B 






285 


IFQ-9TI9ENA(2)->iA(3 


-8:A(4)-8 


A15)-B 






291 


F0RV-1T013 iREADB (V) 


HEXTV 








295 
3fB 












N-3 




315 


IFN-13THEN395 










311 


I-l 










315 


IFI>3€THEN365 










328 


IFA(C{I))*A(D[I) X1THEN33 8 








325 


IFA1EU)1"8THEK348 










331 


1-1*1 










335 


GOT0315 










348 


A(C(I))-8!A(D[1))-B 










345 


A(E(I))-1 










358 


M-N+1 










355 


B(H)-I 










368 


GOT03B5 










365 


IFB[l)>2tTHEN66B 










378 


A(C[BIH)))-1:A(D(B1N))]-1 








37 5 


A(tlB(H)l)-B 










3 88 


I-Bim+l 










3 85 


N-N-1 










398 


G0T0J15 












LPRINT'UOLE I'lOi'LEFT VACAWT 


AT START 






488 

1 


IFO-IPRINT" 6- 1 
-4 ■; 


4- t 1 


- 4 ■::LPRim" 














Program continues 



Program conlinuad 



13 



1- 4 



2- 7 



485 IF0-2PRINT" 7- 2 

11-13 ■) 
418 IF0-3PRINT'1B- 3 

15-13 ■,: 
415 IFQ»4PRINT"13- 4 

18-8 'i 
428 IFQ-5PRINT-14- 5 

7-9 ■; 
425 IFO"6PfiINT"13- 6 

7- 9 -, 
438 IFQ-7PRINT' 2- 7 

I- 6 ■; 
435 IFQ-ePRINT"ia- 8 

3-18 "; 
448 IFQ-9PRINT" 7- 9 

3-8 
445 IFO-IBPRINT- 3-10 

1-4 ■; 
458 IFQ-llPRINT'13-11 

II- 4 ■, 
455 IFQ-12PPINT-14-12 

15-6 
468 IFQ-13PR1NT' 4-13 

3- 8 -, 
465 IFO''14PRINT"12-14 

11- 4 ■; 
478 IFQ-15PRINT"13-15 

15-6 
475 FORZ-4T013 
48B IFB(Z)-1PBINT 
485 IFB|I)-2PRINT 
498 IFB(Z)-3PRINT 
495 IFB(I)-4PRINT' 3-18 
588 IFB(Z)-5PRINT" 4-11 
585 IFB(Z)-6PRINT" 6-15 
51B IFB(I)-7PRINT"11-13 
515 IFB(Zl-flPRINT"12-14 
528 IFB(I)-9PRINT*13-15 
525 IFB(I)-18FRINT- 7- 9 
538 IFB(Z)-11PRINT" B-lfl 
535 IFB(Z)-12PRINT' 4- 6 
54B IFB(Z1-13PRINT" 4-13 
545 IFB(Z1-14PRINT" 2- 9 
558 IFB(I)-1SPRINT" 5-14 
555 IFBIZ)-16PRINT" 6-13 
568 IFB{Z)-17PRINT" 
565 IFB(Z]-18PRINT" 
578 IFB(Z1-19PRINT" 
575 IFB(Z)«2BPRINT" 6- 1 
588 IFBlI)-21PRl(n'" 7- 2 
585 1FBII)-22PHINT'1B- 3 
598 IFB[Z)-23PRINT-11- 4 
595 IFB(Z)-24PRINT"15- 6 
688 IFB(Z)-25PRINT"13-11 
685 IFB(Z1-26PRI1JT"14-12 
618 :fB(Z)-27PH1NT'15-13 
615 IFB(Z)-2BPHINT' 9- 7 
628 1FB1Z)-29PRINT'18- 8 
625 IFB(Z]-3BPHIKT" 6- 4 
638 IFB(Z)-31PRIMT'13- 4 

635 1FB|Z)-32PRINT' 9- 2 

648 1FB(Z)-33PRINT-14- 5 

645 IFB[Z)-34PRINT"13- 6 

658 IFB(Z)-35PRINT" 8- 3 

655 1FB(Z1.36PRINT-12- 5 

668 NEXTZ 

665 SL-SL+1:PRINT' SOLUTION * " ;SL: LPRINT" SOLUTION t'jSL 

67B PRIWT:LPfiINT 

675 GOT0365 

6 88 END 



3- 8 

5-12 



4- 



- 4 


11-13 


■i;LPRINT" 7- 


2 


13 


- 4 


- 6 


15-13 


'; :LPRINT"1B- 


3 


13 


- e 


-13 


10- 8 


"; :LPRINT"13- 


4 


15 


-13 


-14 


7- 9 


■;:LPRINT'14- 


5 


12 


-14 


-13 


7- 9 


•j !LPRINT"13- 


6 


11 


-13 


- 4 


1- 6 


"cLPRINT' 2- 


7 


6 


- 4 


- 9 


3-10 


■,:LPHIWT"]B- 


8 


2 


- 9 


- 7 


3- 8 


■;:LPRJNT" 7- 


9 


2 


- 7 


4- 6 


1- 4 *|iLPRINT' 3 


-IB 




4- 6 


4-13 


11- 4 -cLPRIWT-lS 


-11 




4-13 


6-13 


15- 6 "(:LPRINT"14 


-12 




6-13 


1- 4 


3- 


■;:LPRINT" 4 


-13 




1- 4 


4-13 


11- 


")!LPRINT'12 


-14 




4-13 


6-13 


15- 


"l iLPRIIJT'13 


-15 




6-13 


... 


IFB(I)- 


ILPRINT" 1- 4 


• . 






■; : 


IFB(i)« 


2LPRINT" 1- 6 


' ! 






■ 1 ! 


IFB(I)- 


ILPRINT' 2- 7 


' ; 






■ I ! 


IFB(Z)- 


ILPRINT" 3-18 


' 1 






"f . 


IFB(Z)« 


5LPRINT" 4-11 


" ; 






" ; 


IFB(Z]. 


ILPRINT" 6-15 


" ; 






" ; 


IFBdl- 


7LPRIMT-11-13 


" j 






■; 


IFB(Z)- 


iLPRINT"12-14 


■ I 








IFBIZ)- 


9LPRINT"13-15 


" 1 






" 


:IFB(Z) 


■=1BLPRINT" 7- 9 


' 1 






" 


:IFB(Z] 


-IILPRINT" 8-lB 


' ; 






■ 


!lFB(Z) 


"12LPRINT" 4- 6 


" , 






' 


! JFB(Z1 


-13LPRINT" 4-13 


" 






■ 


:IFB(Z) 


-14LPRIKT" 2- 9 


" 






" 


:IFB(Z) 


-15LPRINT- 5-14 


" 






■ 


!lFB|Z) 


-16LPRINT" 6-13 


" 








:IFB[Z) 


-nLPRINT" 3- 8 


" 








:IFB{Z) 


=18LPRI(JT' 5-12 


" 






' 


!IFB(Z1 


-19LPRINT" 4- 1 


■ 






■ 


!IFB(Z) 


-2BLPRIMT' 6- 1 


■ 






■ 


:IFB(Z) 


-21LPFINT" 7- 2 


" 






■ 


!lFB(Z) 


-22LPR1NT"1B- 3 


■ 






■ 


!IFB1Z) 


-23LPRINT"11- 4 


• 






• 


iIFBlZl 


.24LPRINT"15- 6 


■ 






' 


!IFB(Z1 


-25LPRINT"13-11 


■ 






■ 


:IFB(I) 


-26I.PRIin"14-12 


" 






" 


:IFB(Z] 


-27t.PRINT"15-13 


" 






■ 


!IFB|11 


-2BLPRINT* 9- 7 


" 






■ 


!IFB[Z1 


=29LPRINT"li- 8 


" 






■ 


:IFB(Z: 


-3BLPRINT" 6- 4 


" 






■ 


!IFB(Z: 


-31LPRINT'13- 4 


" 






- 


lIFBlZ) 


-32LPRI(JT" 9- 2 


■ 






" 


:1FB(Z] 


-33LPEINT"14- 5 


■ 






■ 


:IFB(Z] 


-34LPRINT"13- 6 


• 






■ 


:IFB(Z) 


-35LPRINT" 8- 3 


■ 






■ 


!IFB(Z) 


-36LPRI(JT*12- 5 


■ 







SPEAK 
-EAZY 

* 


HARDWARE 

The HDMAll QDALITT VOICE STVTHESIZEK for joue 
MODEL I or III coapatsr. The co«plct« 297 Mord 
Tocibulary la contalnad Id HM. Kattdy to ua* 
HAISHAU and SOFTHAKE for OHLT $229.95 


SOFTXA/ARE 

■ ■- Qoua's raoTBALL scodtim: upoit -■- 

n, COAOI: Mould yon like to finish jour scowtli^ reports in 
1 honr and then ralaxT If so. w« iMve the answer. 

A COMPLETE AIULTSIS OP OPPOVEnS OFPEUSE AMD DBPEISE 
DQHRS by short, nadlna, and long yardaga 
lASI MAIKS POBUnOB FIELD POSITIOBS 
Each Is analrsad bjr naaber of tlaea each hols nas rwn; the 
play MBher usad; was It a qnartarback heap, an Option, a 
counter option aarlee, a Vlag back play, or fallback play. 
If a pass play, It gives sens - ctmpletc or Incsspleta. 

PLEZIBLE STSTEM DSE TODI OHR mmBERnC STSTBf 

SCODTS REED TO ONLT IMDmrT DOm, RASH KAtn, TAID LIVE, 

roBunoa, taios caiked oi lost, ard ball RAKa.Ei. 


□D-80 
* 


A DOUBLE DERSITT adapter for th« HODEL I that 
allowB yon to write and read twice aa Huch data 
oa a dlak. P1«sb Into your EXPAISION IRTEIfACE 
and la coapatlble with all exlaClBS SINGLE or 
DODILE DERSITT Mfteare and hardware. $129.95 


TRANS 
- -DATA 


How an Incxpenalve naana to TIARSHIT-RECEITE 
data over the phone llnea VITBOCT bcpanalon 
Interface, tS23Z, or software. DltZCT COmrECT 
to phone lines and your cassette port. $59.95 


WOBKS EqCALLT VELL VITH PEE VEE, LITTLE LEACDE. HIGH SCHOOL, 

COLLEGE, OE PtOTESSIOUL FOOTUIi. TOMS. 

P0« TIE TtSSO IDDEL I or III, or the COMODOIZ PET 

leqntrca disk drive printer Special - $149.95 


EAZY 
LOAOEn 


EAZT LOADES la a alcnal conditioner for your 
MODEL I TAPE STSTEH Chat COtlECTS the voluae 
aanaltlvlty problass assoclatad with tape 
loading on the MODEL I. 

CAM BE USED EXTEUUL or IRmilAL 
$12.50 $24.95 


--Atnwus -- 

Ve alao offer a nlnlawl disk oparatlag ayat^ for anthors 
of prograaa for tha TESSO at a wwrj affordable price. 

+ Addltlonal aoftware for the SPEAK - EAZT TOICE STITTHESIZEI 

* Coanwdore Pat la a registerad trad^urk for Coaaodera. 

** 1BS80 la a registared trndanark for Tand7 Carp. 1 


PROQRESSIVE ELECTROfMICS 

Bouts 643 E CticatanC St. 
9-6 Uncaatcr, Ohio, 43130 
Hon - Sac Phoa* 614-687-1019 ^277 



r'Sff* Usi ofAdvtnistrs ort paga 418 
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The Alternate Source MONitor I 




BRAND NEW! 



Create your own adventures t^^t 1°°^ «-d p^-for- *-c«tiH I k^ 

tkwe vntten ti4 S<^o" /\<iarr-i\ He Adventure ^^(tem ,( more than |u\t 
C proq-ram -- it't d unique eiperience in treat 1^1*4! Included m | tie /Adven- 
ture 04ilem package cre^ 

• /\n odwenture ed'tot- «hich allows 40U to (»es qn. debjg, reod tJfd a-r te 
jOur own adventure creations! 

• An Oijventure driver for e-ecuting ijour adventtire creations! 

• 1*0 full lengtli adventures: "rl.ner's Adventure" and "Dur,glar's 
Adventure" 

• /\ 50+ pf^e manual in a nanavome notetxxiK describing trie aJvonture 
language ond now to use it, includes a [rv^ m.n, -adventure' 

9 /\n nv taton to join the adventurer's user group *tiicn w.l enttic tjOu to 
|-ree program updates, user tips, n special discount on adventures, a user 
newsletter, and jpec.al nelp getting trie adventures ijou wr^te mart,ptec" 



The Adventure System actually utilizes a unioue 
lanfluafie that permits you to input criteria for build- 
infi an adventure flame to your specifications. Vou 
are limited only by your imaflinationi! Challenfle. 
amaze and entertain your friends with your own ad- 
venture proflrams! Adventure characters can in- 
clude your family or friends: adventures can take 
Place at home. work, campus or your own cityl 



Isfc 



R 



ne /Adventure ^H^te 

just i7>Q.Q5 
MleasB specifi) l^odel | or {|| 
,egure, I dr.ve and 48 K RAM 



For the cost of three adventures* 

TAS lets you create dozens II 

In stock and ready to ship NOW. 






Tli» Alt*'"-'''te S"^-^' ' '"*a4i accept ng iubi 
Bui tl«i, orrn't aLai,s ^ v nq a«iJt, |-"ef pnjgi-a"-. 
^nJti,*' B-f.---. M^"-' -^ .!^82eaa.p^r^or,. 

;t H.^ K-od t^ TAS 



...HfuNofbuts 



-FLV. Y-^- -...w-.-.'.'. 
.,.•..g-^e— .^ SwanniM^t- 

..<,.. .n.„^ FLY -...(.—.- 



It > a^a lab'p nn'4 tl-.-iu,^- tl..i iind 1. 
M^"t. >' 196; T-*"Nf,.'.- 



,.,-TAS<-s-i6ixj FLY 




Z 



Overview: TASMON i^ an interactive Z 8O monitor and dis- 

assembler /\li ver^iont come complete witn tape and disk l'\ ). ana tjllow 

programs to be ea^il^ converted from one medium to tne otner, Source cnde 
generated bi) | A orlUlN ccrn be loaded b^ i3'l popular editor/ cit^embler 
programs | AXorlLJlN features a command to fulli) relocate itself to 
an^ memorij block 4OU fpecifLj. 

Purpose: Tt>e purpose of TASMON 1^ to allow .tud^, debugging, 
tracing and Single -stepping of Z^-OO object rode Special car^ kas been 
taken to make the program eai^ to use bvj begmnng / -OO programmers 
I A^MCJInJ wos developed t»( a -^lult o\ tKe author's dinatii|-a( tion 
•itk tke seven monitory ke purchased. | Ao \\ LJIn kas a ^5+ page ucer 
manual documenting eacn of its ["eatures, and inrlude^ special user sessions 
wkick document tke more complicated features 

"ottier excellent disassemblers are ... The Alternate Source's 
TASMON. which provides symbolsanddlsk files. (Ttw TASMON 
packase is a powerful monitor, one of the best I've seen.) " 

Wllliam Barden. Jr. 

Command Summary: 






Plus: 



l<epai:e "e^it*'^ 




Loiiii i^^ttfrn t^rv 


rlcdr^ ">*"-<> 1-1^ 




Lo«/CMD J'"- f^ 


*—(♦■ mff*T10T\^ durr^ 




\/wJ^t\^ t^te^ top* 


ASCII "--^^Ju^, 




V.«/v*r.f,/CMDd^kf 


D.<=.»«'"bied dump 




^r.t» (qlts'T tap* 


D.ia«pmble to p""tv- 




^-tWCMOMfl. 


L^u-rp tc*'«*r, to pr.nl*T- 




D.<o...-bLr to Ji.^ 


Su" 1*. ,»u. 




D'.a"""klt to taf» 


^«bt'*ott **» -4'Hj#t 




S-* b-.aKpo.ntl .r, ROM 


^.r^ '4 ctxx#cut*« bi^tM 




Srt O^okponti n RAM 


^Vp foT-waT^ on* "*tT%*cl-On 




S»l br,akpOinti (Q total) 


tjtfck ijp o*»e nnitrvct'O" 




L^K^dLj Dr«eakpO'nti 


CUr ,c-wn 




^l»a>- oreakpoir^ti 


|*;*lo<:£»te pT^r^rm 




S-^t* st»PP-"g (t-o "O^i) 


Move b;o<k of ™^.^ 




T '■i>ti"'3 at S (p(*d( 


s: 


Disassembles with label 


fC^P 11. rp?" 




TASMON 1 ^ III ...p. 


OpI't lo^eei^ tJ'iplij^ 




TASMON \:'-.^ 


tjafli'f— o"*c"« P<>^ "^1 ■'■■' 




TASMON III ..i:: 


B"r<.k 4'e>-" ^.«ut,i... 




S29.95 



D R^^^' -^ .- TAS I diski I 



The Altemate Source 

1 806 Ada street 

Lansinfi. Michigan 48910 

517487-3358 

517-485-0344 ^138 



D Rusk me a TAS III disk! 

D Rushm.. TASMON t,.;>. 

D Rusk me a TASMON I .■..^| 

D R^kme^ TASMON III dski 



Add ^'*;0 .,. CpD <'-E'---ti 
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''modewTso 

Communications Paclutfe 



AMIMes: 

9 l-^emote opereition of a \ |-<do-00 rlodel I or 1 1 1 from a ierm\r\a\ or a 
second [ |-<3i-00 tnT\3ugn a telepfione link -- files mcnj be trtantferT^d 
•■itfi tne unattended computeT. 

• t::*"'^'" f"'^^* f'l^ trcintferv witd another | |<0-00 or a computer tKcit 
can ute tne protocol of trie C^M/rl program "f^odem" wtiicli is widelij 

u(ed on computer bulletin boards (and avoilable on \ .\-^i\ | user group 

disk number 25). 

9 -I — lie transfers witri manij otner tijpes of computers sutn tne | l'<0"00 
acting as a terminal. | he program is set up for use wrtn i |ictid|\J^ | , 
tne ^ourr:e, \ — orum oO's and similar systems, but tne communication 
parameters, character set, and control characters manj be redefined to 
operate with mani^ otner computers. 

Advanlafies: 

# \ — lie! of unlimited length maij be bandied, even in a S^K^ system, y^' ith 
tU "XMODCM/CMD" f'i« transfer utilitn, files ma4 be trar>s- 
ferrecJ wit^i a I O K, Computer. 

9 \ — iles maij be prepared off-line, taking odvantogB of ijour word proces- 
sing program, or tne included program "o/Wt'L^rlL/ '■ onould 
a first attempt at transmission fail, ijour file is still safely on i^our disk O^ 
% available for a second tr\). 

S9 I ransmrt and receive files maij be opened before communication begins, 
_ and rnai^ be turned on and off independently, jn a specialiied application, 

I one file maij be transmitted wdJe a different file is simultaneously being 

■ received. C^ontrol codes ma4 be used to allow tne remote computer to 

^ control tne file operations. 

^ # /\ single line mai) be rent from tbe file, allowing sending from the file to 

Sbe Intermixed wltn taping from the ke4Doard, ] his allows a more flexible 
_ response to prompts from tKe remote Computer, and permits transmitting 

^ data to a computer tnat cannot accept full speed transmission ana does 

Snot use control codes to start and stop tne file transmission. 
_ # LJUo commands and programs wKicn execute in tne lower lOK. of 
I memory maij be executed while maintaining positions in the transmit and 

M receive files, | ne previous screen contents are restored upon completion 

^ of tbe |_,)(_)o command. 

! MODEM 801s compatibtewith Ml popular opera- 
J tUtf systems liickidliuiLDOS.NeuKlos/80 (even ver- 
I slon2.0).DOSPLUS.TRSDOSandULTRADOS. 






MODEM 80 recf-lres one disk Jrlve and 3?K 
MCJUtrl OO IS supplied on diskette witli fuN-si7e punched manual 

MOD£M 8o costs ,ust $59,95 






AT LAST !! 

CONCINNATOR 

I be wait Is over, l^odel 1 1 1 peoplel; (.^,oncinnator opens tne door to mactiine 
language programming! (_onctnnatoT' is a paten to l-^adio ^hack's t=ditor 
Assembler I.? package -- patcbes it rigbt up to work on YULJI'-. 54«teml 
|\Jot onlij that, but (.^.oncinnator makes numerous improvements to the pack- 
age; just look: 

bnprovemenfs: 

# I Ou can reserve memory for machine language programs aria dump tne 
assembled code to this reserved area! K,eept l^oncinnator m memory, 
still intact so tbat 40U can return to it later! 

# (^oncinnator allows 40U to execute tbe assembled code that 40U dumped 
into the reserved memorij area'. \ nis means 40U can test LjOur code and 
do 4our debugging, etc. witKout tons of tape \'K_) VV ben, and onl4 wlien 
40ur program is complete -- tben ijou can save ijour source/ object code to 
tape! I oggle between assembled code and C ^oncmnator at will! 

# y/nen it comes to tape \>\_). (^_,oncinnator provides 40U with all of the 
ideal options; it honors the break kei) so 40U can escape from unwanted 
loads or saves; it features a verify option to ensure that i^our code was 
saved accuratel4; it also supports selectable baud rate [500 or l500/ 

# (^onclnnator Is at ijour command -- rec•a^ at an^ time to convert, dispiai) 
and/or modify contents of memory locations! 

# C^oncinnator keeps 40U informed of available memori] b^continualli) dis- 
placing tbe number of bijtes remaining in the text buffer! 

# Enter, at an4 time, BASIC'S monitor mode {SYSTEM P"3mpt) 
for jumps to anij location in memorij and/or to load O T O I 1 1 I tapes. 

# -^nter, at anytime, llj/Aol^'' command mode (I'^trALJ Y prompt} 
to perform anij neeaea calculator functions 

# C^onclnnator even allows 40U to return to fullkj programmable ljAAJ- 
IL_, k**l>ing (.^oncinnator intact ond waiting, ana optionallij, dumped 
machine programs and source code protected in hign n-iemor^! 

Tbe best news '^ tKat Concmnator provides ALL of tliese opt.ons, 
and takes awai^ less than AOO bi^tes from tbe original text buffer (wben no 
memory s reseTved)!! InClUded WMl COnCUmatOT s '^ p^e-'-'T 
called 3Y0 I W\= wliicti allows 40U to combine t U I /\ O M ond (,_,on- 
cinnator into one oYo I tM tape at higfi speed, for eas4 use. nnHTQ 
bonus PTOftram. CPYALL. «ilo*^ 40u to read bock object code 
produced be (^^oncmnator, and reiave it as a Continuous (^rather than seg- 
mented} high speed tape! 

And tfs Just $19,9511 

Concinnator rewires Ra<Ko Shack's EDTASM 1.2 
(Condnnator does NOT support disk I/O. sorry) 



I 










Rust, me a Modem 80 | disk! 
Rusb me a Modem 80 1 1 1 disk! 



a (^^oncinnator tape! 



Tbe Alternate Source 

1806 AA Street 

LMMtai. McMMi 4S9I0 

5l7-4t7-335S 

5I7-4S5-0344 



_ ™"' AAJ $I50 for COD 5t.,prr*r,t(. i* |t ,1 ovoiloy. onl^ tkroogl, tkii (."d t.m.lar «J«rt.I«y»r.tt, off.r qooj until ■ 

^'^''^ AdJ «% fo' ch.^ c«rd o^r,. 1 ; [s^^^i, 31, 196^. T«ni. four ,„„« of TAS "". «i6 OO, FLY .. 3 




Out tr>«i^ aT»n't filvdL|( giving trvfii^ j"rv« pT^^grv^mi tcnubiC"Mix. ^irtt now H 

and tk*n. fiefoT^ M^-^l^ 51, "QS? *x^ pei^O'^ iuUcT^.b.n^T,n.»,og for-a J 

2A -ii-jr p#T-iod to I /\^. anj m«nbori^ tnis ot>v*rii foment, *(il receive ^ 

at«olut.l>, fr«. « p^g^m colU FLY. Yo^ -II f."d tt,.. p«>g™^ to t- | 

t^rolln fUl of biMS f' contaio.ng oo •rrort. SWM IIMlie ">'< «^' L 
tion, it'l !ijT« to wruti -fOv for Kourf on tnti. FLT " ""' fOi" !"•» an.)«i*i»T^. 

t iS £»vdiltibl* onli^ tnrough tfiis (i"ci timnlar' *w>v#rti*«ment(, off«r good until 

Mc-^k 31, 196^. T«ni. four ,„„« of TAS "". «i6 00, FLY ■ 

fr«. Y».-Il eWat HOo^lf ,f ^. m,„ iU ™i 



,'S—UMlofA<iv9ftl$0r$onp»g»4fa 
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TUTORIAL 



Learn to live with your pocket computer in calculating harmony. 



Pocket Full of Chips 



David M. Dolan 

Box 632 

South Pasadena, CA 91030 



At the very least, the TRS-80 
Pocket Computer is a com- 
puter gadgeteer's dream-come- 
true, but the following four pro- 
grams should give you an idea 
of the PC's potential. 

A Few Hints Will Help 

It doesn't take a mental giant 
to realize that the best way to 
get accustomed to a new piece 
of hardware is to read the 
manual. But after breaking in 
three different computers my- 
self, I can tell you that that usu- 
ally isn't enough. Either be- 
cause of a lack of emphasis on 
some points in the manual, or 
outright omission of others, 
you ultimately have to learn the 
hard way, by keying in a few 
programs. Below, I offer the 
fruits of my toil, hoping that it 
saves you a little aggravation. 
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First, beware of the PC's 26 
character screen print limita- 
tion. You'll need to plan your 
presentation, using only 26 
characters. This gets especial- 
ly dicey when numbers run to 
six figures or more; further- 
more, you have to account for 
the sign when printing. That 
means that the number 3457.34 
must be formatted using #####. 
##; using ####.## will cause an 
error (some Basics would allow 
this as long as the number is 
positive). 

Incidentally, you cannot as- 
sign a string variable to a par- 
ticular format when printing. 
The following line would cause 
an error. 



10 FJ = "»I 

USING F$,A 



:A.3457.34;PRINT 



The way you got around this is 
to assign the selected format 
first: 



10 USING "f#«#«.#«":A : 
A 



:3457.34:PRINT 



printed variables, until another 
is assigned or until formatting 
is turned off by issuing USING 
without a format string. 

You can't turn off a selected 
format by breaking into the pro- 
gram and rerunning it. I learned 
that the hard way! 

Maybe you feel limited by 
being able to print only 24 char- 
acters; well, if you use a prompt 
string in an input statement, 
you can print only 23 char- 
acters! However, if you precede 
the Input variable with a com- 



ma, the prompt string will blank 
out when you respond. 

If you use a semi-colon, the 
prompt string remains {as is 
usual in most other Basics). I 
find the comma more useful, 
since you rarely have room for 
both the prompt string and the 
response in 23 characters. 

You cannot manipulate 
strings on the PC, but the 
manual does not mention that. 
Except for the equal sign, there 
are no string relational opera- 
tions. Thus, the following state- 



Thls format will be used on al 



Ready 

>RUN 

METRIC-AMERICAN CONVERSIONS 

VALUE FOR CONVERSION:? 3172.12 

ABBREVIATED UNIT:? IN 

8619.20 CM 
VALUE FOR CONVERSION:? U78.25 
ABBREVIATED UNIT:? KG 

105". 36 LB 
VALUE FOR CONVERSION:? 98.6 
ABBREVIATED UNIT:? F 

37.00 C 
METRIC-AMERICAN CONVERSIONS 
VALUE FOR CONVERSION:? 

Sample Run 1. Metric/English Conversion 



ment causes an error. 

10IFAJ<>"NO"GOTO30 

Remember that strings are 
limited to a maximum of seven 
characters. String concatena- 
tion using the plus { + ) sign is 
not allowed, but you can com- 
bine printed strings by separ- 
ating them with semicolons: 

10 A»= "C0NCATE":BS = "NATION" 
20 PRINT AS;BJ 

Running the above, prints CON- 
CATENATION. 

When you print more than 
one variable in a row, all vari- 
ables except the first must be 
presented alone. The line 

10 A ^ 34.34;PR1NT A'3; A*5 

causes an error and must be 
written as follows: 

10A'<34.34:B = A*5:PniNTA*3; B 

When you use a For, the 
number following To is limited 
to a maximum of three digits. 
You can't say 

10FOHN = 1 TO 1000 

Generally, beware of hang- 
ups! Occasionally, for no rea- 
son that I can find, the PC simp- 
ly stops. It doesn't respond to 
any keys including on and off. 
The only recourse Is to reset the 
computer (Reset Is on the back 
of the PC). Doing so destroys 
your program, so, if you own a 
cassette Interface, back up 
your program periodically. 



10 PAUSE'-CONVERT METRI COE-NCLISH" 

20 INPUT"VALUE FOR CONVE RSIOTl : " , A 

30 INPUT"ABBREVIATED UNIT:",BS 

UQ IFB$ = "IN"LETC:2.5'»0005:D$:"Cn":GOTO3 00 

50 IFB$="FT"LETC=. 3016006 :D$:"M":G0TC3 CO 

55 IFBJ = "YD"LETC=.9U')Ol8:DSz"M":GOTO^OO 



IFB$ = "MI"LETC=1 .609')319;DS:"KM":GOT0-Cn 
IFBS="IN2"LETC:6. 451626:05= "CM?" ;COT0300 
IFB$ = "FT2"LETC=.092°0 3'*;OS = "M2":GO:C300 
IFB$="YD2"LETC=.8361306:D$="M2":GOT0300 
IFB$="HI2"LETC=2. 5899985 : D$= "KM?" :G0T03 00 
100 IFB$="IN3"LETC=16.387156:DS="CM3":GOT03CO 
no IFB$="FT3"LETC=.O28317:D$="M3":GOTO3O0 
115 IFBS:"YD3"LETC=.761559:D$:"M3":G0TO300 
120 IFB5="GAL"LETC:3.7853 32:D$="L":GOTC300 
130 IFB$ = "OZ"LETC = 28.3'J95?7:D$ = "GM":G0TC3 0O 
UO IFB$="LB"LETC=.4 53592y :DS="KC":GOT0300 
160 IFBS="CH"LETCr2.510005:OS:"If ":GOT0310 
170 IFB$ = "M"LETC=.91''1018:DJ. = "YD":GOTO?1D 
180 IFB$ = ''KH"LETC=1 .60913 19 : DJ = "HI" :G0T03 1 
190 IFB$ = "CM2"LETC = 6.15l626:D$ = "IIl?":COTO-j10 
200 IFB$:''M2"LETC=.8361306:DS = "YD2":GOT0310 
210 IFB$="KM2"LETC=2.5 899965:D$="H^2":GOTO310 
220 IFB$="CM3"LETC=16.367156:D$="IN3":GOT0310 
230 IFBS = "M3"LETC=.76'1559:D$-"YD3":GOT0310 
210 IFB$="L"LETC = 3.7 853 32:D$:::"CAL":GOTO310 
250 IFB$ = "CM" L ETC =28.3195 27 : D$="OZ" :G0T03 1 
260 IFB$="KG"LETC=.1535921:D$="LB" :GOT0310 
265 USING"#*## .«" 

270 IFB$="F"LETC=CA-32)»5/9:PRINTA;E$; 
275 IFB$ = ''C"LETC=(A»9/5)+32:PRirJTA;E?; 
280 PRINT"WRONC ABBREVI ATIOri! " : GOT020 
300 USING"#»##S. tffi":C=A»C 
305 PRINTA;B$;"=";C;D$:GOT020 
310 USINC"l(#ifS.##":C = A/C 
320 PRINTA;B$;"=";C;D$:G0T020 



Program Listing 1. Metric/English Conversion 



;C; 



:COT020 

:G 0102 



The PC is also very slow. The 
following loop takes about 25 
seconds. 

10FOR A = 1 TO 100 
20 NEXT A 

Things move a little faster if 
you use variables. Including or 
following W. Thus, substituting 
Z for A in the atxive program 
reduces the running time to 20 
seconds. 

Things deteriorate as you 
add lines between For and 
Next. For example, this pro- 



gram takes 35 seconds. 

10FOR A = 1 TO 100 
20X = X + 1 
30 NEXT A 

Finally, be aware that the 
backspace key does not delete 



characters from the keyboard 
buffer. Used correctly you'll 
find that this is usually an ad- 
vantage, but it does mean that 
you must copy over or delete 
any entered characters, if you 
don't want them. 



Ready 








>RUN 








DEPRECIATION ANALYSIS 




ORIGINAL COST OF 


ITEM:? 


J735 


ITEM 


JSEFUL LIFE 


CYRS):? 


5 


VAL. 


lfter useful 


LIFE:? 


500 


CS)L1NE {Y)SDIC CD)DBL:? 


D 


PRINT 


(0)NE CA)LL 


YEARS: 


' A 


YR 1 


DP 229t BL 


3111 




TOTAL 


DEP: 229^ 






YR 2 


DP 1376.1 


BL 2 061 


6 


TOTAL 


DEP: 3670.1 






YR 3 


DP 825.81 


BL 1238 


.76 


TOTAL 


DEP: 1196.21 




YR 1 


DP 195.501 


BL 713 


.256 


TOTAL 


DEP: 1991.71 




YR 5 


DP 213-256 


BL 500 




TOTAL 


DEP: 5235 






ORIGINAL COST OF 


ITEM:? 




Sample Run 2. Depreciation Analysis 



10 PAUSE"DEPRECIATIOH ANALYSIS" 

20 INPUT"ORIGINAL COST OF ITEM :", C : C= INTO 

30 INPUT"ITEM USEFUL LIFE ( YRS) : " , Y : Y= INTY 

10 INPUT"VAL. AFTER USEFUL LIFE : " , V : V= INTV 

50 D=0:F=0;T=0:Z=0:B:C:FORI=1TOY:T=T+I:NEXTI 

60 P=(l/Y)*2:P=INT(P»100+.5)/100 

70 INPUT"(S)LINE {Y)SDIG CD)DBL:",QS 

80 INPUT"PRINT CONE CA)LL YRS:",A$ 

90 IFA$="A"LETM=Y:G0T01 10 

100 INPUT"PRINT YEAR:'',H:IFH>YCOT0100 

110 F0RI=1T0M 

120 GOSUBQ? 

130 Z:Z+D:IFA$="A"G0T0150 

110 IFIOMG0T0170 

150 PAUSE"YEAR:";USING"###":I 

160 USINC"##J#I#.#I»:PRINT"DP";D;" BL";B 

165 PAUSE"T0TAL DEP:";Z 

170 NEXTI:GOT020 

200 "S":D=(C-V)/Y:D=INT(D»100+.5)/100 

210 B=B-D:IFB-V<.05LETB:V 

220 RETURN 

300 "Y":R=CY-I+l)/T:R=INTCR«100+.5)/100:D=R»CC-V) 

310 IFB-D<VLETD=B-V 

320 B=B-D;RETURN 

100 "D":IFF=1G0T0110 

110 IFB<=VLETD=0:B=V:GOT0150 

120 D=B»P:S=CB-V)/CY-I+1) : IFD<SLETD=S: F=l :G0T0110 

130 IFB-D<VLETD=B-V 

110 B=B-D 

150 RETURN 

Program Listing 2. Depreciation Analysis 



80 Microcomputing, December 1981 • 231 



TtwProgramt 

This is probably not the first 
time you have seen programs 
about metric/English conver- 
sion, depreciation analysis, loan 
payment/Interest, and invest- 
ment caiculations, but likely 
each was presented as one arti- 
cle. Well, each program here 
provides the same information 
on the PC. 

1 printed the samples from 
duplicate programs running on 
a TRS-80 Model II, since, as of 
this writing, no printers are 
available for the PC. (I have 
tried to make the printouts as 
identical as possible to what 
you can expect to find on the 
PC.) 

Listing 1, the Metric/English 
Conversion program takes the 
most common English units of 
measure and converts them to 
the metric equivalent and vice- 
versa. You are first asked to 
enter the number and then an 
abbreviation for the unit of 
measure. The abbreviations are 
self-explanatory. IN2 and IN3 
refer to square inches and 
cubic inches; Ml means miles; 
F is Fahrenheit; C Is Celsius/ 
Centigrade (Sample Run 1). 

Listing 2, the Depreciation 
Analysis program calculates de- 
preciation figures using the 
straight-line, sum of year's dig- 



10 PAUSE-LOAN PAYMENT/ IMTERESf 

20 INPUT"AMOUNT OF LOAN :", A, "INTEREST RATE :", R , "NUMBER OF MONTHS:";M 

30 INPUT"CALCULATE PAYMENT C Y/ N) " , Q$ : M: INTM : A= INT A 

40 PRINT USINC'#####II";A;"/";USING"«##I";M;" MOS/";R;"J'' 

50 IFQ$="N"INPUT"ENTER MONTHLY PAYMENT:",? 

60 R=R/1200 

70 IFQ$="N"GOT0100 

80 C:C UR)"M:P=A»({R»C)/(C-1)) 

90 P=INT{P»100+.5)/100 

100 PRINT-PAY HOHTHLY:";USINC"#l####.*#";P 

no INPUT"(A)LL (0)NE (N)0 MONTHS", Q$ 

120 IFQ*="0"INPUT"WHICH MONTH:", W 

130 Z=0:T=Z:J=Z:D=Z:S=Z:B=A 

UO F0RK = 1T0M 

150 I:B»R:I=(I*100+. 51/100 

160 IFK=MLETP=B+1 

170 S=S*P:N=P-I:B=B-N: J=J+I:D=D*N 

180 IFQ$="N"COT0230 

190 1FQ$ = "A''GOT0210 

200 IFKOWGOT0230 

210 PRINT"MO.";USING"####";K;" BAL. " ;USING"###*###. *#" ;B 

220 PRINT"PR";USING"il##ll.l#";N;" TO" ;USING"##(##I# . ##" ; D 

225 PRINT"INT";USING"*»####.#/";I;" TD" ;USING"##I##I . I#" ; J 

230 NEXTK 

2a0 PRINT"FINAL PAYMENT :"; USING" f#f##i . I #"; P 

250 PRINT"T0TAL PAID : " ; U3ING"fl###### . *#" ; S 

260 GOTO20 

Program Listing 3. Loan Payment/Interest 



its and double declining meth- 
ods. First, enter the item's orig- 
inal cost, useful life in years and 
salvage value. Then choose the 
depreciation figure desired: S = 
straight line, Y = sum of year's 
digits, D = double declining. 

The depreciation (DP) and 
balance (BL) amounts, plus ac- 
cumulated total depreciation 
may be shown for one year 
alone or for each year in se- 
quence. If you want only one 
year, the program asks which 



year (ie. Print Year:) (Sample 
Run 2). 

Listing 3, the Loan Payment/ 
Interest program amortizes 
loans by the month. The Sample 
Run shows the figures for the 
first few months of a 36-month 
$7500 loan. 

The program can calculate 
equal regular payments or you 
can designate a payment (ie. 
Pay Monthly:) in which case a 



final balloon payment may 
result. 

The amounts produced are 
the month (Mo.), balance 
remaining (Bal.), principal 
reduction (PR), total principal 
reduction to date (TD), interest 
paid (INT^ and interest paid to 
date (TD). You can show the 
figures for all months (A), one 
month (O), or no months (N). If 
you select the latter, then only 



Ready 

>ltUN 

LOAN PAYMENT/INTEREST 

AMOUNT OF LOAN? 7500 
INTEREST RATE? 15.5 
NUMBER OF MONTHS? 36 
CALCULATE PAYMENT (Y/N)? Y 

7500 FOR 36 MOUTHS AT 15.5 1 
PAY MOHTHLY: 261 .St 
(A)LL (O)NE (K)0 MOUTHS? A 
MO. 1 BAL. 7335. OU 



PR 16H 


96 


TD 16U.g6 


INT 96 


88 


TD 96.38 


MO. 2 


BAL 


7167.95 


PR 167 


09 


TD 332.05 


INT 9U 


.75 


TD 191 .63 


HO. 3 


BAL 


6998.7 


PR 169 


.25 


TD 501 .3 


INT 92 


.59 


TD 284.22 


MO. U 


BAL 


. 6827.26 


PR 171 


.un 


TD 672. 7« 


INT 90 


.4 


■D 374.62 


MO. 5 


BAL 


. 6653.61 


PR 173 


.65 


TD 846.39 


INT 88 


.19 


TD 462.81 


MO. 6 

"C 

Break 


BAL 


. 6477.72 


in 180 


Ready 






>L 







Sample Run 3. Loan Paymer)t/lnterest 



Ready 

>RUN 

INVESTMENT CALCULATIONS 

(0)NE DEPOSIT ACCRUEMENT 
{R)EG DEPOSIT ACCRUEMENT 
(D)EPOSIT T0= FEQ. AMOUNT 
? R 

REGULAR DEPOSIT AMOUNT:? 50 
INTEREST RATE ( J) :? 14.5 
NUMBER OF MONTHS:? 36 
NUMBER OF DEPOSITS/ YR : ? 6 
ORIG. INVEST: $ 900.00 
ACCRUED INT: $ 21 1 .02 
TOTAL VALUE: S 1111 .02 

(ONE DEPOSIT ACCRUEMENT 
(R)EC DEPOSIT ACCRUEMENT 
CDJEPOSIT T0= REO. AMOUNT 
? D 

REQUIRED FINAL AMOUNT:? 10000 
INTEREST RATE t$) :? 15.37 
NUMBER OF MONTHS:? 240 
NUMBER OF DEPOSITS/ YR : ? 4 
REG. DEPOSIT: $ 19.79 
ORIG. INVEST: $ 1583.20 
ACCRUED INT: $ 81)16.80 
TOTAL VALUE: $ 10000.00 

(0)HE DEPOSIT ACCRUEMENT 
{R)EG DEPOSIT ACCRUEMENT 
{D)EPOSIT TO: REQ. AMOUNT 



Sample Run 4. Investment Calculations 



0/1 kAir^rr^nr\mr 



in rtar'amhar f QA1 





MONEY 
MANAGER 

By Andrew P. Bartohllo 

A complete management tool for the home budget, this useful program helps keep track of your in- 
come and expenditures and provides an easy method of budget allocation. 

MONEY MANAGER answers the question, "Where does it all go?" by categorizing the outgo of your 
money in accounts that you design according to your needs. It provides a means of keeping complete 
and accurate records, including an itemization of your tax-deductible expenditures— you can imagine 
the time savings at tax time alone! 

You can store information on up to 100 checkbook entries per month {250 with 48K}, specify any 
automatic withdrawals (such as automatic mortgage payments), keep a separate list of tax- 
deductibles, and record expenses by category. Checks payable to charge card companies and other 
lump payments may even be broken up to be placed into the proper individual categories. If you have 
a lineprinter, MONEY MANAGER will provide formatted printouts by category and time period. 

MONEY MANAGER requires a TRS-80' model I or III with a minimum of 32K and one disk drive. Order 
this time and money saver now for only $39.95. 



ACORN PROGRAMS ARE AVAILABLE AT FINE COMPUTER STORES EVERYWHERE 



LOST COLONY 




EVEREST 
EXPLORER 



ASTROBALL 




By David Feitelberg 

It's the world's f trst deep space col- 
ony and you are the economic 
manager. A remarkable simulation, 
LOST COLONY arms you with 
maps and charts as tools tor 
resource management. You assign 
human and robotic labor, explore 
new land, and sel production 
quotas. At the same time you must 
determine equitable pay scales and 
taxes. 

Communicate through your model I 
or 111 using full sentences or short 
commands. A challenging game, it 
might give you insight into real life 
management as well. Available on 
16K tape or 32K disk (or only $19.95 
each. 



By William Godwin & 
Don Knowlton 

EVEREST EXPLORER lets you 
challenge the world's highest 
mourtain without ever leaving 
home. You make all the decisions 
in this logistical simulation. 

You select the manpower, food, 
fuel, shelter and oxygen you need. 
Then manipulate your resources to 
outwit the elements and terrain, 
establishing ever higher encamp- 
ments. Will you reach Everest's 
29.028 foot summit— and return to 
tell about it? Just $19.95 for model I 
or III. Order on 16K tape, or the 32K 
disk version which includes a "save 
game" feature and other 
enhancements. 




By John Allen 

More features, thrills, and sound 
than even our famous PINBALL. 
With ASTROBALL in your TRS-80* 
model I or Ml the arrow keys 
become flipper buttons, the screen 
becomes the play board, and you 
become the "Pinball Wizard!" 

A flying saucer and moving space- 
ships add to the tun. Knocking out 
five meteors earns you an extra 
ball, while black holes swallow the 
ball in play, ASTROBALL's five skill 
levels will have all your tamily and 
friends lining up for the pinball ac- 
tion. Available on 16K tape or disk 
for just $19.95 each. 




(202) 544-4259 



Acorn 

Software Products. Inc. 



634 North Carolina Avenue, S E . Washington, C 20003 



■Tfademark of Tandy Corp 

ALL ACORN ENTERTAINMENT 

SOFTWARE SUPPLIED FOR 

TRS80* MODELS I & III 

MAIL ORDERS: Include $2 00 shipping & handling 
(DC. residents add 6% sales tax). 
CHARGE CARD CUSTOMERS: Call (202) 544-4259 
lor (astesl service. 



^ SeeUslol Advertisers o" page 410 
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the final payment and total 
amount paid will be printed. 
The PC may not be very prac- 
tical for a long loan, because of 
its slow calculating time (Sam- 
ple Run 3). 

Listing 4, the Investment Cal- 
culations program calculates 
the results of simple invest- 
ments such as banft deposits. 
Sample Run 4 shows examples 
of two of the three selections 
possible. 

The three choices, one depos- 
it accruement, regular deposit 
accruement and deposit neces- 
sary to produce a required 
amount are presented in print 
statements in lines 20 to 40. As 
with other print statements on 
the PC, you must press enter to 
continue after each line is 
displayed. 

Once you are familiar with 
the choices you may want to 
change the Print in lines 20 to 
40 to Pause, so that the choices 
are displayed briefly before the 
input statement. 

One Deposit Accruement (O) 
calculates the original invest- 
ment, accrued Interest and 



total value for a one-time de- 
posit. You will have to enter the 
number of compounding per- 
iods per year. 

"Reg, Deposit Accruement" (R) 
determines the results of mak- 



ing regular deposits a selected 
number of times per year over a 
given number of months. 

"Deposit To = Req. Amount" 
finds the amount you must de- 
posit a selected number of 



tinges per year to reach a de- 
sired total after a certain num- 
ber of months. An example 
might be a college fund that 
must reach $10,000 by a child's 
20th birthday (Sample Run 4).H 



10 PAUSE"INVESTHENT CALCULATIONS" : USINC"###*### . f I" 

20 PRINT''{0)NE DEPOSIT ACCRUEMENT" 

30 PRINr"(R)EC DEPOSIT ACCRUEHENT" 

40 PRINT"CD)EPOSIT T0= REQ. AMOUNT" 

50 INPUTQ$;IFQ$="T"GOT020 

60 G0SUBQ$:GOT020 

ICO "0": INPUT"SINCLE DEPOS/ INVEST :", A : C0SUB10Q 

no INPUT"COHPOUNDING PERIODS/ TR :", F 

120 T=A»CU(R/100/F))'{F»H/12):GOSUB«50:I = T-A 

130 C0SUB500;RETURN 

200 "R"; INPUT"RECULAR DEPOSIT AHOU NT : " , A : GOSUB400 

210 INPUT"NUHBER OF DEPOSITS/ YR :", F 

220 T^A»({ U( R/IOO/F) )"(F«M/12)-1)/CR/100/F) : GOSUBISO : A= A» ( M/ 1 2) 'F : I:T- A 

230 GOSUB500:RETURN 

300 "D": INPUT"REQUIRED FINAL AMOUNT :", D : GOSUB«00 

310 INPUT"NUNBER OF DEPOSITS/ YR :", F 

320 T=D»Cfl/100/F)/( C l+( R/IOO/F) )-(F»M/12)-1) :GOSUB«50 

330 A-T»CK/12)»F:I=D-A 

3«0 PRINT"REC. DEPOSIT: $";T:T=D 

350 GOSUB500: RETURN 

«00 INPUT"INTEREST RATE (J):";R 

tlO INPUT"KUHBER OF MO[ITHS:";M 

120 RETURN 

«50 T=INT(T»100+.5)/100:RETURN 

500 PRINT"0RIC. INVEST: $";A 

510 PRINT-'ACCRUED INT: $";I 

520 PRINT"TOTAL VALUE: S-;T 

530 RETURN 

Program Listing 4. Investment Calculations 







ForhMHen PlanBt 

This advtntyrt tails thmigh tM camttt port. 

^ You 10 loigftr «ced to kavc a voice syithKinr 

F*: This ailviitvre takes you to a desolate planet 

lehcre only yonr sllli and your talklRg computer 

. will help YOM survive ThH is Part 1 of a mittl- 

^'<%rt talking adveature Like no other adventure 

you haia iMr playtd. The first five people to solve 

ForbMdei naitt vlll get tN itit advtirturt free. 

*. _iftltt Screen 

■*JHiclHQ^Li»9uaQe 

titfooqii Catiette Porl 
lower Case 
ech 
KilUaai Denw ^...- 
f^ Adni A^emire #12" 



4SM>Disk Model I & III 

Dealers inquiries invited 

^-jas? Fomm 80 702-562-5809 



Fantastic Software 

5110 Polaris fil 
las Vegas. Hevada 89102 



4' 



234 • 80 Microcomputing. December 1981 



r, 



TRS-80, APPLE, 

COLLEGE BOARD SAT PREPARATION SERIES '^';,;,"l'^^T' 

Each program confronts the user with a virtually limitless series of questions and answers. Each is based on past exams and presents 
material of the same level ot difficulty and in the same form used m the S.A.T. Scoring is provided in accordance with the formula used 
by College Boards. 

S.A.T. , P.S.A.T., N.M.S.Q.T. — Educator Edition set includes 25 programs covering Vocabulary, Word Relationships, Reading Com- 
prehension. Sentence Completion, and Malhematics. Price $229.95 

independeni Tests of S.A.T. series performance show a mean total increase of 70 points in students' scores. 

G.R.E. Series - Educator Edition includes 28 programs covering Vocabulary, Word Relationships, Reading Comprehension, 
Sentence Completion, Mathematics, Analytical Reasoning and Logical Diagrams, Price $289,95 

COMPETENCY EXAM PREPARATION SERIES 

This comprehensive set of programs consists of simulated exam module^, a thorough diagnostic package, and a complete set of 
instructional programs. It is designed to teach concepts and operations, provide drill and practice and assess achievement levels 
through pre and post testing. The Competency Exam Preparation Series provides a structured, sequential, curriculum encompassing 
mathematical, reading and writing instruction. 

This program is designed for individual student use or use in a classroom setting. Programs provide optional printer capability covering 
worksheet generation and performance monitoring. CE.P.S are available in three software formats. 

National Proficiency Senes SI ,299.00 

N.Y.S. Regents Competency Test, Preparation Series $1 ,299.00 

California Proficiency Assessment Test, Preparation Series $1,299,00 

if desired separate Mathematics and Verbal packages are available for $799.00 ea. A Spanish language version of the Mathematics 
Instruction Package is available at no extra charge. 



INQUIRE FOR UNIQUE M.I.T. APPLE 
LOCO APPLICATIONS SOFTWARE 



Time Traveler 

The best of the adventure games. Contronis 
Ifie player with complex decision situations 
and the demand tor real time aclion. Using 
tfie Time Machine, players face a cnallenging 
series ol historical environments. To succeed 
VDu must build alliances and slruggie with the 
ruling power. Each game is uriQue. 

$24.95 

Odyssey In Time 

This spectacular adventure game adds a new 
dimension ot excitemert and complexity to 
Time Traveler 

Odyssey In Time includes all the challenges 
of Time Traveler pljs 10 additional eras 
Each game is dtfterent and may De interrupted 
and saved at any point lor later play 

$39.95 





Sword of Zedek 

Fighl to overthrow Ra, The Master o( Evil 
Treachery, deceit and witchcraft mjst be taced 
in your struggles as you encojnter wolves, 
dwarves, elves dragons, etc Eacti of the 
twelve treasures win enhance your power by 
making you invisible, invjinerable, etc Each 
game is unique ir this spectacular and com- 
plex world ot fantasy. 

$24.95 



NEW 

MICRO-DEUTSCH 

Micro-Oeutsch set includes 24 grammar les- 
sons, covering all material of an introductoi7 
German course. Four test units also included 
Grammar lessons use substitution transformation 
drills, item ordering, translations and verb drills. 
Drill vocabulary based on frequency lists. Suit- 
able for use with any higti scfiool or college text- 
book. Extensively field tested at SUNY Stony 

Brook. AvailaDle (or Apple II and PET/CBM (PET version 
includes a special foreign language character chip ) Also 
available soon. MICRO-FRANCAlS. MICRO-ESPANOL, 
MICRO-IVRIT. MICRO-YlDOiSH MICRO-CHINESE, MICRO- 
JAPANESE $179.95 

ir NEW ^ 

-A- Pythagoras and The Dragon ir 

Mathematics in a fantasy game context. Based 
on The Sword of Zedek, Pythagoras and The 
Dragon introduces Pyttiagoras as a mentor to 
the player. When called on for aid, Pythagoras 
poses math questions, and depending on the 
speed and accuracy of the player response, con- 
fers secret information. With Pythagoras as an 
ally, the quest to overthrovi/ Ra, The Master of 
Evil, assumes a new dimension of complexity. 
Depending on the level chosen, problems range 
from arithmetic through plane geometry. 

32K $39.95 



^--375 



X PROGRAMS AVAILABLE FOR 
I TRS-80. APPLE II, PET & ATARI 

5 Disk or cassette, p/ecsespea/v. N.Y.S. residents add sales tax. 

I All prii^'arrti rrquitt I6K • T/tS-Mprtigramt 'rquirr I Fi'FI I! BA'ilC • APPI ,L prngrams rrquirr Afpleso/t HASIL 

^Sm List of Attmnlaan on ptg* 4 18 



Krell Software Corp. 

21 Millbrook Drive, Stony Brook, NY 11790 

(516)751-5139 
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UTILITY 



A machine-language screen dump routine for the Model IL 



II the Dump 



Richard L. Faber 
Mathematics Department 
Boston College 
Chestnut Hill, MA 02167 



This article describes a 
TRS-80 Model II machine 
language subroutine for print- 
ing all or part of the CRT 
screen. The TRSDOS calls 
VDREAD and PRUNE are used, 
but since PRLINE will not print 
reverse video characters, these 
characters must be converted 



to their white on blacit counter- 
parts after being read from the 
screen and before being 
printed. 

The subroutine, which I call 
Screen (see Program Listing 1), 
can be entered with an editor/- 
assembler paclcage, or using 
the TRSDOS Debug program. 
After entering the machine 
language code with Debug, 
type: DUMP SCREEN START = 
FOOO,END = F033, RORT= R. 
Your Basic program, which 
calls Screen, must Include a 
line such as 10 SYSTEM 









SCREEN 




FB^ 


5E 


IB 


LD El IHL 1 


ir*0. OF LINES -: C 


FMl 


i&;e 


?e 


LD D.58H 


:DECirtAL B« -> D 


FBe:! 


2I35FB 


30 


LD HLiFB35 


I START OF BUFFER ADDH 


FBBfc 


AF 


«e 


K'R A 


I CLEAR A 


FBB7 


323*FB 


3B 


LD (Fa3*>>A 


ICLEAH ROU COUNTER 


FBBA 


ay 


be 


LD B,A 


IROH NO. ■> B 


FIMe 


BEM 


TB 


LD C,B 


ICOL. NO, 8 -> C 


rear) 


3et» 


M 


LD Ai 1 1 


li^READ - SVC 11 


FBOF 


CF 


9a 


RST e 


IRCAD ROU FROn SCREEN 


FBI* 


BbBB 


IBB 


LD e.8 


! CLEAR CHARACTER COUNT 


FBI 2 


OEAB 


I IB 


LD CiABH 


lASCIl FOR 1ST FtEW.WID. 


FB1« 


7E 


12B 


LD »i IHL) 


16ET NEIT CHAR FROM BUFFR 


FB15 


et 


118 


CP c 


1 IS II REVERSE WIDEO' 


FB16 


3803 


lAB 


JR CiFBlB 


i IF N<n SKIP AHEAD 


FfllS 


EEBB 


na 


ton sen 


1 IF IT ISi CLEAR BIT T 


FBIA 


?7 


I6B 


LD (HL 1 1 A 


lAND STORE IN [lUFFER 


PI118 


23 


17a 


INC HU 


[PREPARE FOR NEIT CHAR. 


FfllC 


B4 


lee 


INC P 




FBID 


76 


loe 


1 D A. B 


[ COLUMH HO. OF NEII CHAR 


TBIE 


BA 


2INI 


CP D 


;ARE me DONE PROCESGINe^ 


FBIF 


2eFJ 


21B 


JB fJZ.FBl* 


: IF NOI. REPEAT 


FBl'l 


1'135FB 


228 


LC IIL.FB35 


iSTABT OF BUFFR ADDR 


FBi* 


BEBD 


238 


LD C.BDH 


IBSCIl vCR; -' C 


FBI'S 


3Ei3 


24B 


LP A, 19 


IPRLINE IS SVC 19 


FBie 


CF 


21 a 


RSI B 


iPRINT A LINE 


FBI'<J 


3A3»FB 


26B 


lD A. (FB3ai 


iRt-W COUNT -> A 


^eic 


3C 


278 


INC A 


1 INCREMENT 


FBID 


3:'3<.Ffl 


2B8 


ID IFB34>.A 


!Affl> STORE ROW COUNT 


FB3B 


BB 


2'*a 


CP E 


iTEsr IF LAST ROW 


IB31 


2BD? 


388 


JR Ni.reBA 


! IF NOI. REPEAT 


Fej3 


O 


318 


REI 


!ELSe BACK TO BASIC 






Program Listing 


1. 



3 'PRCiGRAM TO TE5T MACHINE ROUTINE 'SCREEN' 

5 CLEAR 100,&HEFFF!DEFINT A-Z 

10 SYSTEM -SCREEN- !DEFUSR1-8.HF000 

20 INPUT "NO. OF LINES" :L 

:<0 X-USRJ (L> 

A0 END 



Program Listing 2. 



"SCREEN";DEFUSR1 = &HFOOO 
prior to the appearance of the 
function call USR1. (Be sure 
to protect the memory above 
EFFFH from being used by 
Basic.) The top L lines of the 
screen (lines through L-1) can 
then be printed by executing a 
statement in the form X= USR1 
(L%). (L must be an integer 
variable in the range 1 < L < 24. 
Upon return from the subrou- 
tine, X is set equal to L Program 
Listing 2 is a Basic program you 
can use to test Screen. 

Screen uses memory loca- 
tion F034H as a counter for the 
number of rows printed, as well 
as an BO byte buffer in RAM 
starting at F035H. When the 
subroutine Is called, control is 
transferred to FOOOH. When the 
numt>er of lines {L%) to be 
printed is stored in the E 
register, the next seven lines 
Initialize the row counter to 
zero (no lines printed yet) and 
set up the entry conditions for 
VDLINE: buffer start address in 
HL, number of characters to be 
read In D, row and column of 
starting screen location in B 
and C. Line 90 reads a line from 
the screen Into the buffer. 

Graphics and Reverse Video 
Characters 

Now the screen lines we wish 
to print may contain both 
graphics and reverse video 
characters. Most printers can't 
handle the graphics and will 
print blanlts Instead. Reverse 
video characters are repre- 
sented In ASCII code exactly as 
their normal counterparts, ex- 



cept that the highest order bit 
(bit 7) Is a one instead of a zero. 
It turns out that the displayabte 
reverse video characters are 
precisely those displayable 
characters whose ASCII code 
is AOH or greater. 

Lines 100 through 210 of 
Screen make up a loop which 
examines the characters in the 
buffer and clears bit 7 of any 
with an ASCII code of at least 
AOH. The characters are checked 
one at a time using the B regis- 
ter as a counter. 

Lines 220 to 240 set up the 
entry conditions for PRLINE, in- 
cluding an ASCII carriage 
return in the register, and 
print the line stored In the buf- 
fer. In the remainder of the 
subroutine, we increment the 
row counter, F034H, and 
branch back to FOOAH to get 
the next screen line. If we have 
printed the last line, we return to 
the Basic calling program. 

Screen is not relocatable 
because It uses F034H and a 
buffer beginning at F035H. 
However, since all its jumps are 
relative jumps, it Is necessary 
to modify only the references to 
these locations in order to run it 
in a different part of memory. 
This routine works success- 
fully with the Line Printer III. I 
would like to hear from anyone 
who has problems using it with 
a different printer. ■ 

Note: TRSDOS 2.0 contains a 
library command named 
SCREEN; users of this system 
should rename this article's 
subroutine. 
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Expensive 




EXPENSIVE - The/..VVV 
System Expansion // comes with a 
full :12K of 200ns RAM. and buill-in 
RS232c 20 MA current loop serial interface. 
Thai's fur starters. Next, consider our heavy ^iiufje 
steel case, power indicator lamp, gold-plaled 
connectors. FK-4 glass epoxy circuit board with 
solder mask and silk screen lenends. Then there is 
the parallel printer port, screen printer port, real 
time clock, and extra heavy duty onboard power 
supply with over current protection, over voltage 
protection and thermal shutdown. If that's not 
enough then there is the floppy disk controller. 
^;uaraiUeed operation at a 4MHz CIH" speed and 
our 6 month warranty. Every one of these features 
is STA\DARD. This is true system expansion. 
You gel every 'expensive' feature without 
spending more. 

CHEAP - Our price is $399.95. Any way you 
compare, features or price, LNW's System 
Expansion II is the clear winner- The LNW 
System has been field tested for over two years 
with thousands of u.-;ers. It works with any DOS. is 
100'. TRS-80 ModeU compatible and it works 
'right out of the box'. If there is any doubt in your 
mind as to whether you should buy ours or the 
■other guys', just ask an LNW owner! 

WE ARE #/ - Nvnnber one in price, features, 
reliability, performance and delivery. LNW is 
committed io 'expensive" features and quality at 
re8S(»nahle prices. LNW is committed to support, 
thorough dt>cumentalioii, and reliability. 



made u^ the number one 
manufacturer of system expansicm units 

and accessories for the Model I compuier. 

EXPASSIO,'^ OPTION - 8-inch drive capability 
is as easy as plugging in the LSD'iuhU-r .5/H 
option*. Now you can ha\'e any combination of 
single- or double-density, single- or douhle-sided, 
rt"' and/or 5" disks on-line! 8-inch disk storage 
increased to o9L360 bytes - 77-track single-sided, 
double-density or 1.182.720 bytes - 77-track 
double-density, double-sided. 

The ENDoubler's unique 5/8 switch allows you 
to boot from .^- or H-inch system disks and it's 
accessible from outside the interface. The .S219.95 
LSDuiiblcr 5/8 comes with a douhle-density disk 
operating .system (DOS- 3.3,9). tomplcte with 
BASIC and utility programs... ready to run your 
software. 

Each of your present 40-track. single-sided 5-inch 
drives will store up to 181.320 hytes (formatted 
storage) - that's an 80S increase in storage 
capacity for only half the cost of just one disk 
drive. With three 8-inch double-density, 
douhle-sided drives your Model I will ha\e 3,75 
Megabytes of online storage - that's more .-torage 
than a Model II or Model 111' 



►^571 



LNW Research Corp. 



■2tJ20 W ALNIT Tuslin. CA. 92680 
(7141 (ill -8850 (714)544-5744 




■W ' (irnf i-inTui lull reciii 
'l.'iililp drn-iiv ^fnlli^p^ ^1 
iiiiidiliiHii<>ii..i 1.NW.WI4VIH/ 



fr- -|>rc ml I'lihlc. n" 
.:.MH/ err -ii.-fd ti|i 
.umluilir 



nail, ■•! I ^iiiih I <'i|KitMlii'ii 



UTILITY 



This first-class routine cancels a shortcoming 
of Tandy's Mail List program. 



Mergers 



Robert James Lloyd 
23 Fairway Rd. 
Newark, DE 19711 



One of the most annoying 
and frustrating experi- 
ences i liave encountered dur- 
ing my two years of microcom- 
puting is being strapped with 
software designed and written 
for a 16K system. 

I purchased Radio Shack's 
Tape Mailing List about a year 
ago while stili using a 16K Level 
11. With it, I created numerous 
files, each holding 80 names or 
less. After upgrading to 48K, the 
thought of loading such short 
files was depressing. 

Retyping 7000 addresses is 
not my idea of fun. Nor can I af- 
ford to buy duplicate software 
each time my system is upgrad- 
ed. The solution was to include 
several features Radio Shack 
left out. either because of 
memory limitations or lack of 
foresight. 

Since the mailing list program 
is written in Basic. I felt I could 
tailor It to my needs. Program 
Listing 1 shows the necessary 
changes and additions to add 
the function: Merge Two Files- 

RequJremMits 

These alterations cannot be 
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done if you have a 16K system. 
Also, the files you want to merge 
should be similar. If a select 
code is used to create a file, that 
file can be merged only with an- 
other containing a select code. 
Otherwise, the program will not 
operate correctly. 

Merge 

Merge combines two files into 
one. The first must be entered 
using menu option A or R. Then, 
pressing M will allow another 
file to be read from tape without 
destroying any addresses in 
memory. 

Once in memory, a file can 
continue to be merged with 
others, as long as the new file 
does not contain over MFS ad- 
dresses. (MFS is the Maximum 
File Size, equal to 225 addresses 
for 32K and 375 for 48K.) 

Line Changes 

Delete line 5. The reason for 
this IS described in the next sec- 
tion. Changing line 30 allows M 
to be a valid menu option. Line 
65 simply moves the menu dis- 
play down one line, thereby 
making room for Merge Two 
Files. Since line 100 checks to 
ensure a proper menu selection, 
the IF statement is changed to 
accomodate the addition. 
Because line 110 makes use of 
the ON... GOTO... function, 
another line number is added. 
Including M in line 20000 allows 



the program to recognize Merge 
as a valid selection. 

The amount of memory 
cleared must be changed since 
we are adding more program 
lines and will not be able to have 
files as large as an unmodified 
program allows. Next, variable 
HI is reset. These changes are 
made in a new line 5, taking the 
place of the line we deleted. Line 
61 adds Merge to the menu dis- 
play. 

Lines 19100-19230 are added 
to incorporate Merge in the pro- 
gram. Instructions are printed 
on the video display via lines 
19100-19150. 

Set up the recorder, press 
Enter, and the number of items 
in memory is displayed (line 



19160) and variable K is set 
equal to that number (line 
19170). 

Next, the recorder is activated 
and the number of items con- 
tained in the cassette file is en- 
tered (line 19180). Line 19190 
displays this number. Should 
the total number of items be 
greater than MFS, the program 
returns to the menu without 
completing a merge (line 19200). 

Line 19210 sets variable N 
equal to the number of items in 
memory plus one. This causes 
the next item read in from tape 
to be numbered correctly. De- 
pending on whether a company 
name was used as part of an ad- 
dress, the program branches to 
the correct input routine (line 



b irHEH>39BBBCLEAi'3ieee:ElI-376EL£ECL£ARie3eB:lil'226 

31 POKE16553, 25^: RESTORE: FORI -1TC7:READBE[I) : NEXTiCLS : PRIWT*!? , * 

NAILING LIST SVSTE«":PRINTS131, "OPTIONS AVAILABLE" 

61 PRINT" <H>ERr.E TWO FILES" 

65 PRINTe779,"* I OF NAMES IN LIST-";N;" *" 

lea IFESID-ASTHENllBiELSEI-K-liIFKBTHENlBBiELSESB 

IIB ON I GOTO 12B, BBB, 9BB, eBB, 2BBe, 7Be, 191Be 

191BB CLS: IFN''BGOSUBllBBeiGOT03BELS£PRINT»24 , "MERGE TWO FILES" 

1911B PHINTS12B,*WHEN T*>C FILES ARE MERGFD, THE TOTAL NUMPEB OF 

ADDRESSES" 

1912B PPINT"HAY NOT EXCEED " ; HI " ; " . " :PRINT ; PBI V:"IF THE FILES AR 

E TOO LARGE TO BE MERGED, TfF PROGRAM WILL" 

19130 PRINT'RETUHN TC TiiE HENL'." 

line PRINT:G0SLB12>Be 

isise iFAs-"E"THEN3e 

19160 CLS:PR1».T"THERE ARE " ; N ; " ITW IN «EKOH\," 

1917B K-N 

191BB INPL'T#-1,M,C,K 

1919B PRINTtPRINT'THE FILE TO BE MERGED CONTAINS "jN-l:" ITO(S." 

192BB IFK+N>H1PHI»T:PRINT"THAT IS TOO MANY ITDIS ":N-p;:F0RDD 

-lTO5BB:NEXTDD:C0TO3fl 

19118 N-ml ; PRINT: PHINT"FILE IK BEING MERGED." 

19229 IFM-6GOfi[)B14B7BELSEGOSUB14B5B 

1921B PRINT: PRINT'HERGE IS COMPLETE" : FORDD-iTOBBB :NEllTDD:GOTOJ# 

2SBBB LATA A, R , S , 1, , P . W,Jt 
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FEATURES 
YOU'VE NEVER SEEN BEFORE. 

• Hardware total screen iiiverw viJcu 

• Two modes oi density: 

384 X 192 or 192 x 192 for Model I 
512 X 192 or 256 x 192 for Model III 

• Every dot can be set, reset or tested, 

• 1221W b)'tes Video Memory 

• Select nonnai high or very high resolution with or 
without inverse video via output port. 

• OiJ^able Mikeean^elo •- nKm-'rv vi^ mitpnt nnrt 



- ^ MtKttANQLEO i» a UMCnurk lor MiK*« EiKItonKs Corp 
■} IRS ao It a trtotmam tw ot Tirtty Co(i> 

■1 Ouerl.rnj your T«9-B0 *«ir V(Xfl tTt WmUti iWrtWilf 

'* 90 tin WMfKnly lull lalund or tcitiKtr^'tl 

Introdttctory Special for 90 days only! 



Designinj; a computer that people couid use in business and leisure 
without spending alot of money was oiico a problem Thank!^ to the 
TRS 80* there arc now over 200,000 Microcomputers in homes and 
busine&s today. 

Unfortunately in keeping the price of the TRS 80 down the Random 
Access .Memory was kept down to only 17K. Yi» 17K [I5K User Memory 
ard IK Video Memory. 128 x 48 or b.\U Incleptntknllv controlled do*s.| 
WV WE VH CHANGED ALL THAT 

NOW HIGH RESOLUTION GRAPHICS 
ARE HERE! 

MIKEEA\GELO is 16 timps better with the Model 111 
and 12 times belter for the Model I. 

Thai s 512 x 192 or 98,304 dots for Model III 
and 384 x 192 or 73.728 dots for Model I. 

MIKHEANGEIX) connects lo your TRS 80 easily ' You can do it 
yourself with our instruction book in minutes and a handy tool kit is 
available, if you need one for $15. Please specify Model I or 111 
TRS80 

Order Now For Only $340. Complete 



(llikt ladib .iirvfili'li' wkh p 
tflamty 0*ilrt filriw. -* 



II ' >«(: iiitlHirr Mkj itttlli'rri nunul U 1140. (Vik 

Or wntp (rr frrr bnAli^ irt! morr inlomwdn 




ii:i 



MIKll. 1.1 i:i IKONUSlORmRAflON 

P.O. httx 3813 Bcllivuc, Washinjtton 980O9 

rpl<>phonc20bi451-(li74 

iotry K CO D y.xi k 60 irfi ro» Jciwctv 
M&hj^lon rmdrn^ Kusi add S M laks tit 
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Poor 

Man's 

Floppy 



HIGH SPEED CASSETTE SYSTEM 



Now (he widely acclaimed 
JPC Cassette System is available 
for your TRS-80' computer. 
The price is only S90.00 

IL-K CuNMrUe S>sletn 
.ll*( Producis 
Alhui|uer(|iir. ^M 
kil: %*Hi 
AsscmbM: $120 

b> Cart A. KollHr 

1 guess I dor'i have to tell any TRS-80 owners 
how fruslranng Ihe cassette sysiem thai 
comes with the computer can be. tven with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like me. after you've just plunked 
down a chunk of money for a Level II 16K ma- 
chine, "you ain't got nuttin left" for even one 
disk drive at 500 bucks apiece. So you suffer, 

A reasonable alternative is the Exalron 
Stringy Hoppy (ESF). This will cost you about 
250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've had one of these for about six months and 
love it! 

But, if the price is still too steep, have 1 got a 
device for you! 

The Device 

The February 1 980 issue of Microcomputing 

had an ad that intrigued the hell out of me. It 
was a high-speed cas,sette system by JPC Prod- 
ucts acclaimed as a "poor man's floppy." It 
made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a lO-minuIe cassette," "less than one 
bad load in a nnllion bytes with ihe volume con- 
trol an>'whcre between one and eight." 

All this for a mcasK 190] bucks'' How could 
this be? A call lo Albuquerque answered a lc\^ 
questions: Yes, it had its own power supply, 
and, il stored programs five limes faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of ihe rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. JPC 
would make it work, if you couldn't— for free. 
I was sold. I placed my order, and il arrived 
about two months later (parts shortage), 

1 work in electronics, so 1 found the unit c\- 
cepiionally easy to build. It took about an 
hour. The manual is superb. (That's better than 
great.) It was clear, concise and exact with no 




FOR TRS-80 
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ambiguities. Important parts placements are 
stressed {polarity markings on clectrolyiics, 
bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. The board quality is excel- 
lent. It is double-sided and parts locations arc 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and plaied-through 
holes for connections to traces on the other side 
of the board. 

Also, there are absolutely no adjustments or 
scttmgs to bother with. 

The documentation is a sheaf of S!': x 1 1 pa- 
pers stapled together. It is written in the nicest 
format I've seen in a while, hach command 
and/or subjects is covered on its own sheet in 
large type. All explanations are in easy to read 
English — not computerese. 

Commands and Features 

SAVF"filename'": Saves your BASIC pro- 
gram on cassette. 

LOAD: Reads the next BASIC program from 
the cassette, 

LOAD'Tilename": Searches for and toads the 
specified file from casseiie, 
LOAD? and LOAD7"niename ": Reads Tile 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" key, 
LOADN"filenanie": Same as above except the 
tape will siopai the end of the program named, 
KILL; Removes the file manager program 
from memory so thai the extra memory can be 
used by large programs, 

RSFT: Allows the operator to rewind and posi- 
tion the tape on tape recorders that have these 
functions tied to the motor control jack, 
RL'N"niename":TC-S searches lor a specified 
program and runs it immediately. 
PL'T"filename": Same as SAVE "filename", 
except il is for use with sysiem tapes, 
GET: Same as LOAD, except il is for use with 
system tapes, 

GET"filenanie": Same as LOAD "filename", 
except it is for use with sysiem tapes, 
GET? and GEr?"filename": Same as 1 OAO? 
and LOAD?"filename". except it is for use 
with sysiem lapes. 
CETN and GF.TN**filenaine": Same as 



LOADN and LOADN" filename", except il is 

for use with system tapes. 

OPEN: Required Iwl'ore cassciie input or oui- 

pul of a dala file can be ailcmpied. 

CLOSE: Required lo end a cassette data file, 

PHIN ' *: .'MIows numerical or string dala lo be 

output lo a cassellc file. 

INPl'T*: Allows numerical or string data to be 

inpui from a cassette file. 

1 haven't counted ihem, so 1 don't know 
about ihe "one load in a million bytes" claim, 
bul my son. Anlhony (age 1 1 ), loaded about 30 
of his programs from his Radio Shack format 
lape lo a new TC-8 formal tape. He's run ihem 
all and found no bad loads, 

L'nhke the standard lapesvstem, you can po- 
.sition your tape anywhere before the program 
you want and nol have lo look for a blank spot 
between programs. The TC-8 paiieiill> waits 
for the program you want and then starts load- 
ing without getting confused by the portion of 
the previous program you just fed it. 

Try thai on your regular cassette system; 
you'll wear oul the reset buiicm, ■ 

OKDKK NOW 

To order your It -8 kil, send your check ot 
money order lor S90,IX) plus $3,50 postage 
and handling lo JPC PRODUCIS CO,, 12021 
I'aisano Ct,, Albuquerque. N!v1 S7112 {New 
Mexico residents add 4T(j sales lax). Credit card 
orders accepted by phone or mail. Personal 
checks will delay shipment. W'e will otherwise 
immediately ship you theTC-S kil, the cabinet, 
the ribbon cable, the power adapter, an insiruc- 
tion manual, and a cassette containing the 
software. 
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PC PRODUCTS CO, 
Phone (505) 294-4623 
12021 Paisano CL 
Albuquerque, N.M. 87112 
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10220). Finally, lino 19230 is dis 

played when Merge has ended 
and returned the menu. 

This newly created file may be 
sorted, displayed, searched, 
printed, saved, or merged again 
with another file via the appro- 
priate menu option. 

Printing Labels 

There is no way more than 
one label per row can be printed 
using the program as purchased 
from Radio Shack. Again, the 
soiution IS program modifica- 
tion. If you wish to modify the 
print routine, follow Program 
Listing 2. 

Ling Changes and Additions 

The change to line 2Q70 mere- 
ly allows lines 2081-2083 to be 
executed By making the change 
to line 2210, variable I is in- 
creased by the number of labels 
across. Deleting lines 19001- 
19010 (original print routinel 
makes room tor the revised pro- 
cedure. 

Variable XX in line 2081 is the 
number of labels across, and 
must be entered when prompted 
by the computer, even if you are 
printing only one label at a time. 
Line 2082 sets 2Z equal to the 
character width of the label. If 
you do not know this figure. 
print a row ot tetters across the 

label. Make sure the first char- 
acter Is aligned with the label's 
left edge. Count the number of 
characters across the width of 
the label. This is the number to 
be entered. Line 2083 adds 1 to 
variable ZZ sjnce the labels are 
normally spaced one character 



apart from each other, if your 
label stock is spaced differently, 
change line 2083 to add the cor- 
rect number. 

Now add lines 19001-19007 
(new print routine). These lines 
work m the same fashion, so I'll 
describe only 19001, 

The For. . .Next loop repeats 
according to the value of XX. 
First, AA IS equal to zero. The 
name is printed and if AA does 
not equal XX, a string of blanks 
is printed until the next label is 
reached. After the correct num- 
ber of names are printed across, 
the paper is advanced one line 
and either the street address or 
company name is printed. This 
process continues until the en- 
tire file IS printed. 

Summary 

Adding Merge and changing 
the print routine helps make the 
Tape Mailing List much more 
versatile with a minimum of ef- 
fort, and, best of all, at no addi- 
tional cost. 

As stated previously, these 
changes were designed for an 
unmodified program. If you have 
added other things, or made 
changes, you may not be able to 
incorporate either of these new 
features, A little experimenting 
should provide the answer, 1 
have tried these program modifi- 
cations, and so far, have not en- 
countered any problems, 

I would like to give credit to 
Radio Shack for providing a 
complete listing "in case you 
want to,., modify it,..", and 
hope they continue this practice 
with future software.B 



5 lPMEH>39BBBCLEAR31BBBiHI.376ELSEIFnE(l>19BB9CLE«(lB39BiHI-226 

IB [lEFINTI-N,G,E:,r,S:DI«FIS[HI»5,61 

2B70 IFG'::;ll,N!L-a:GTTO2a81iELSEPItINT"DO YOU WANT TO PRINT THE CO 

«PA(JV KAKE ON THi: LABELSlK/Nl?*::GOSQBgaOfl 

2081 PRIOT:PRINT:INPUT"HOW MANY LABEli ACROSS-jlUt 

2982 PHINT:INPUT*HOW HANV CHARACTEBE ACROSS PER LABEL-jII 

2083 ZZ>ZZ<1 

2 21 a GOSUB18BBB:I*I»!Ut;IFl<-NTHEN218BX 

19801 r0RAA.9T0XX-l:I-PRll*TFlSU*AA,»];ilFAA<>XX-lLPBlNTSTRINGSU 

Z-LEN(FIS;i-AA,e) ) ,32) ; : NEXTAA: LPRINTCHRS 1 138) i ELSEPRINTCHRS 1 1 38 

; :NEXTAA 

19BB2 1FE-!FORAA=BTOXX-1!LPBIMTF1S(1*AA,11 iELSE19BB4 

19883 IFAA<>XX-lLPRIKTSTRlNGSUZ-LENlFISa*AA,l)l . 32) ; : NEXTAA: LP 
HlNTCHHSUJa) :ELSELPBINTCHBS(1381 iNEXTAA 

19884 F0RAA-BT0XX-1:LPBI(JTF1S1I+AA,2) : : IFAAOKX-ILPWI NTSTBINGS I I 
Z-t.EH{F:SU*AA,2) ) ,321 ; : NEKTAA : LPHINTCHBS (13 8] : EL.'SELPRINTCHRS ( 13 
8) iHEXTAA 

19H5 F0RAA-eT0XX-l:LPBIWTFISII*AA,3) :" •jFISII-.AA.Oi'-'iFIS 

II*AA,51; 

19M6 IFAA<>XX-lLPHINTSTRI'iGS(ZZ-l!.EN(FISlItAA,3) 1 *LEN ( FI S ( I *AA , 

«) ) 'L£NIF1S{I*AA,5) ).S1 ,321 ; : NEXTAAELSENEXTAA 

19197 LPHltJTCHBS11381 .-LPBI NTCHRS i 138) : LPBISTCHRS ( 133] 

2981 PBINTiPfllNT; INP'JT'ilOM MAHY LABEL2 ACBOS£*;XX 
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THE PROGRAMMER'S GUILD 

MEANS 

ADVENTURE! ! 

GAUNTLET OF DEATH 

This new style of Adventure features an 
exclusive TRAPMAZE" format in which 
escape is the primary concern. You are 
THORAN THE BARBARIAN, under the 
power of the Tyrant of Graylockland, 
accepting the challenge of the most deadly 
dungeon known to man. In the GAUNTLET 
OF DEATH you are pitted against 
mechanical devices that sling darts with 
uncanny accuracy, deadfall traps where a ton 
of pure marble can crush you in an instant. 
You can find potions which may or may not 
help you in your struggle. You may find 
treasures worth SURVIVAL POINTS against 
the ultimate confrontation of the LAST 
ROOM. Can you survive? Can you make 
your way through the maze of invisible traps 
that keep you from your mission? THE 
GAUNTLET OF DEATH. Tough, unyielding, 
the absolute deadliest of challenges. Will you 
make it? or will you die trying 
TAPE ONLY $19.95 

THE DOMES OF KILGARI 

In the far reaches of the Outrim.the 
Adventure continues. For those who've been 
waiting so long, the sequel to the classic 
DEATH DREADNAUGHT ADVENTURE is 
here at last. You barely make it to Kilgari 
before your fuel is exausted. The Interspacial 
Digitron Corporation has boobytrapped the 
Ion fuel center. Your job though traditional 
adventure format is to overcome all traps and 
retrieve the ion rods necessary for your 
survival and continued journey. THE DOMES 
OF KILGARI. Classic! Adventure at its best. 
$19.95 TAPE $29,95 DISK 



COMPUTER MAIL ORDER IS HERE! • ! 



Programmer's 



PO B0'66«Pele'l>o<OL.qn NH 0J4M • 603-9;<.60t5 Voice • 60J.«4./9?0 0»'» 
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UTILITY 
LOAD 80 



A timesaving shift-entry utility. 



The Sentry 



Jim Rastin memory locations usually point 

316 Briarhill Avenue to 42E9H upon power-up- The 

London. Ont. N5Y 1N8 call 1B49 (New) will set all other 

Canada pointers to reflect this change in 

start location. So. SENTRY is 
placed in low memory and the 
Basic pointers changed, rather 
than in high memory (which 
would require you to reserve 
memory). 

The Program 

Load SENTRY under the Sys- 
tem command, then type Enter. 
It may appear that the program 
doesn't work, but the screen is 
supposed to look as If you had 
just typed New. 

To see the SENTRY keys type 
Name and Enter. The screen 
will clear and display a mes- 
sage. Now push the break key 
and all the SENTRY keys will be 
displayed. By pressing the shift 
key and the corresponding let- 
ter, the displayed word will be 
written on both the screen and 
in your program. The up-arrow 
signifies that the enter key will 
be part of your entry. 

You may change any or all key 
entries by: 

•Typing Name or shift Y. 

• When you see the mes- 
sage, type your SENTRY 
letter. 

• Now type up to seven char- 
acters for that letter to 
represent. It is not nec- 
essary to press the space 
bar as the program will do it 
for you. 

• When you have typed the 
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Anyone who has suffered the 
frustration of keybounce 
while program writing will 
appreciate this program. I call it 
SENTRY, and it is similar to 
TSHORT and other shift entry 
programs, 

I wrote SENTRY with the help 
of Small Systems Software's 
RSM-2/D Monitor; TRS-80 Super- 
map, by Fuller Software— very 
helpful in finding points in ROM 
and some of the memory loca- 
tions between 4000H and 
42E9H; and the Software Tech- 
nical Manual, by Houston Micro 
Computer Technologies. 

Protected Mamory 

When you buy machine lan- 
guage programs, you must re- 
serve memory when you see the 
Memory Size question (e.g.. Ra- 
dio Shacks Renum Program). 
SENTRY protects itself from be- 
ing over- writ ten in lines 150 
through 180 as well as 2440 (Pro- 
gram Listing 1}. These lines m- 
dicate that the end of the pro- 
gram is in memory locations 
40A4H and 40A5H. 

The call 1B49H in line 170 
does the same thing as typing 
New in Basic. Memory locations 
40A4H and 40A5H or 16548 and 
16549 point to the t>eginning of 
the RAM area for Basic. These 



desired word, press the 
break key to see the display 
of all words including the 
one you changed. 

• If you want an auto Enter, 
just press Enter when you 
type in your word. It will be 
displayed as M until you 
press Break 

You may type Name and 
Break anytime to see the SEN- 
TRY keys without hurting your 
program (during a list or while 
typing in a listing). (See Table 1.) 

DOS Basic users may use this 

program, but must do a little 

more work to get started. To use 
it with disk Basic you must do 
the following: 

• Change line 100 to read 
ORG 6CB3H; 

• Put SENTRY to disk; 

• Call Basic: 

• TypeCMD"!", SENTRY; 

• Type SYSTEM (enter); 

• Type/27827 (enter). 

If you use BASICR and type 



NAME, it will renumber your pro- 
gram but will not allow you to 
change the SENTRY keys. 
Therefore I suggest you use 
SENTRY with Basic and not 
BASICR, 

How It Works 

Lines 110 and 120 load the 

start of SENTRY into locations 
4016H and 4017H. These loca- 
tions are used to interrupt the 
keyboard scan. Lines 200-300 
check to see it a key is pressed 
and if so. check to see if it is 

Shift A-Z. If not the screen is un- 
changed. 

If shift A-Z are pressed then 
lines 310 through 360 calculate 
which word to display as the 
value of the pressed key. 

Lines 380-460 multiply that 
by eight as each word occupies 
up to eight bytes. The word to 
display, therefore, starts at 
TBL-(-8, or in this case SAVE. 
Lines 500-1200 contain a table 
of SENTRY keys. Level II users 



A = 


AUTO 


B 




SAVE- 


c = 


HIGHTfc 


D 


= 


DELETE 


E = 


EDIT 


F 


= 


FOR 


G = 


GOTO 


H 


= 


GOSUB 


1 


INPUT 


J 


= 


IN KEYS 


K = 


CHHS 


L 


= 


LIST 


M = 


TIMEJ 


N 


- 


NEXT 


= 


OUT254. 


P 


= 


POKE 


Q = 


RETURN 


R 


- 


RUN1 


S = 


SYSTEM' 


T 


- 


THEN 


u = 


PEEK( 


V 


- 


LOAD 


w = 


ELSE 


X 


= 


M1DS( 


y = 


NAMEt 


z 


= 


LEFTK 


Table 1. Definition of Variables 



SOFTWARE CONCEPTS 

Dallas, Texas 
NOW - MORE THAN SPECIAL DELIVERY 



SOFTWARE CONCEPTS 



OTHER FINE SOFTWARE 



Who IS Software Concepts? We are the originators 
of Special Delivery wordprocessing software for the 
TRS-80. We are now expanding our product line to 
include items used in our daily business operations. 
We consider tdese to be better than any other 
product we have tried for its price/performance 
ratio. If we sell it - we use it! 



SPECIAL DELIVERY 



■■- /' you're presently looking tor a mailing list 
processor, this represents the current state of the 
art. ■■ 
80 MICROCOMPUTING - 80 REVIEWS -- JULY 1980 

SPECIAL DELIVERY is the best mail list processor 
available for the TRS-80. |ust ask our customers! 
Use Special Delivery to maintain your mailing list 
with fill in the-form ease. You create, edit, sort, 
extract, and otherwise manipulate your mailing list 
with the speed and ease of use possible only in 
100% machine language software. Special Delivery 
will merge data from the mail list into a letter 
created by your own text editor (Scripsit. Electric 
Pencil, etc.) to generate a "personalized form 
letter" to any or all names in the list Print free 
term mailing labels, envelopes, even legal docu- 
ments! Print any character (including escape 
codes! your printer is capable of printing! Boldface 
and underscore is supported for most printers, now 
including the Daisy Wheel II! 

SPECIAL DELIVERY includes: 

MAILFORM data entry at its best, |ust fill in the 

form! Sort, extract, page forward and back, insert/ 

delete, more! 

MAILRITE print letters, etc. created with your 

editor while inserting text from your MAILFORM list. 

SEVERAL printer drivers (EDAS source code as well 

as /cmd tilesl, and letter and list samples to get 

you started. 

XTRA! SPECIAL DELIVERY includes: 
EVERYTHING in regular SPECIAL DELIVERY. 
Enhanced MAILRITE with the ability to print varia- 
ble text from a "KEY" tile (greatly expanding the 
capacity of each record in your list], 
MAILABEL 1, 2, 3, or 4 across label printer. 
MAILSORT: will sort by any field, a full 40 track 
double density data diskette (over 1500 names) in 
only48K! 

ZIPSORT sorts on zip only, but will handle over 
4500 names! 

NOTE TO 
REGISTERED OWNERS 

Registered SPECIAL DELIVERY owners can upgrade 
to XTRA! by returning their ORIGINAL disk with 
J74.00 + J2 00 shipping and handling. 

FOR YOUR MODEL I OR 111: 

(requires minimum of 32K, single drive) 

SPECIAL DELIVERY J125 

XTRA SPECIAL DELIVERY J199 

FOR YOUR MODEL II: 

(requires TRSDOS version 2.0 & does NOT work 

with Scripsd) 

SPECIAL DELIVERY J199 



ALL NEW ELECTRIC PENCIL!!! 

r40W AVAILABLE FOR THE MOD III! While the original 
PENCIL set a standard that other editors have yet 
to achieve, the NEW ELECTRIC PENCIL reaches even 
greater heights with many exciting new features 
that make it the easiest-touse text editor available 
for the TRS-80 Mod I or ill!! 
Electric Pencil version 2 J84.95 

EDAS 

This IS the assembler from Misosys which is used 
for all assemblies of Special Delivery. We had real 
headaches until this came along. A must for any 
assy, language programmer. 
EDAS MOO I/MOD III J75.00 

THE DISASSEMBLER 

This IS Simply the most advanced disassembler we 
have ever seen. Creates EDAS source code, inserts 
predefined labels, disassemble disk or memory, 
generates ORGS & EQUates. By Ed Stitt. 
THE Disassembler W9.00 



LOGS 

Features previously available only on a 
mainframe. Real powerhouse DOS. Good 
support. 

NEWDOSgOV2.0 

See above. Fantastic BASIC enhancements. 
The well equipped software developer will 
own both LDOS & NEWDOS but one or the 
other IS a must 

LDOS J159 00 

NEWDOS V2.0 $145.00 



HARDWARE 

DATA SEPARATOR 

The PERCOM lifesaver. If you have a MOD I with disk 
drives and no data separator you have problems. 
Order from us or PERCOM but get a data separator. 
Data Separator J27.95 

DOUBLER 

Another PERCOM breakthrough. Add double density 
to your MOD i Includes built in data separator. 
Doubler 5165.95 

DISKETTES 

20 Name Brand diskettes packaged in bulk Re- 
inforced hub, double density, double sided. 
PkgDf20 $55.00 

GREEN SCREENS 

Not much difference between green screens but 
everybody should have one. It you don't buy ours, 
buy theirs. 

MODI/MODIII $17 95 

MOOII/LEEDEX 100 $22 95 

hlODEL II INDEX 

Now find everything yoi need in your Mod II manual 

with this super index and cross reference. 

Index $17.95 



NEC 8000 Computer 

Z80a compatible, 4MHZ, 64K ram. color supported, 
RS-232, 163.8K per disk, parallel interface, 5 
function keys, numeric keypad 

NEC 8000 keyboard unit $1200.00 

Green phosphor screen $250.00 

Expansion Interface $800.00 

DiskDrives (2) $1200,00 

Parallel Printer Cable $44.00 

EPSON PRINTERS 

Epson has become the standard by which other low- 
cost printers are measured. Higtily recommended! 

MX80 $500.00 

MX80F/T $650.00 

MX70 $419.00 

MXlOO $785.00 

PrinterCable $35.00 

TRS80 Bus Board/Cable $100.00 

GRAPHTRAX80 J80.00 

Ribbons $14,00 

Print Heads $28.00 

Apple Board/Cable $1 10.00 

DRIVE TABS 

Dress up your system with professionally engraved 

drive number tabs. Numbers thru 3 Avoid 

confusion. 

SetDf4 $3,50 

PRODUCTS WANTED 

If you have a machine language program that is the 
best there is. contact Software Concepts. We are 
interested in publishing all first rate software 

DISCOUNTS 

Users groups and computer clubs, write for group 
discount information. 

Al products are wanantied as specified by the 
manufactirer. Liabftty of Software CorKcpts rs 
farited to ttie deivef y of undanuted merctianche. 

OTHER SOFTWARE AVAILABLE. 
Cal if you don't see wtiat you need. 

Add 3% Shippings Handling 
Texas Residents add 5% Sales Tax on 

all hardware items. 

Specify whether MOD I, II. or III when 

ordering. 

* CALL COLLECT * 

(214) 247-8731 

MasterCard & Visa charge customers 

may leave order on 

Micronet 70130,232 

SOFTWARE CONCEPTS 

13534 Preston Rd. Suite 142 
Dallas, Texas 75240 ^299 

Dealer enquiries mvited. 

TRS-80 & Sciipsit are Reg Iraderrarks of Tandy Corp 



r'Sv^Uslor Aflvwrtismrsonpagm4^B 



80 Microcomputing, December 1981 • 243 



may want to change line 540 and 
1070 to read 'CSAVE" and 
'CLOAD", respectively, to re- 
flect Level II tape commands. 
Because all entries can be no 
longer than 8 bytes, you must 
also delete lines 560 and 1090. 
Lines 1220 through 1650 display 
all words from the table to the 
screen. 

Lines 1670 through 1700 dis- 



play a byte in the A register to 
the screen while lines 1710 and 
1720 change the command byte 
CD (enter) to display the up- 
arrow when the listing is dis- 
played. Lines 1740 through 1800 
print a message pointed to by 
HL to an area pointed to by DE. 
Lines 1820 through 2370 allow 
for the change of SENTRY keys 
and then display them.H 









Program Listing 1 






ijf^ii 




tl 1 SHIrl ENTf V 


- WRITTEN BY III 




1)991 




• II J L>! SASTIN 3 i* 


BBIAHHILL AVE III 




mil 




III Losaos asTAHio 


S5I 


sa CANADA III 




)(t)3 




IIIIIIIIIIIIMMIIII 


IMIIIIIIKKIIIIItt 




>«*«4 




mil s.M :i r 


ESTPl MIO 




t*l«5 




iiiiiiiittittiiiiiii 


tll(ll(ll(llllllllll 




III96 


* TkIS ntCH^HAK CAS BE jE 


r '*:th level i; -in disc basic ■ 




t(*9 7 


' TT 


:i ALHCAI.V SE7 t .II' LEVEL 


II. ID VSE kirn TUS-OOS ■ 




t(*9t 


■ CHAKOI: OKi:. 


IN LL-a :*( 


TO tCBJH «KD SIAS CALL 1 •( • 




B««99 






L : -.E 




i;e9 


IIIBB 




OBC 


12F9i4 




: START OF 'JSER HA^ 


tjES ;iiH3 


Bill* 


EGIS 


LD 


HL.STW: 






42£:c :2i64e 


gB12B 




L,D 


: 4aibHi , Hi 




;K£Y SCAN INTERRUPT 


42£P 216A44 


UBne 




:,D 


HLiSENTtY 




;TYPE NAME 


ilT2 118F41 


*ti4a 




LD 


I4l flFH) .HI 




; TO CHArWE WORDS 


*JF5 2lt44i 


B«i5e 




LD 


HLrEND 






42ri 22t,Hf 


iBiea 




i.n 


(4aA4Hl ,Hl 




;PTR. TO STUIT OF BASIC 


t^ru CD491 B 


»tna 




CALL 


iQ4qH 




;CALL NEW 


4!FE C;37iBl 


BBIS* 




JP 


TJH 




:J1."HP TD BASIC 




BI19* 


SHIFT ENTPry p&OiLHA!! 






4)il 2A2r4! 


II2IB 


STWir 


L3 


HL, ;STC?L' 




;POIVrS 7i sm DIGIT 


4314 7E 


aefiB 


liRZTE 


LD 


A, laLI 




iCHECir POINTtB 


4)1! B7 


11221 




JB 


A 




; F0» LETTER 


«}*( 28IC 


II23I 




JS 


I. SCAN 






Uti 1A994I 


**:4I 




LQ 


A, [4^99-. 




DINKEYS STORAGE 


4)«B E7 


II2^I 




OB 


A 




iCHECi' FOR |:EY 


41IC 2ltE 


Il2tl 




JB 


SZ.SCAK 






4JIE 7E 


1*27* 




LD 


». iHL) 






431F 23 


11231 




INC 


HL 






4311 22!P43 


8029* 




L.D 


( STORE 1 ,H 






4JI] C9 


ea3aa 




RET 










aB3B5 


'III 


CrtANGE NEXT CALL Tl! 13DSK 


FOR TRS-DOS IM 


4314 CDE3B3 


)B3ie 


SCAN 


CALL 


e3E3H 




;SCAN KEYS 


4317 F5 


IB32B 




PUSH 


h? 




;SAVE A 


43H FE7B 


«(33> 




C? 


7BI1 




;CHECR FOB AEKJVE Z 


43U 3111 


M34a 




JB 


NCFIN 




:R£T IF TOO HI 


431C D6 61 


**35* 




SUB 


6111 






4)IE lain 


**34B 




JR 


CPIS 








<*3^l 


Ml 


CALCliLATE 


W!RSI TO DISPLAY 


III 


4121 sr 


l«)B* 




LD 


L.A 




;HL CONTAINS 


43!1 2611 


BBllt 




LD 


H,a 




*-25 


4i2] li 


II4II 




ADD 


HL.HL 




;HULT11'LY HL 


4324 2) 


*I41I 




ADD 


HL.HL 




: BY 


4J!i 29 


■ t42t 




ADD 


HL.HI, 




* 


4326 I13I43 


«(43i 




LD 


BC.TBL 






4329 19 


II44( 




ADD 


HL.BC 




; (HLI->>WOU) 


43;a ki 


ia45a 




mr 


>if 




;GET A AGAIN 


412B ISDI 


■ ■4tl 




jn 


WBTTE 






432Q Fl 


**47l 


FIN 


POP 


Af 




,GET A 


t]2E c:9 


a*4SB 




RCT 








mr 3843 


aa49e 


STORE DE-W 


TlJL->7 








aB5Ba 


;tlt 


TABLE OF 


SHIFT ENTUY 


KEYS 


It) 


4J31 41 


aB51B 


TBI. 


DEFH 


'AUTO ' 




>h 


433( 1181 


BB52B 




DEFW 


1 






433S 11 


ais)i 




DErs 


1 






4339 &3 


1*541 




DEFH 


■SAVE" 




:s 


413E IIK 


*t^Si 




DEFH 


1 






4>4( «« 


• *5>l 




DEFB 


1 






4341 ^2 


M57( 




DEFH 


'HICBTK ' 




:C 


4)41 ■■ 


**5S* 




Dtre 


I 






4)41 44 


l«5«l 




DEm 


'DELETE ' 




;D 


4)%l ■■ 


ll(*« 




Dcrs 


* 






4351 45 


• ■611 




DEFM 


'EDIT ' 




:E 


435e ■•■■ 


ff62* 




DEFW 


* 






4iis ta 


OK 3* 




DEFB 


a 






43^9 46 


*«I4I 




DEFN 


'FOR ' 




;f 


435D 0eD« 


*t6;i 




QEFW 


B 






tliT »t»t 


eiiea 




DEFW 


B 






4!61 47 


ees7B 




□ EFM 


•GOTO ■ 




:^ 


4166 t»»» 


ei«aa 




DEFW 


B 






4369 •« 


((191 




DEFB 


* 






4)65 47 


• «7B* 




DtfH 


'GOSUB ' 




;H 


4)6r ■■«< 


ai7if 




DEFW 


« 






4371 49 


BB72I 




OEFK 


'INPUT ' 




;! 


4177 lit* 


**T3a 




DEF« 


■ 






4)?» 49 


(*74l 




EEFB 


'IN«EYi' 




:J 


4)7P llll 


• *7 5l 




DEFW 


t 






4)11 41 


*a76B 




DEFN 


'CHBS ' 




:K 


4lab )()l 


Ba77t 




DEFW 


1 






43*1 II 


1*7 Bl 




OtTB 


« 






43t9 4C 


))7 9« 




DEfPI 


'LIST ' 




.•_ 


433E IRIB 


aaaa* 




DEPK 


* 






4391 ga 


BBSIB 




DEm 


B 






4391 54 


B*B2B 




DEFH 


'TiHES' 




:N 


4396 IB 


Bee3B 




DEIB 


a 






4397 BBBB 


eBS4B 




DEFW 


B 






4399 4£ 


13659 




DEIK 


'UEXT ' 




!N 


439E IBBB 


ieB6B 




DEfW 


a 






t3S» »» 


*tB7a 




DEFB 


B 






43A1 4P 


ttBSB 




DEFH 


'OUT254, ' 




tO 


41Ag B> 


**e9* 




DEFB 


a 






43K9 5* 


(*9af 




DEFH 


■POKE ■ 




. t 


43AE iltl 


■111* 




DT.f 


i 






4)Bt ■■ 


**92* 




DRFB 


* 






43B1 S2 


**93* 




DEpr 


'.'(ETVI'S ■ 






4)Ba IB 


nvtt 




DEFB 


1 






4}B9 ^2 


■ ■951 




DEPX 


'.RUS ■ 




. J 


43BC ta 


**16B 




□ E!H 


:3 




:ENT).i' KtV 


HBE t»»e 


t*57B 




UEFl- 


! 






41CI IB 


•a»aB 




DEFB 


* 






43C1 53 


BB99B 




DEFM 


'^■iS'fX- 




;S 


43C7 ID 


aiBBi 




DEFB 


13 




; ENTFR KEY 


43ca BB 


BIBIB 




DEFB 


B 






4JC« 2B 


(!1B2B 




DEPM 


'THEN ' 




;T 


43LF IBBI 


(L83a 




DEFW 


B 






43D1 51 


■ lB4a 




UEFM 


'PEEf ( ' 






HOi BBII 


I1B5^ 




DKFW 


B 






41DI IB 


B1B6S 




DFFE'. 


B 






43D9 4i: 


BlBia 




D^.} *1 








43DE ffll 


aiasa 




ntrw 






Program continues 



Program continued 



41E* «« 

43E1 45 

4)E6 •*«■ 

43EB a* 

43E9 4D 

43EE aaaa 

43Fe BB 
43F1 4E 
43F6 *D 
43F7 **** 
4)r) 4C 
4)FP BBia 

44^1 CDC9(1 
4414 tfa 
44^t 3E41 
44^^ 21)14) 
44»B C5 
44*C FS 
44*D «E*2 
44(F CD5B44 
4412 3E2B 
4414 CD5e44 
4417 3E3D 
4419 CD5844 
441C 3E2t 
441E CD5S44 
4421 16*8 
442) 7E 
4424 FEI« 
4426 2^*C 
442^ FE^D 
442A CC5E44 
442D CD5B44 
443* 23 

4431 *i 

4432 IBEF 
4434 3E2a 

4436 23 

4437 CD;a44 
443A IBFS 

443C a6aF 

443E 3E2H 

444* CD5944 

4443 liF9 

4445 Fl 

4446 3C 

4447 PS 

4448 an 

4449 2ac4 
444B 3EID 
444D CD5844 
445^ Fl 

44il Cl 
4462 ti 
4453 CA72aB 
4456 ieB3 

4459 D9 

4459 CD33aB 

44;c D9 

445D C9 

445E 3E5B 

44«* C> 

4411 7E 

4462 FEB* 

4464 ca 

4465 12 
4411 2) 
4447 13 
44 (S 18F7 

446A CDC9ai 
446D ll*i3D 
447* 21CE44 
4473 CD6144 
4471 llca3D 
4479 213845 
447C C06144 
447F H883E 
44(2 D5 
44«3 CD4M* 
4481 Dl 
4417 FEBl 
44M CAai44 
44aC 12 
44aD 13 
44*E 13 
44aF Dt41 

4491 ■? 

4492 §7 

44*3 n 

4414 213143 
4497 8D 
44ia 3BI1 
448A 24 
449B 6F 
44»C 4F 
441D ■617 
449F D9 
44AB CD49lf 
44A3 D* 
44A4 FEBl 
44At UC844 
44A* PEia 
44AB 2815 
44AD Ji 
44AE AD 
44AF 2BBA 
44B] IB 
44B2 2B 
44B] 3E2a 

44BS itaa 

44B7 12 
44B8 *4 
44B9 18E4 
44BB 3E2a 
44BO 12 

4 4ai III a 

4K* IBDD 

«4C1 71 

44C3 12 

44C4 13 

44C5 23 

44i:6 B^ 

44C7 2806 

44C9 36*8 

44CB C3ei44 

4 4CE 2A 

E ENTRIES. ' 
4S37 »« 
4518 2« 
4511 ■■ 

4562 aaae 
45S4 ■■e? 

42E9 

(■■■a TOTAL 



*1*9* 

• ii*a 
iiiia 

aii2* 
Bina 

8114* 

81158 

aiii* 
allTi 
*iie* 
*n>a 

• 12(« 

■ 121* 

■ 122* 
81238 

■ 124* 
8125* 
B126* 
B127B 

■ 12IB 
81298 
BDBB 

Bi3:a 
*i3]a 

■ 1338 

• 1348 
81358 
81318 

*i)7a 

*1)8* 
i139* 

1141* 
8141* 

81421 

• 14)8 

■ 1448 

*14S* 
*1468 

■ 1478 
81498 

ai49a 
ai5a« 
aisi* 

■ 1&2( 

■ 153^ 

■ 154* 

■ 155B 

■ 156^ 

■ 1571 

■ 15ai 
tl59* 
till* 

■ 16U 

■ 162* 

■ 16)1 
11141 
>165^ 

■ 1668 

■ 117* 

ausa 
ausB 

81781 

■ 171* 
*172* 
(17)* 

■ 1T4* 

■ 175B 

■ 171B 
*177B 

■ nil 

■ 17** 

■ ig*^ 

■ lai^ 

■ 1B2^ 

■ 1831 
81641 

■ 1^5^ 

■ 181* 

■ ie7t 

aiaei 
111** 

■ IMI 

*1*1* 

■ 1*2i 

ai9)a 

■ 194* 
*19S* 
«1*6* 
(197* 

■ 191* 

■ 19t* 
i2ll( 

BiaiB 
a»i( 

*2i3* 
*I*48 
8]85( 
8286* 

■ 287( 

t2(aa 

«2«9B 

■ 21** 
82111 
8212* 

■ 21)* 
*214* 
*2]S* 
(2161 

■ 217* 

■ 2188 
B2I9a 

■ 2288 
82118 
83118 
822)8 
82248 
8235* 
(221* 

(22''a 

B22S( 
822»8 
82388 

82)18 
(2328 

*2)38 

(2)48 
B23Sa 
82368 

8237* 
22)118 

B23ya 



DEFB 
DEFM 
DEF« 
DEFB 
UEFK 
DEFW 
DEFB 
DEFH 
DEFB 
DEFH 
DEFM 
DEFi. 
;lti DISPLAY 
DISPLY CALL 
LD 
LD 



CALL 
CALL 
INC 
DEC 



INC 

CALL 

DJNI 

l.D 

LD 

CALL 

DJNZ 

POP 

■.SC 

PUSH 

DEC 

JB 

LD 

CALL 

POP 

POP 

DEC 



' LEFTS ,' 
8 
;. SillFT ENTRY 
81C9H 
B.13 
A,ES 
HL.TBL 
BC 
AF 
C,2 
SCR 
A, 32 
SCR 
A,3DH 
SCR 
A. 33 
SCR 
B,E 

a..'hl: 
:,LP2 



SCR 

LF2 

B.15 

A. 32 

SCR 

LP] 

AF 



;SET COUNT FOB MAX. 

; SUNEER Of LETTERS 

; <1 PER WORD 

; AND DISPLAi WDBB 

;CHECl FU* ENTER". FEY 

:CHA»CE TO JP ARRO« 



:DEC. WORD COUNTER 



; PUT 15 SPACES 
; BETWEEN EACH 

; WORD 

:S;EIT LETTER 

:A=A-1 

iSAVE LETTER 



N1.LP4 
A. 13 

SCR 



ItltltlMMIII 

SCE 3XX 

CALL 33H 

RET 
CHNT. LD A,;bH 

RET 
;ll(lllllllll*lllltlllll 



Z,72R 
LPi 
MIMtllMIMMIttttllll 



IRITLRN TO BASIC IF DONE 



SEHTBY CALL 



PUSH 
CALL 
POP 



JP 

LO 

INC 

INC 

SUB 

RLCA 

RLCA 

RLCA 

LC 

ADC 



EXX 

CALL 

E(I 



DE.3D«(H 

NL.HESSl 

PRINT 

DE.3DC(H 

IIL,MESS2 

PRINT 

DE.3EB(H 

DE 

49H 



HL.TBL 

A,L 

NC, STILL 

H 

L.ft 
CA 
B,7 



^DISPLAY TO SCREEN 



;UP ARROW FOB <ENTEH) 

■lllllllll 

: PRINT KESSAGE 

POINTED TO BY HL 
: TO THE SCBEIJi 
: MESSAGE NL'ST 
END IN 1 



7 LETTER ENTRY II 



;NtXT LINE 

tsave screen PTB. 

;GET CHAIt.(RCn lEY SCAN) 

:GtT SCREEN PTR, 



,-rUT LtnER Id SCREEN 

,-»OVE OVER FOR CW3 . 
;SUB. LETTER A 

: MULTIPLY 



.■START OF WORDS 



;GET CaA>. 



;!;0 IF 3PEAF FEY PRESSED 
;BACF ARRO- 
;G0 IF lit. 



A, 32 
(HL, .a 

IDE] .A 

B 

COST IN 
A, 32 

(DE' ,A 



HL 



DEC 



:IF CO'JNT-S 



:P^'T NEK 

KCRC IN 
; NEKORY 

^CHECF COUNT 



DONE 



NZ.CONTIN 

(HL),e 

JF DISPl.I 

itItllMMIillllllllllllllllllltItt 

MEESl nEFN "" ENTEH A LIVTTEB AND TllEN YOUR COMNAHD. 



82488 DEFB 

e:iia aess? -in tr 

a:42( :^LF!i 

*243( L^LF. 

(2448 K2 -jyy: 

I2i'-I c:: 

ERBOBS 



19S8 EiY Jl^t RASTIS 
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By Waldron P. Hodsdon 

Hmmmm. Looks like another "Space Invaders" type game. 
Nice neat ranks of aliens poised over your defensive base 
. . . but WATCH OUT' Here they come, swooping down 
with their bombs and Kamakati like dives. There are in- 
dividual attackers plus group flights -- all intent on de 
stroying your three bases before you destroy them. 

Full sound effects add further excitement to this machine 
language game. The action is fast and furious enough to 
keep you on the edge of your seat for hours on end. 
ALIEN ARMADA allows up to two players and has three 
levels of difficulty from beginner to expert. All for only 
$11.95 ( 16K tape) or S18.9S ( 32K disk). 

^ MAIL ORDERS inctuoe i! OO shfvng & hancWng |0 C iVMJwils idd 6% sales 1a> 
CHARGE CARD CUSTOMERS. Ca" 1202) 544-6674 lot rasiesi service 



^ 



THE LIUERTY SCFTWAKE OJ 

635 Independence Avenue, S.E. 
g, Washington. D.C. 20003 

{202) 544-6674 




\What 
makes your 

CENTRONICS 

737 or 739 

the better buy... 

the new ETI 

ETI's own microprocessor intelligence 

can put all the power of your 737 or 739 Printer 

at yourlingertips... 

nri pioneering design (patents pending) allows you to cintrol all 

till cptloii of this powerful pnntef witk %\mp\% ciMiiids rignt 

from Basic Of ttie body of your wordprocessing text. 

Provides ■uImim ptntlii spaii witti mainframe-hke dedicated 

penpfieral control and programma&llity. 

CtMMtlklt with most popular wordprocessing packages and 

inicfocomputef hardware 

Features: 

• access to all six fonts of the 737 printer & graphics on 739 

• true proportional spacing with {UStification 

• superscript, subscript, underlining 

• user delinabie spacing, line centering, form feed 

• UPPER/lowefcase support also for UPPER-only systems 

• optional use of BASIC as a simple but flexible wordprocessor 

• no additional cables— Centromcs-iike edge-card connector 

ETI-A: $147 ETI-T: $147 ETI-U: $157 
{Apple" II +) fTRS-80' Mod. 1,11.111) (all others) 
order now directly from us (check. MO. Visa, MC) 
or your local printer dealer 

IN. J. residenis please adO 5% tax] 

micrOdome 



mjste' rfiaiq* 



CORPORATION 

Denville, New Jersey 07834 
PO Box 392 1201)627-6554 





''mmmmmm m 




SCRIPLUS 



Scrtplus is a modification to Scripsit' which enables 
you to take advantage of the special functions, 
features, and print formats of your printer while your 
document is being printed. Allows you to: 



change ^x |=> ^t n d 4e d print 
change no. of chiracters per inch 
or underline in mid— line! 



All in accordance with the capabilities of your printer 
You can change your print size at will! Features: 

1) The user can send commands to the printer to 
activate special formats 

2) Scriplus will not crash programs protected in high 
memory. 

3) "END" returns to DOS READY instead of re- 
booting. 

4) The initial line-feed is changed to a carriage return 
to empty the text buffer. 

5) The user can get an ALPHABETIZED directory 
from within scriplus. 

6) Optionally select automatic line feed after carriage 
return. 

7) Supports custom printer drivers (not included) 

8) Modifies Scripsit/LC or /UC. (MOD 1} 

9) Works with MOD I and MOD III! (Including MOD III 
3.1 Scripsit!) 

10) Specifically written for the MX-80. but will work 
on ANY Printer that accepts CHRS codes for 
control. 



Tape or disk — *24.95 

(specifyl 



— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

11S00STEMMONS EXPRESSWAY. SUITE 104 ^^^ 
DALLAS, TEXAS 75229 ^g^ 

PHONE (214) 484-2976 ^^^ 

msifliSovuiiiF MICRONET 70130.203 ^27 rr^t [>»« Nii trxijiit 

r(.dnn*»i«( Two, Corp tmltf 



fS»e List ot Aiit9fUs9'8 onptg»4ie 
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AMERICAN 



118 SO. MILL ST • PRYOR, OK 74561 
PHONE (918) 82>-4844 



ALL LISTED PRICES ARE CASH DISCOUNTED WE ACCEPT MC, VISA AND COD (REQUIRES CEHTiFiED CHECK. CASHIERS CHECK OR 
CASHi FOR CHARGE ORDERS, PLEASE ADD 3% FOR COD SERVICE PLEASE ADD 5% 
OKLAHOMA RESIDENTS PLEASE ADD 4% SALES TAX 

?2K EXPANSION INTERFACES 



^526 



SPtClAL OHHfcRiNG 

Due to a very special purchase, American 
iiusiness Computers is able to offer a limited 
number of Radio Shack* Expansion Inter 
l.i .■■. .11 the lovwest price ever 

A III tT lean Business Computers guarantees 
hxpansion Interfaces to be Brand New — 
uiih onjiital documentalion and in perfect 



S555 



9> 




HARD 



DISK DRIVES.. 

» MEGABYTES FIXED 

5 MEGABYTES REMOVABLE 

STORAGE FOR TRS-80 MOD II 



Call o' vKfite to Amencan Smaii Busmess 
Computers anO let us show you now we can 
give you aiTDSt unlimited CiSK storage on your 
TRS-80 MOD II American Business Com- 
Duie-s features boin Cameo and Corvus Disk 
SjDsysiems witn associated software Oealar 
Inquiries Invlled. 



OTHER STUFF & ODDS - AND — ENDS 



PAPbR hOR YOUR PRINTER ^M8 
'* 12 X II - Tear off perforationb 
^md you have an 8 1. 2 x II "cut sheet" 

:i2U0 ^heet;, ot If) pound pap.'T S:N ^5 



VERBATIM .^ 
DATALIFE DISKETTES 

We feel this is the BEST Diskette 
on the market! 
TRS-80 MOD I - 29 95 
TRSSOfvlODII - 49 95 BOX OF 10 



SOFTWARE 

TRS-80 COLOR COMPUTER- GAMES 
PACKET MAN 24.95 

METEROIOS 21.95 

COLOR SPACE INVADERS . 21. 9S 

GAME OF LIFE 14,95 

LUNAH LANDER . . 14.95 

OTHER SOFTWARE FOR THE TRS-80 
ADVENTURE (DISK VERSION) 

SPECIAL *"1».95 

OLYMPIC DECATHLON 

(DISK VERSION) 23 00 

NEW DOS BO (VERSION 2 0) 

MOD 1 139.95 

MOD HI 139 95 



tk 



DISGUSTING!! 

Thai 's what uie think 
about the price of 
most good "Letter 
Quality" Prmters Our 
Starwnter is Bidirec- 
tional and out "spetb" 
the others - hands 
liown 




■ 



/ 



918-825-4844 

RETAIL STORE-SOUTHWOOD SHOPPING CTR-PRYOR. OK 



ATTENTION: 

CORVUS OWNERS 

American Business Computers NOW 
offers a fully compatible TRSDOS' 
operating system Our System, called 
CORDOS. runsall 10 MB, Revision B 
Corvub drives. The Program in this 
package contains a Master Program 
which will convert a user ' s operating 
system disk (Version 2.0) to an en 
ha need system capable of the fol- 
lowing: 

- Completely transparent use of 
the Corvus Hand Disk Drive 

— Complete compatibility with 
existing programs 

- All utilities (except Format and 
Backup, which should not be 
used) will operate normally 

Price $300 00 with manual 

-DEALER INQUIRIES INVITED - 

CORDOS Author Andy Frcderickson 

*TM of Tandy Corporation 

'TM of Corvus Systems 



SMALL BUSINESS 



COMPUTERS 



masief cnarge 



118 SO. MILL ST. • PRYOR. OK 74761 • (918) 829-4844 



•TM TANDY CORF 



SUPERPRINTER 

THE EPSON 
IV1X-80 



-520 




Triis IS ine ne* Epson MX-80 001 mainji pnnier li does |U5I about everything you couiC 
asK a crinier lo Qo-quickiy gmeiiy. fehabiy In lact, lor OEM irjiaiialions. me UX-80 may 
be me Single besi, ali-around pnnier you can buy BuMharsnotlhe best reason to buy il 

The MX -BO prifiis biairecnonaliy al 80 CPS in a user-del ined C^Olce ot 40, 80, 66 or 132 
columns And if that s not last enough, its logical seekmg funclion minimizes print head 
travel lime The MX-80 pnrtts 96 ASCII, 64 graphic and eigtil miernalional characters with a 
lack-Sharp 9 « 9 matrix. For a long time Epson printers are Known lor reliability and !he 
MX-80 IS noenception Buithal s not the best reason to buy it, either 

The pnni head has a life expectancy ot up to 100 t 1 cnaiacie's , and when il wears out 
jusi Ihrow It away A new one costs less than S30 and the only tool you need lo change il is 
attached to ttie end of your arm The MX-80 is compact, weighs only 12 lbs . and the whole 
unit, including the Iwo stepper moiors controlling carriage and paper feeding lunctions 15 
precisely controlled by an internal microprocessor Bui even that isn i why you should 
spetily the MX-80 



The best reason is tt^is because Epson 
makes more printers than anyone else m 
the woriQ. we can altord 10 sell each one 
lor a iiltie less 



IF YOU BUY AN MX-80 AND DON'T 
CHECK OUR PRICE — YOU PAID TOO 
MUCH' 



AW...WHAT THE HECK 

RAM Memory Chips for the TRS-80 Apple and others 



.^ w 



II IS ihe policy ot American 
Business Computers to otier 
merchandise at the lowest 
price possible Several 

months back, we began se i- 
mg RAM Memory Chips to' 
the TRS-80 'or S45 00 
per set Someone else soic 
chips lor S44 00 We sold 
mem fo' S38 CM They sold 
them (or J37 95 So we say 
■AW WHAT THE MECK'' 
Let S see ine other guys 
beat mts price 



«19 



95 



PER 16K SET 



These cliips ate brand new 
"4116 s" These 200 nano- 
second chips are luHy 
compatible with an TRS-80 

products Instructions lOr 

inseriion are included, how- 
ever. Ihe dtp shunts required 
lor converting a 4K Model I 
10 a 16K Model 1 are not 
included at this low price 



OKIDATA MICROLINE 80 



PRINTER - $^99 



oo 



^^522 



The Microiine is built on a rugged cast alumi- 
num base 10 withstand the ngors oi continuous 
business use li is driven by two motors and 
will run all day milh no duty cycle limitations 
Microlme printers use a dense 9 > 7 dot pattern 
10 produce crisp, clean copies, 'irst copy to last 
The seven pins in ihe head are 'lired' using 
energy stored m tension members Tt>is tech- 
nology permits me use oi short, low mass pins 
made with an e'tiemely hard aliov The head 
p'oduces less tieat thereby eilending its iiie 

^«. THE REST OF THE t 

FAMILY 1 

OKIDATA MICROLINE 82A - The same as the 

Wicroiine 80 but pnntsal 120 CPS and has low- 
er case descenders S5W 

OKIDATA MICROLINE aSA — The wide car- 
nage big brother to Ihe microlme 80 and 62A 
Features both RS-232 and parallel interfaces. 
120 CPS bidirectional printing, 9 wire pnnt head 
and adjustable forms lenglh An excellent 
printer lor only tS99l 



The EPSON MX-70-SC«ll 
The EPSON MX-80 FT-S Csll 

jTheMX-IOO-SCall 

lALL OTHER EPSON OPTIONS 



IF YOU BUY ANY EPSON 
PRODUCT AND DON T 
CHECK OUR PRICE - 
YOU PAIDT O O MUCHHl 



CBII918-B2S-4844 tot prices 



«4* RETROFIT YOUR* 
MX-80 TO AN MX-80FT 

ADD A PLATEN TO YOUR MX 80 
TO ALLOW USfc OF LETTER- 
HEADS OR ROLL PAPER $69.95 



DIRT CHEAP ...$269 



Bui Highly Reliable Yes, our Mini Disk Drives have an estimated 
8000 Power-On Hours Mean Time Between Failure (That's 8 
Hours A Dav. 5 Days A Week, for 3 85 YEARS) Our drives also 
feature a lead screw head positioner - not a cheap bond-type 
positioner |{ i^ou purchase a Mini Disk Drive with a band-type 
positioner, you arc buying an INFERIOR PRODUCT! If you have 
any doubts about our drives, our ONE YEAR Warranty should 
convince you that me know this unit is the best drive at the best 
price on the American market This is one example where you con 
pa^/ less and get more *tm tandycqrp 



■TRS-tOMOOEL I VERSION 
Cofnplete with Power Supply * Cabintt 



TEAC DRIVES 



THIS. 






7 



^625 






918-829-4844 




GENERAL 



Stuff variables and $ in USR calls. 



USR Usery 



David H. Freese, Jr. 

Clermont Computer 

Consultarjts 

RDitl, Box 316 

Cape May Court House, NJ 

08210 



The TRS-80 is perhaps one of 
the most powerful com- 
puters in the under $1,000 
category. It owes its success to 
good fiardware design, but 
more importantly to the Basic 
interpreter that Microsoft wrote 
for Radio Shack. The Level II 
version of the TRS-80 can pro- 



vide hours of Intrigue and 
fascination to even a profes- 
sional computer programmer. 

Many owners of the TRS-80 
have overcome its one major 
hardware shortcoming — no 
lowercase graphics— with a 
simple and effective hardware 
modification. When comple- 
mented with software patches 
to the keyboard and video 
drivers this modification opens 
the door to word processing 
and other potential uses of the 
computer. 

There will come a time when 
playing the latest store- bought 
game and enduring the speed 
limitations of the interpreter 
does not completely satisfy 
you. More than likely you will 
then begin to explore the real 



im 


DCTIMT R-Z 














2a 


INPUT 


-STPRTING 


LOCfiTION 


OF 


SUBROUTIhC- 


;5 


3B 


atelNKS^^Be): 


SL=S 


-25fe«-SH 


POKE 16526 


a. I POKE 16527, SH 


4« 


REflO 


DJ IF D— 


TVEH 68 










sa 


POKE 


5.0: S=-S* 


: GOTO 48 








M 


INPin 


■■STRING- jS» 












7^ 


PRIMT 


USR<S»>i 


PRIKTi GOTO 


ea 






ee 


' 
















lee 


DflTH 


36,173.64 


1 ' 








LD 


R. (48HFH> 


lie 


OPtTfl 


254,3 


1 ' 








a» 


3 


128 


DflTfi 


194 . 74 . 38 


1 ' 








jp 


HZ, 1E4I»1 


m 


DflTfl 


42.33.65 




' 








LD 


«.,<4121H) 


140 


DflTB 


7B 




' 








LD 


B, <«,> 


158 


DOTfl 


128 




' 








LD 


R.B 


ite 


OHTH 


183 




' 








OR 


R 


179 


DflTB 


288 




' 








RET 


Z 


laa 


DflTH 


35 




' 








INC 


H. 


i9e 


DPrrn 


94 




' 








LD 


£,<»-> 


208 


DATA 


35 


1 ' 








INC 


H.. 


218 


DflTH 


86 




' 








LD 


D. (».> 


220 


DflTfl 


26 




- 




FETCH 


LD 


fl,<HL> 


238 


CWTR 


254,97 




' 








CP 


61H 


248 


Dflrn 


56,6 




' 








JR 


CSRLC 


258 


DflTH 


254,123 




' 








Cf 


7BH 


268 


Dflrrn 


48,2 




' 








JR 


fC.SflUC 


2T9 


DflTR 


214.32 




' 








SUB 


28H 


298 


DflTft 


119 




-■ 




Sf*JE. 


H> 


(De>,R 


298 


onrn 


19 




' 








INC 


X 


see 


ofiTn 


16,241 




' 








ttJNZ 


FETCH 


318 


DOTH 


281 




' 








RET 




328 


DHTB 


-1 




' 








END 




338 


END 


















Program Listing 1. 


Relocatable Basic Version. 



potential of your TRS-80. Your 
mind will turn to such things as 
environmental control of your 
home, Morse Code and/or radio 
teletype transceiving, music 
generation including multi- 
voice orchestrations, and 
perhaps high-speed arithmetic 
processing peripherals. 

All of these applications 
imply the use of controlled in- 
terfaces to the computer. Also 
implied, but not necessarily re- 
quired, is the use of machine 
language programs to drive the 
peripheral device. 



The USR Function 

The Basic instruction man- 
ual provides sufficient informa- 
tion on the USR function to 
allow rudimentary use of this 
Basic call to a machine lan- 
guage subroutine. Let me first 
outline the use of the USR func- 
tion and then describe a way of 
extending its serviceability. 

In Level II Basic there is only 
one allowable USR call. It can 
appear in your programs as: 
100X = USR{N). The starting ad- 
dress of the subroutine called 
by the USR function is pointed 
to by the two-byte vector 
located at 16526, 16527 decimal 
or 408E, 408F hexadecimal. For 
example, if your machine lan- 
guage subroutine began at 
32000 decimal, 7D00 hex then 
you could load the USR vector 
with: 10 POKE 16526 0: POKE 
16527, 125 where125decimal = 
7D hexadecimal. 

The actual subroutine can be 



placed in memory by POKEing 
it in using a Basic program or it 
can be loaded using the System 
call in the executive mode. If 
the System load is to be used, 
then the machine language pro- 
gram must be prepared using 
an editor/assembler or ma- 
chine language monitor. 1 rec- 
ommend the Radio Shack Edi- 
tor/Assembler, Radio Shack 
T-Bug (machine code monitor) 
and the Small System Software 
RSM (machine language moni- 
tor) for this use. 

In addition to the above, you 
have to designate sufficient 
memory at the top of random 
access memory for the 
machine language programs. 
This is done during the Memory 
Size query interchange during a 
cold startup. Failure to set 
aside sufficient memory will 
result in the Basic Interpreter 
overwriting the machine lan- 
guage program with string data. 

The Basic manual states that 
the parameter (N) that is 
passed to the subroutine must 
be an integer between -32768 
and -(-32767. The manual im- 
plies that it is not possible to 
transfer other types of para- 
meters without the use of PEEK 
and POKE statements to tem- 
porary locations that both 
Basic and the machine lan- 
guage programs access. This is 
a self-Imposed limitation and it 
is very easy to write machine 
language subroutines that sup- 
port the Basic calling program 
with integer, single, double and 
string operators. The interpreter 
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le 


DCFirn- ft-z 










26 


INPUT 'STARTING LCCnTION"JS 






3e 


S>+^/256! SL=S- 


256-SH 








40 


POKE 16526, SL! 


POKE 16527. SH 






50 


REFD ti: IF 0=- 


T>CN 78 






68 


POKE S.D! S>S* 


: GOTO 


59 






78 


SM=S''Z5(>! 5L=S- 


256*SH 








90 


POKE S-27,SL! Pt3KE S-26,Sd : ' 


tak* cdr* or atr^oiut* adc^r^c i'«f*r«nc« | 


90 


INPUT -ENTER STRING" ;S« 






lae 


PRINT USR<S«>: 


PRINT! 


GOTO 98 






no 












2ee 


DfiTR 33. 175.64 




CflPII 


LD 


HL. <4eRFH5 


210 


DflTH 126 






LD 


fi. CHL) 


229 


OflTfl 254.3 






CP 


3 


230 


WTPI 194.74,30 


; ' 




JP 


NZ. 1E4RH 


240 


WTfl 42.33.65 


1 ' 




LD 


HL.<4121HJ 


250 


DOTfl 70 






LD 


B, (HL> 


260 


[>ftTR 120 






LD 


R,B 


270 


D«Tfl 183 






OR 


R 


2ae 


DflTB 200 






RET 


Z 


299 


OflTFl 35 


: ' 




INC 


H. 


399 


WTR 94 


: ' 




LD 


E,<rt-> 


JIB 


DHTH 35 






INC 


ML 


J20 


[iflTfl 96 


1 ' 




LD 


D. <«.J 


330 


DflTR 33.93,117 


: ' 




LD 


HL.BURRP 


340 


DflTH 112 


: ' 




LD 


(HLJ.e 


359 


OATH 34,33,65 






LD 


<4121H).4. 


360 


DfiTfl 35 


: ' 




IHC 


H- 


370 


DBTH 35 






IMC 


H. 


389 


DfiTfi 35 






INC 


K4. 


398 


PRTn 26 


I ' 


FETCH 


LD 


fl,(OC> 


400 


DflTB 254,97 






CP 


61H 


416 


DflTR 56,6 


1 ' 




Jf) 


csnuc 


420 


OOTH 254,123 






CP 


TtK 


439 


pnTR 48.2 






JR 


HC.SMJE 


440 


Dnm 214,33 


1 ' 




sue 


2eH 


43« 


DfTTR 119 


I ' 


sftue 


LD 


(k4.>.R 


4tM 


D*nn 19 


1 ■ 




IMC 


DC 


470 


mm 35 


1 ' 




IMC 


H. 


4ee 


DfTTR ]6,Z4e 


1 ' 




DJNZ 


FETCH 


498 


DRTR 201 


I ' 




RET 




see 


DflTB a 


1 ' 


BUf«P 


O^B 


9 


510 


D«TB -1 


t ' 




DEFVI 


BUF 


520 


END 


1 ' 


BLF 


DEFB 


8 




Program Listing la 


Relocatable Assembly Level Version. 



uses a block o( memory to either 
pass the parameter itself, or a 
pointer to the location of the 
parameter. 

These locations are not only 
used (or the USR function, but 
for all operations requiring that 
a value be operated on or 
passed to another variable. 
These locations are commonly 
referred to as the accumulator 
but have nothing to do directly 
with the accumulator register in 
the Z80 chip itself. 

The Accumulator 

Table 1 shows the location of 
the accumulator for integer, 
single and double-precision 
variables. When a string 
variable is being operated on by 
the interpreter then the ac- 
cumulator Is used to transfer 
the variable pointer address 
between routines. In addition 
to the accumulator contents, 
the interpreter uses the loca- 
tion 40AF as a type flag 
register. The contents of the 
type flag register indicate the 
type of data to be found in the 
accumulator. 

The USR parameter N can 
then be a single, double, string 
or integer variable. ^ simple 
way of demonstrating this is to 
create a do-nothing program 



and then test the USR call with 
the four variable types. Try 
loading the following program: 

100 POKE 16526,0: POKE 16527,125 
110 POKE 32CXX) 201 
120 END 

This creates a return at loca- 
tion 32000 and initializes the 
USR vector to that location. The 
USR call now does nothing, but 
is operative. Now try executing 
the following direct state- 
ments: 



PRINT USH(1) 
PRINT USR(3.14159) 

PRINT USRC'Ht THERE") 
PRINT USR(1 23456789.98765) 



In each of the above state- 
ments the interpreter correctly 
displays the USR parameter. 
Now try the following: 

A% ^ USR(1) 

B = USR(4.2] 

Cn = USR(1.23450-8| 

OS = USRI'ABC") 

E = USRC'DEF") 

The first four statements ex- 
ecute properly since the 
variable type on the left of the 
equal sign is the same as the 
variable type contained within 
the USR function. The last 
statement will not execute and 
the interpreter will return a type 



mismatch error and Is returned 
when an attempt is made to 
assign a non-string variable to 
a string or vice-versa. 

Application 

Now that we know that the in- 
terpreter does not disallow the 
use of any valid variable in the 



USR call, let's look at a specific 
application. Nearly all Basic 
language programmers use the 
string variable ability of the 
TRS-80. Have you ever written a 
program line such as: 150 IN- 
PUT"DO AGAIN, Y OR N";A$, 
and then watched as your 
favorite program tester 
bombed the program by press- 
ing shift and y simultaneously 
only to receive the wrong 
response? Foiled again by the 
lack of upper/lowercase! 

The dilemma is that the 
TRS-60 keyboard driver 
recognizes the difference be- 
tween shifted and unshifted 
alphabetic characters. The 
video driver converts all of 
these to uppercase characters 
and you cannot tell which has 
been entered. This problem can 
be overcome by using a 
machine language subroutine 
that converts a string to all up- 
percase characters. This ability 
is provided by many Basic inter- 
preters and is usually called by 
the operator CAP(S$). 

Program Listing 1 is a Basic 
program that loads a machine 
language subroutine in mem- 
ory that performs the CAP func- 
tion. This subroutine converts a 
string of ASCII characters from 
a mixture of upper/lowercase to 









.m 








Mr 






tan 








•F 




Tm 


m 


•HI 






4L21 




13 


at 

K 


412M 






7» 


H «F 


CPPII: 


L£ 


n.vm 






nn 


71 




IC 


R.IH.) 


: t«t fcr Mild ilrird 




75» 


na 




(P 


5 






!5» 


a 1E4I 




JP 


IC,IE«lf 


; trxri. 'Errv' K^^4* i^ noi ttrin# 




75J? 


9 i\n 




u> 


11,(13) 


; frt WFT1! 




753C 


« 




u 


l.(»LI 


; ax. strir* IhMUi 




753C 


7t 




lA 


ILI 






THE 


B7 




■ 


« 


: tnl fx ruJl itrua 




7W 


ts 




KT 


Z 


; 1 rtiim if ^1 




TVt 


5 




LA 


LOU 


: *<. «tt^s at rtrsl cTmcir in ttr 


ra 


7W1 


S 




K 


«. 






750 


% 




ID 


e.mi 


: CE «ointi to strira 




na 


21 TSX 




m 


HMW 


; \rwniijtMtw 




n« 


n 




LC 


(Hi.B 


: lUr* itJ'int len«h 




754? 


12 4121 




ic 


oievH. 


; stort tWPrt ftr WSIC 




7M 


D 




DC 


H. 


: st« rKt U ttrUB 




nu 


S 




K 


H. 






75C 


B 




IM 


H. 


: H Kuti to bi/fr 




7» 


IH 


FTD* 


Li- 


fl.^C€i 


; •lcfi»-jrt» 




Tse 


Wtl 




0" 


bIK 


r l«l tr Inr.unr cat 




7T» 


»K 




■ 


C.5M 


; )Lf*«»< lirei ca* 




!5a 


FT 7B 




ff 


m 


! l«t tir rsi'iic duDcUr 




BW 


31 12 




■ 


IC.9IE 


: thii IS rvtiic itaricUr 




TSt 


K2« 




91 


m 


; <m«-i to tmt cxf 




73» 


77 


9Ui 


M 


aD.M 


; iUrv durKtr in bi/rtr 




TOT 


n 




K 


K 






TWI 


TL 




K 


K. 


; i^tbtf [Dth ^ind poinla^ 




(W 


»F« 




DM 


fCKM 


; 1 ti fF<irf striiH 




™> 


n 




KT 








77? 


«■ 


BW 


[^ 


If 


: ItoU t* ttWtr 




7S 


'^i 




:fpj 


BF 


; *Vt.\ ti^ff 




"" 


V. 


B'^: 


:£FB 


iff;: 










ProgratT] Listing 2. 
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all uppercase. The resulting 
string is returned in the same 
place as the original. No 
parameters relating to the 
string are changed. 



Operation of this subroutine 
IS quite simple. The contents of 
the type flag register (40AF) are 
examined to test for a string 
parameter (lineslOO-120). Ifthe 







Location o! Variables Passed by USR 


AOOreSS 


Inlegor 


Single 


Double 


Strmg 


411D 




III 


Id 


LSBm 


(<i 


411B 




«x« 


■ MX 


— 


(II 


4!1F 




• m 


XXX 


-- 


III 


4120 




m 


HI 


-- 


XXX 


4121 




LSB 


LSBm 


— 


LSBvarpIr 


«122 




MSS 


-- 


-- 


MSBvarptr 


4123 




IXK 


MSBm 


MSBm 


IIX 


4124 




■ IX 


EXP 


EXP 


XXX 


40AF 




02 


04 


08 


03 


vafplr » 


Id 


III 


<x> 


string length 


varplt + 1 


■ i> 


XXX 


XXX 


LSB. string add'ess 


varpSr + 2 


ttt 


XXX 


■ XX 


MSB. string address 








Table 1 










Note 


XXX indicales jnre 
LSBm is the Leasi 
of the mantissa 
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byte 
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parameter is not a string, then a 

jump to the function call error 
message (JP NZ,iE4A) is ex- 
ecuted. The location of the 
string variable pointer is next 
loaded into the HL register pair. 
The string length is put in 
register B, and the address of 
the first character in the string 
is put in the DE register pair 
(Imes 130-210). Lowercase 
ASCII values are converted to 
uppercase values, and upper- 
case, control and graphic 
characters are left unchanged 
(lines 220-300). This is repealed 
for all characters in the string. 

This subroutine illustrates 
the principles involved m exten- 
ding the USR call to include 
string parameters. It is not yet 
useful enough to place in a 
library of favorite programs. We 
may not want the original string 
to be modified and/or we may 
want to create a new string 
whose elements are the upper- 
case (or lowercase) equivalents 
of the original string. 

Program Listing 2 provides 
just such a program. This 



subroutine differs from the first 
in that a separate block of 256 
bytes is set aside for the con- 
verted string. When the return 
is made to the Interpreter from 
the USR function the address 
of the variable pointer in loca- 
tions 4121 and 4122 Hex now 
point to that block of memory. 
This subroutine allows a pro- 
gram statement of the follow- 
ing type: 

2t)0 AS = -ABCDEF'; INPUT BS 

210 IF AJ = USfl(BS) THEN PHINT 

OK" 

The String B$ is not altered 
by the USR call, and the test is 
satisfied even if the shift Key 
had been held down during the 
entry of B$. The CAP function 
becomes very useful when a 
long list of string data is being 
searched for a match against 
new input. Mailing lists and in- 
ventories are string lists that 
typically contain mixed up- 
per/lowercase entries. Add this 
USR function to programs of 
this type and save yourself 
some heartburn. ■ 
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EDflS 3.5 



EDAS IS a sophisticated Editor 
and Assembler for TRS-80 I & ill 
. All text may be input in upper or 
lower case. 

• Assemble directly from one or 
more disk tiles via *GET 

> Assemble to disk o' memory 

• Binary, octal, decimal, hex. and 
string constants: Multiple con- 
stants may be input on a single 
line 

• CMDFILE utility included. 

■ Conditional assembly support. 

• Cross-Reference utility. 

. DOStunctionsDIR,FREE.KILL 
and LIST are supported 

• 14-character labels including 
special chars. "@", "$"." "."''" 

• Editor includes block move, 
global change, renumber, find. 

. EDTASM & M-80 source files 
can be read or written 

• Expression evaluator supports 
+, -, *, /, MOD plus logical AND, 
OR. and XOR 

. Paged & titled listings with page 
numbers and date/time, 

. PAGE, TITLE, SUBTTL. SPACE, 
& COM pseudo-ops supported. 

• Set memory size, page prompt, 
JCL execution. Abort option. 

. EDAS is supported with TRSDOS 
compatible DOSs (LDOS, VTOS). 
. Price is $79.00 + $4.00. S&H. 
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LDOS.VersionS.l is the Ultimate in Operating 
Systems for the TRS-80 Models I and III. 
MISOSYS IS your East Coast Headquarters 
for LDOS. the documented system' Version 
5.1 is priced at Si 69 00 -I- $5 00 S&H per 
system. Deduct $50 if ordering both. 
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SASOSIW SASOSIW SASOSIM SASOSIW SASOSIM 

Complement yourassembly language tools with this 
Z-80 disassembler which produces screen, pnnter. 
cassette, or disk file output. A two pass process 
provides SYMBOLS for 1 6- bit address and 8-bit rel- 
ative references. EQUates& ORG are generated. 
Read SYSTEM programs & display load address 
range, $20 {DSMBLR I for non-disk use is $15). 

EDAS. CMDFILE, DSMBLR Specify Mod I orlll. Add 
SI SAH-t-$,50 per program. VA residents add 4%. 




MISOSYS- Dept MU 3 

5904 Edgehill Drive, 

Alexandria, Virginia 22303 

703-960-2998 MicroNET 701 40,31 

Dealers Inquiry Invited ^221 




DJSHiriQD 

Turn your Editor Assembler into 
a disk package. This 32 K patch 
modifies EDTASM for DOS op- 
eration Features? Add full disk 
I/O, block move, global change, 
Dnnter pagination, sorted sym- 
bol table, print memory utiliza- 
tion, enhance DEFM expansion, 
protect memory, and recover 
after BOOT. From within the 
EDTASM you will have DIR, 
KILL, & FREE. Upgrade your 
EDTASM! $20. 

ThE B00KS 

THE BOOKS must be a part of 
your tools. Volume I gives you 
access to all math operations in 
your Level II ROM A symbol 
table of the entire machine not- 
ing over 500 addresses is includ- 
ed. Volume II tells you every- 
thing you wanted to know about 
the level II I/O— printer, key- 
board, video, and cassette rou- 
tines are fully explained. Each 
volume has a fully commented 
listing of all the routines dis- 
cussed. THE BOOKS will save 
you hours of assembler pro- 
gramming Each volume is priced 
at $ 1 4.95 or buy both for $24.95. 
Add $1.50 S&H per book 
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How to Buy or Sell 

Computer Equipment 

and Software 



and come out a winner 




Begin your search in the in- 
dex ol Computer Shopper s 
bargain tilled pages Locate 
the category and page 
number ol items Ihal 
interest you 




► 



As you outgrow your 
system or want to trade up 
{most dealers won't take 
trade-ins), use Computer 
Shopper ads to sell yout 
items to 20.000 readers na- 
tionwide for the low cost ot 
10 cants per word. 




Congratulations, you're a winner whether you buy, sell 
Of trade in the computer marketplace by subscribing 
and using Computer Shoppers action yellow pages. 
And for your first bargain, take advantage of a FREE 
issue of Computer Shopper as a "Special Get 
Acquainted Offer.' 

Act today and receive your first issue free in addition 
to the $10. one year/12 issue regular subscription. 
Of course, it you are not 1(X)% satisfied, you may 
cancel and still keep the free issue just for trying 
Computer Shopper 

BONUS : New subscribers are entitled to a complimen- 
tary classified ad Use it for pre-owned equipment or 
software or as a want-to-buy ad. Just print or type your 
ad on a plain piece of paper and send it along with 
your subscription Your phone will probably start ringing 
before you receive your first issue 

For MasterCard and VISA Subscriptions only, 
CALL TOLL FREE iaOO-327-9920 



For MasterCard and VISA Classified Ad orders only, 
CALL TOLL FREE 1800-327-992S 



If you need help with any 
computer related problem 
whether it's an interface 
problem or advice on the 
right peripheral for a home- 
brew system, use (he free 
HELP column especially 
designed for that purpose 



W^A 




you have the convenience 
ol shopping nationwide 
without ever leaving your 
home or office. And if you 
buy out of state you'll save 
on sales tax 




Computer Shopper's easy- 
to-read format makes your 
search quick and simple 
with classifications at the 
top of each column m bold 
black headings 




Start or add to your com- 
puter system by finding 
money saving bargains in 
each nx)nth's issue from 
individuals who no longer 
need then personal equip- 
ment 




You ve got your computer 
hardware, but vt/hal about 
the software"' Use a Conv 
puter Shopper ad to find 
what you need Someone 
advertising m Computer 
Shopper probably has what 
you want. 




P.O. Box F138 • Titusville, FL 32780 
Telephone 305-269-321 1 



APPLICATION 



LOAD 80 



Use your computer to track the inflating cost of life. 



Procedures Pricing 



Wynne Keller 
Downeast Digital 
RD 1 Box 507 
Solon, MB 04979 



Changing prices are a prob- 
lem for more than the 
pockelbook. They create a 
bookkeeping chore for people 
who need to stay aware of the 
current cost of their product or 
service. Procedures Pricing is 
designed to store pricing infor- 
mation and simplify the chore 
of cost determinations. It was 
written for the purchasing 
department of a hospital but is 
useful in many other applica- 
tions. 

The program stores the cost 
of items used in a procedure or 
product. For example, in a 
hospital each type of surgical 
operation has a supply list. The 
cost of those supplies deter- 
mines the hospital charges for 
the operating room. If the cost 
of any item increases, someone 
must check every procedure us- 
ing that item and alter the cost 
for the procedure. It is repeti- 



tive work, ideally suited to the 
computer. With this program, 
the user would enter the item 
price Increase once, and the 
computer adjusts the cost. 

But hospitals aren't the only 
purchasers that can benefit 
from this program— consider a 
crattsman selling jewelry. Using 
this program, he takes each 
design and enters all the items 
used in it. Then, whenever the 
price of any raw material 
changes, he can enter that 
change and adjust the prices of 
all his jewelry. 

At home, recipes may be con- 
sidered a procedure, and the 
quantity and cost of ingre- 
dients may be entered into the 
program. Then, when a pound of 
ground beef increases, the cost 
of all meals using ground beef 
can be adjusted. Using the pro- 
gram this way is more work 
than it is worth, unless you run a 
restaurant, but it shows the 
many possibilities. 

The Program 

The program requires a 32K 
Model I or III with disk. Data is 



read from random access files 
and search time can become a 
problem If many procedures 
are entered. The quantity a disk 
will hold depends on the 
number of items in each pro- 
cedure, but on a full disk search 
time might be as high as one 
minute. If your computer has 
double density, the search is 
much faster. No more than 50 
items may be included in any 
one procedure, and the total 
number of items allowed is 150. 
Model III users should note that 
the arrow keys are used as pag- 
ing command keys, but will 
print on the screen as a bracket 
for the up arrow and slash for 
the down arrow. 

There are four main menu 
choices in procedures pricing: 
Item file maintenance; pro- 
cedure file maintenance; 
printer; and End. 

Item File Maintenance 

The top of the screen during 
the item maintenance pro- 
cedure lists the control keys; up 
and down arrows for paging the 
screen forward or backward. A 



for adding items, D for deleting 
items, E for editing items and * 
for leaving this procedure. 

To begin, press A. The bot- 
tom line of the screen will show 
each item as you enter it. An 
item number must first be 
specified. It is easiest to start 
with one and work up, but up to 
four digits may be entered to 
reflect an inventory code, pro- 
vided each item has a unique 
number. Letters are not accept- 
able. Next the item description 
is entered, with the maximum 
length indicated by asterisks. 
Cost is the final entry, limited to 
six digits, including the 
decimal point. The item is then 
placed in the middle section of 
the screen and the last line ot 
the screen will prompt the user 
with "Choice?" 

If an error was made, press 
the E key and the computer will 
request the number of the item 
you wish to change. The item 
will be displayed at the bottom 
of the screen, and new data 
may be typed. To leave the data 
unchanged, press Enter. 

If D is pressed, the item 
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number must be specified; it 
will then be cleared from the 
screen. After each operation, 
some top-of-screen choice 
must be specified in order to 
continue. Thus, it is not pos- 
sible to say add and continue 
adding items one after another. 
A must be pressed before enter- 
ing each item. When the screen 
is full, no more material may be 
added until the down arrow key 
is used to clear the screen. To 
exit the section entirely and re- 
turn to the main menu, press 
the asterisk key. AM data is 
automaticaily sorted by num- 
ber when the asterisk is 
pressed. 

Procadure File Maintenance 

It Jshelpfui to have a printout 
of the items file before entering 
procedures. Do this by specify- 
ing main menu choice 3-Printer, 
then pressing I tor items list. 

The procedures mainten- 
ance creates a file showing the 
name and quantity of items 
used in each procedure. Then it 
presents the totai cost of the 
procedure. Main menu choice 2 
produces a screen with the 
same control keys used in the 
item maintenance section. 
After selecting any choice, the 
procedure number must be en- 
tered. If there are no pro- 
cedures on file, you may start 
with one and continue or use 
special numbers. After the 
number is specified, the com- 
puter searches to see if the pro- 
cedure already exists. If not, 
you are ready to add it. An error 
message is presented if you at- 
tempt to edit or delete a nonex- 
istent procedure. Note the let- 
ter A, D or E will remain in the 
far right-hand corner of the 
screen to remind you which 
mode is being used. 

Add 

The screen for a new pro- 
cedure will show field numbers 
on the far left. The field 
numbers are simply screen 
numbers. Adjacent to them will 
be the item numbers (assigned 
in the item maintenance sec- 
tion). 

To give Ihe procedure a 
name, type -1 and then type 
the name (limited to 20 



characters). Press Enter and 
the name will be printed near 
the top of the screen. 

To enter items for a pro- 
cedure, type the first field 
number, then enter the item 
numt>er for an item used in the 
procedure, and the quantity 
used. The computer then enters 
the item's description and cost, 
cost times quantity and the 
total for this procedure. When 
the page is full, use the down 
arrow to proceed to the next 
page. To correct an error, 
retype the field number of the 
wrong Item and change the 
item numt>er. To leave the add 
mode, press the asterisk key. 
(Note: Do not use the edit com- 
mand at the top of screen, it 
refers to editing the procedure 
as a whole and does not func- 
tion while the add mode is be- 
ing used.) 

Edit 

When E is pressed, the pro- 
cedure number is requested. If 
the procedure exists, it will be 
displayed and corrections can 
be made by typing the ap- 
propriate field number. Leave 
the edit mode with the Asterisk 
key. To correct prices, the pro- 
cedure is not edited, but only 
the Item maintenance file. Prices 
tor each procedure using that 
item are upgraded automatically. 

In the delete mode, the pro- 
cedure number is requested, 
then displayed if it exists. A 
question at the bottom of the 
screen asks if this is the correct 
procedure. If it is, answer Y and 
it will be flagged for deletion. A 
procedure flagged for deletion 
may still be recovered by 
editing it. A record flagged for 
deletion will not appear in 
printouts. 



Printer 

The printer menu provides 
several types of useful print- 
outs—lists of procedures, 
selected procedures or items 
on file— an especially helpful 
list when entering or editing 
procedures. 

After changes are made in 
item prices, the user will have 
an opportunity to obtain a print- 
out of on/y those procedures af- 
fected by the change. If this op- 



tion is not selected at the time 
It Is offered, the computer does 
not retain the information and 
the list is no longer available. 

End 

This selection simply returns 
the computer to ready status. 
There is no need to save files as 
a separate command because 
each procedure is saved in- 
dividually when work on it is 
complete. 

Modifications 

This program is a framework. 



Many modifications may be 
needed for various applica- 
tions. The most Important 
might be changing the quantity 
to allow decimal values so frac- 
tional amounts of an item could 
still be reflected in the total. 

One section has yet to be 
written: the routine deleting the 
records flagged to be deleted. 
As it is, deleted records will 
stay on the disk indefinitely. 
The only way to remove them is 
to edit a procedure you wish to 
delete and change it to 
something else. ■ 



Program Listing 



1 |PBOCEDUH/BAS MOD U/13/81 

3 ' DOWNEAST DIGITAL 

* ' SOLON, KE 14979 

5 ' 

25 ' - _ _ _ VARIABLES LIST 

26 "INI - ITfMt IDS( . ITW DESC 



KICHAEL R. KELLER 



IC\ ■ 



• ITW COST 



A • ASC/IHSTR 
P2S-USING(PROCl 



a - WORK LEN 
PROC. DESCRIP, 



INITIALIZE 



27 'X, Kl, X2, XT 4 1 . COUNTERS 

28 "CU - CURSOR SZ - FIELD SHE 
2J "XF i PL - FLAGS PIS - USIHGUTQl) 
3* ■ RETURN FRQH INKE7S 

31 "ES - STRING El-SNG PREC 

32 ■ 

33 "PHOCODES ■ PftOCEDUSB CODE I , DESCRIPS 

35 ' FIELD LABELS 

36 'NMS - PROCODES PES- DESCRIPS ZS-ITWI k QTY 
3"^ ' Its - TEKP. STORAGE !S 
3a ' 

19 'IT( - ITEM « (PKOCl a( . OTY (PBOC) 

41 ' 

42 * 
SI ■ 

51 CLEARB 

52 CLEAR HEM/'2 

53 ON ERROR GOTO 18839 

54 OEFINT A-Z 

56 DIH IN(2eB), IDS12BB), 1CH2BB), PS(2B9), IT(5i), Q(5B), CH5 
B) ■PC(2BB) ,IP(SB) ,CDS15Bt ,QYS150) 

57 PlS--*t*l I » SSM.II" 
si/m''" *"* * * SSIt.ll It* S 

59 CLOSE 

6B 0PEN'I",2,-ITENS" 

SI lNPUTt2,XF 

62 FOR X-1 TO XF 

64 INPUT»2, IN(X;, IDS(X), ICUX) 

66 NEXT 

67 XX-XF 
6 8 CLOSE 

72 CLS:PBINT*««B, -PLEASE ENTER TODAY'S DATE (KM/DD.'YYl ■*■ 

74 SI-9 : CU-4B8 

76 G05UB IIB 

78 IF MIDSiES.i.lloV" OR MIDSIES,6.1) <>•/■ THEN 74 

8* DATES-ES : XC-: 

82 GOTO 180B 

i-18 • — - NUMERIC INREYS — - 

IBS ES-*- : El-I 

111 H-I.EN(ES! ! PRI»TSCU,ES;STHINCS(SZ-H,42) rSTBINGS(SI-H,24),CH 

RS ( 1 4 J ) ; 

Wb DDS-iNKEys 

128 IF DnS--" THEN 115 ELSE CD-ASC(DDS) 

125 IF CD-B THEN IF H-S THEN IIB ELSE ES-LEFTS ( ES ■ H-1 ) : GOTO U 

IJB IF CD-13 THEN ES-ES+STFINGS (EZ-H , 32) : PRINTiCU*H,- ■ ; : E 1 "V 

AL(ES) i RETURN 

135 IF CD-*2 THEN 145 

141 IF CD'5B AND CD>44 THEN 145 ELSE 115 

145 ES-ES*DDS : IF LENIES)>SZ THEN PRIMTKU.ES;- ' i ! E! -VAL( ES) i R 

ETUHN 

15B GOTO IIB 

2BB ' INKEYS 

215 ES-" : E!.| 

21 B H-LEN(ES1 !PH:NT?CU,ES; STRINGS I S!-H, 42) ; STRINGS I SZ - H , 2 4 ) jCHHS 

11431; 

215 DDS-INKEYS 

221 IF DOS--- THEN 215 

225 CD-ASC(DDSI 

231 IF CO-8 THEN IF H-B THEN 211 ELSE ES-LEFTS1ES,H-I ) -GOTO 211 

235 IF CD-I3 THEN PHINT*CU+H,- - ; : E5-ES-STBINGSISI-H, 321 iRETURH 

237 IF CD-ll THEN ES-DDS : RETURN 

239 IF CD-91 THEN ES-DDS ; RETURN 

241 ES-ES+DOS 

245 IF LEMIESl-SZ THEM PBIKTPCU.ES; * ';: RETURN 

2 51 GOTO 218 

3Bi ' CONVERT SUBROUTINE 

315 PROCODES-NHS 
311 DESCRIPS-PDS 
315 FOR X-1 TO 5» 

P'Ofjrtm continues 
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RAM $18.99 



ONE VEAR GUARANTEE. INCLUDES RAM TEST AND INSTRUCTIONS 

Premium 16K fiigh speed 'am tor TRS-SO MODEL lll/l, and COLOR COMPUTER 
MODEL 1 owners add 2 QO for 2 dip shunts 

COLOR COMPUTER SOFTWARE 

SUPER ■COLOR" WRITER 

At lasl'i Fast, lull featured, character ofienled wo'd processing toi the TRS-6OTM 
COLOR COMPUTER and any o'lnter FEATURES • 32K compatible ■ choice of 
display color • hey beep • fiBlp command • *o'ds typed & words left • tab key ■ 
repeal key • word wrap around • block move • duplicate & delete • global search & 
replace • quick paging • paragraph scrollmg • line scrolling 

SPECIAL FEATURES aulomalic (inking of cassette text liles for handsoU 
continuous printing • unique movable window for viewing any part ol the leit. 

PRINT FEATURES send printer control codes, along witli teit, to printer • lull use 
of printer s special features during normal printing • set margins, line length, line 
spacing, page length, and page spacing witliin the te»t for continuous printing • 
automatic centering ■ right justification • page numbers S titles 
TAPE-S2S,95 ROMPAK* S39.9S DISK>4fl,9S 

'Tap* I/O only, not disk compatibla. 

SUPER "COLOR" TERMINAL all the features of VIDEOTEXTM and more! Allows 
COLOR COMPUTER to communicate wilh computers like THS-80 MODEL lll/l 8, 
APPLE II etc services like COMPUSERVE via MODEM or RS232 DIRECT' Features 

• uploao & download basic programs • punt or savedata to tape* half & full duplex 
TAPE S24.K ROMPAK t34,»5 DISK S44.K 
SUPER "COLOR" BUG examine & change merr-ory contents m the color computer 

• step Kideo display to any location including ROM • look at contents of 
ROMPACKS' • access liigh res graphics & create 4 debug machine language 
programs. TAPE AND DOCUMENTATION Sig,95 Rom P»k S29.S5 

SUPER "COLOR" SKETCHER turns the color computer into a drawing board. 
Supports 32K ram • save and load graphics to tape ■ create basic graphics 
programs ■ print graphics to H S LPVII. R.S.LPVIII and EPSON MX-80. 
TAPE AND DOCUMENTATION S24.95 ROM PAK 134,95 

GAMES 

MODEL III I I 1SK AND COLOR COMPUTER EXTfBAS, 

FEATURE QUALITY GRAPHICS AND SOUNDI 

ADVENTURE 3PAK TAPEU4.9S 

This TRILOGY OF 3 D FANTASY GAMES lakes you to the WORLD UNDER THE 
CIMEEON MOON, Engage m niuai combat with looamoath. narthokc monsters 
and skilled warriors Advance in rank with play eiperience. Then adventure through 
DAZMAR'S UNDERWORLD OF DOOM to the forbidden rutns Ol castle argaan 
Search for the eye of dazmai while avoiding the sorcerer s intricate traps Survivors 
musi then negotiate treacherous trails among the perilous peaks ot the ugrek 
moulains I0 the FORSAKEN GULTCH where the wicked idol awaits restoration. 

VEGAS 5 PAK TAPE 1)9,95 

The THRILLS OF A VEGAS CA5IN0 at home Five action packed Vegas games (or 
up 10 lour players CASINO CRAPS -21 ■ ONE ARMED BANDIT ■ UP k DOWN THE 

RIVER • KENO Bank tracks players winnings froT' game to game • realistic cards 

• regulation tables • boards • aulhenlic sounds ■ lively graphics * official rules in 
Bach game 

COMSAT 3-PAK TAPE S24.9S 

Three action packed iwo piayet games feaiunng lifelike graphics and sound ol 
LASER FIRE CANNONS and PHOTON TORPEDOES 

2't'O TANK COMBAT live terrains • the eiperier>ced arcade player can design 
cotT'Dat scenario STELLAR BATTLE pilot a flei-wmg lighter a1 incredible speeds in 
enemy space taking out dorian tye lighters defending the imperial star (oflress 
GALACTIC BLOCKADE maneuver your crait in a course that boies your opponent 
but avoid cosmic debris and hostile space probes' 

MODEL III /I SOFTWARE 

REQUIRES IfiK MODEL III OR LEVEL II BASIC 
READ THISf Add graphics to your programs in minutes or draw schematics, 
graphs, logos, pictures, etc with graphics and lettering S save them as 
subroutines or programs'" SUPER SKETCHER does more and works just like a teit 
editor with graphics ■ image frames can be ediied and animated on screen ■ 
generate, load & save graphics basic subrout>ries & programs • includes EPSON 
MX-80, R.S. LPVII S R S LPVIII graphics screen print driver and more 
TAPEn'APEI/0|S14.95 DISK (DISK ANDTAPEI'0)I19.95 

SUPER WRITER word processing that combines the best features ol other good 
word processors and those of the SUPER COLOR" WRITER including automatic 
tape of disk file linking and the movable wmdow feature except BAAf display See 
SUPER COLOR ■ WRITER for details' MODEL i/LII needs lower case mod 
MODEL lim TAPE I DOCUMENTATION S49.95 DISK S59.95 

AUTOMATIC MENU SYSTEM power up ana automenu takes over Execute 
programs and command liles or LIST. LOAD enter DEBUG. BASIC, or TRSDOS 
with single keystroke' Features options menu with library of commands 
MODEL III DISK t DOCUMENTATION $12.95 

CODES for THE ELECTRIC PENCIL enter prinler control codes within text file to 
send to smart printers Includes drivers for EPSON MX-SO, CENTRONICS 737, MPI 
fl8 SERIES, and file to customize for other printers TAPE $14.95 

DISK INVENTORY for the MODEL III manage your disk programs A menu driven 
utility featuring sort S print by name. disk, program type, extension, etc. 
MODEL til DISK $19,95 

TRS-BO IS a Registered Trademark ol Tandy Corp 
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Master Charge, VISA and C O D 

accepted 

Allow additional 2 weeks tor 

personal checks 

When ordering specify computer type 

Add $3.00 shipping i handling 

UN Res add 5% sales tax 



RELSBn 

SOFTUHR 

SVSTEHIS 



P.O. Box 19096 
Minrwapotis, Minn. 




C12f827-4703 



Program continued 

317 IT[X)-CV1(CDS(X-1)) 

319 0(X)-CVI(OYS(X-1)1 

32fl IF IT(X)-i THEN Xl-X : X-5B 

321 MEXT X 

337 FOR X-1 TO Xl-1 

33S XL-1 : XH-XX 

339 IF IT(X)-IN(XL) THEN XM-XLiGOTO 343 ELSE IF ITIX1-IN[XH) 

THEN xn-XH : GOTO 343 

34B XH-INT( (XH*XL)/2) : IF XM-XL OR XH-XH THEN 344 

341 IF IT(X) CIN(XH) THEN XH-XM : GOTO 34H 

342 IF IT(X)>INiXH) THEN XL-XM : GOTO 34B 

343 IP(X]-XH 

344 NEXT X 

345 X-1 1 Xl-1 : Cl-B 

35< CI (X)-ICl(IP(Xl) 'QtX) 

355 CI-CI+CllXl 

361 X-X-fl 

345 IF C1(X-1)-I THEN 175 

37« IF X<51 THEN 35i 

375 RETURK 

481 ' PRINT SUBROUTIKE 

415 Xl-66 

411 LPRIIJTTAB(5) PROCODESj" "iDESCHIPS;- " i : LPRINTTAB( 43) "TOT, 

- 'l :LPRINTUSING " SS4». »I*)C1 | iLPHINT' "jDATES 

415 LPHINT" ■ 
417 LPRINTTAB(13) ■!?£«»■;■ DESCRIPTION ■,■ COST 

■lTAB[62) "OTyj* EXT- : Xl-Xl-3 
42( X-1 

425 IF IT(X1-B THEN 455 
43B LPRIWTTABUi)""! 
435 LPRINTUSING P2Sl X ,IT(X) , IDS t IP(X) ) . ICl ( IP(X) ) ,QU) ,C1 (X 

44g X-X*l 

445 Xl-Xl-1 

45B IF X<S1 THEN 425 

455 LPBINTSTRIHGSIX1,138}. ■LPRIHT' ■ : Xl-Xl-1 ; IF X1>B THEN 4 

55 

461 RETURN 

5il ' PRINTER PAUSE 

515 FS-INKEYS 

51B IF PS-*" THEN 545 

515 PRIHT?96B,CaRS(3i) )*D0 YOU WISH TO [C)ONTINUE OR (Q)U1T7"; 

528 Cll-998 : SZ-1 

525 GOSUB 2B0 

53B IF ES-"C" THEN 545 

535 IF ES<>"0" THEN 521 

54B XP-1 

545 RETURN 

6BB ' OPEN FILE 

6B5 CLOSE 

6:B 0PEN"R",1,"PR0C0DE" 

615 RETURN 

658 ' FIELD PARTIAL REC. 

655 FIELD 1,8 AS HM$ 
66B RETURN 

788 ' FIELD PULL REC. 

785 FIELD 1,8 AS NMS, 2B AS PD$ 

718 FOR X-e TO 49 

715 FIELD l,X*4+28 AS DUMMYS, 2 AS CDS!X), 2 AS QYS{X] 

7 28 NEXT X 

72 5 RETURN 

758 ' GET A RECORD 

755 GET 1,XR 
7 68 RETURN 

SBB ' PUT A RECORD 

88 5 PUT 1,XR 
81 B RETURN 

988 ' CLOSE FILE 

985 CLOSE : RETURN 

1B88 ' ... imiu HEou • • • 

1B85 CLS 

IBIB PHIHT894,'ME(JU" 

1B15 PRIHT#148,"1 - ITOt FILE HAINT," 

1B2B PRIHT8212,"2 - PROCEDURE FILE BAINT." 

1B25 PRIHT|276,"3 - PRINTER" 

1B3> PHIKTe348,"4 - END PROCESSING" 

1B35 PBINT*534,"CHOICE"| 

1848 SZ-1 : CU-541 : GOSUB 1B8 

1145 IF EKl OR EI>4 THEN 1848 

1847 IF EI-2 THEN GOSUB 688 

1B58 OH El GOSUB 2881, 38B8, 4888, GBBB 

1855 GOTO IBBfl 

2888 ' • . * iTH( FILE MAINTENANCE ' * * 

288 5 X-1: Xl-1 tX2-l:FL-B:XF-8:XC-l 

2818 CLS!PBINTCHBS{91) 1" - LST PG : ")CHRS[92)i" - HXT PG ! * - 

END ! [A)DD 1 (D)EL : [E)DIT" 

2815 PRINT:PRINT"ITEM» DESCRIPTION COST" 

2828 PRINT 

2825 FOR X2-1 TO IB 

283B PRINTSX2»64+192, USING PlSi IN (XI) , IDS{X11 , IC 1 {XI} 

2832 Xl-Xl+l 

2835 NEXT X2 

2841 PRI(rr«96B,CHRSl38) (•CHOICE i"i 

2845 SZ-l : CU-969 

2858 GOSUB 288 : A-ASC(ES] 

285S IF A-IB AND XK2B8 THEN 2825 

2168 IF A-91 AND X1>2B THEN Xl-Xl-2e : GOTO 2B25 

2865 IF E$-*D* THEN 2B98 

2878 IF E$-"A* THEN 2141 

2875 IF ES-'E* THEN 224B 

1888 IF E$-"** THEN 234B 

2885 GOTO 2848 

2898 ' DELETE 

28)2 FL-1 

2885 PRINT«896,'D"riPRIin'»968,CaR$(38) i"ITDIt :"; 

2188 SI-4 I CU-96e 

218S COSUB 188 I IF El-I TflEK 2848 

2118 FOR X-Xl-18 TO Xl-1 

2115 IF I»rr{El)-IM(Xl THEN IN(X)-B : IDS(X1--' ! ICl(X)-t 1 X 

F-1 

2128 NEXT X 

2125 IF XF-B THEN PRINTS972 , "NOT FOUHD"( : FOB Z-1 TO 28ejNEXTiP 

RINT»896,' 'iiGOTO 2848 

2138 Xl-Xl-18 i XF-B : PRIBTeflSfi," "; 

2135 GOTO 2825 

Program continues 
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on Software for TRS-80 



NEWDOS/80 Version 2.0 

The most sophisticated DOS ever pro- 
duced lor the TRS-80' Models I and 111. II 
provides the user with "MAINFRAME" 
power on a "MICRO" 

Some Features available are 

• Jobstream Control Language 

• Mod I Mod III Diskette mterctiangability 

• Double Density Support on Model I 

• Pagenatiofi of BASIC hslmgs on ihe screen 

• Basic DTogram single stepping 

• Dynamic variable manipulation 

• Multiple array sorts with BASIC CMD 

• Complete techriical support provided 

All this plus much more for only 
$149.00 



UNIVERSAL TERMINAL 
PROGRAM 

UNI-TERM/80 



V. 



By Pete Roberts 
I The ir^telligent program that takes advantage I 
of the extended NEWDOS/80 commands isl 
here Supporis bo'h Model I A Model III with 
user defined translation tables, and buffered I 
upload/download capabilities. UNI-TERM/SOl 
supports standard RS-232 or buss decoding 
modems. Easy way to customize your initial- 1 
zation parameters 
For Model land III $89 00 1 



CHEXTEXT" 

Let your TRS-80' do the proofreading 

on your SCRIPSIT* text files" 

Features of this program include 

• Complete dictionary maintenance in- 
cluding the addition and deletion of 
words 

• Menu dnwen lor ease ol operation 

• Spelling Checker 

• FREE expanded dictionaries avail- 
able, depending on your drive 
storage capabilities. 

NEW LOWER PRICE $59.95 



THE MICRO CLINIC 

by Dave Stambaugh 

"An ounce of prevention is 
Routine system checkout will help 
prevent that dreaded loss ol data, a 
thorough system checkout includes 
both Memory and Disk diagnostics. The 
Micro Clinic otters the most exhaustive 
set of routines known of for the Model I 
or III Don'l take Chances with your data. 
a routine system checkout is your best 
friend. 

worth a pound of cure" 



Model I version 
Model III version 



S24.95 
$29.95 



ENHBAS 

(Enhanced Basic) 

By Philip A Oliver 
Manjfaduref ■ The Cornso'f Group 

Adds 50 new (unctions, statements & com- 
mands [0 TRS-80 Mod. I & III 

I Examples 

WHILE'WEND 

3 GRAPHIC COMMANDS 

SEARCH 

WINKEY $ (auto loopsi 

AND MUCH MORE 
I See reviews m Nov BYTE & Nov. Dec 80 US| 
$59.95 



Assorted Items of interest | 


Lazy Writer iMod 1 disKi 


$125.00 


Lazy Writer iMod Ml diski 


$175.00 


Meal Master iMod i & Mi diski 


S 24 95 


Scarfman idisk) 


$ 19.95 


(lapel 


$ 15.95 


Flextexl 1 (mod 1 & 111 disk). 


S 29,95 


Flextext II (mod II disk) 


S 29.00 


Big five games (mod i A ill) 




disk 


$ 19.95 


tape 


$ 15.95 


NEW! AVAILABLE NOW j 


FLEXTEXT/80 (for MX-80 P 


rinters) 


Requiras Graltrax 


.$ 34.95 


Catalog you- directories 




FILE DISC 'HO 


S29 95 



SUPER SPECIAL-ONE MONTH ONLY-50% OFF ON MTC's MOD I DATAMANAGEMENT SOFTWARE 

MTC AIDS III 



Ihe t>e^i ol Meta Technologies family ol data management systems This easy 
tn use svstpm ^'io*s even a no*i':e TRSSO jser to create data tiles custom 
j^-'iyu-ed 'or Tian, applications ''om ii'=;s tO' rnaiLng and cata.oging :o 
I inane la 'epo fling ana time scheduling Easy "o c jstofiie without program- 
Tiing ;i IS compete *ith features tor adflmg oeifli^g soMing updating and 
printing The 'le'tn'iiy witi rnake it one o' your mos' usefu- sotwa'c puTCliases 
MODEL I R«g Price $69.95 Sal* Pric* S35.O0 

MTC CALCS-IV 

• More Computations • Save Report Formats on Disk 

• Faster, and more' 

MTC CALCS Reg. Price $39.95 Sale Price $20. OO 



MTC MERGE - III 

Combines up tQ 14 AIDS data tiles mlo a smgie Nie Duplicates Tiay ODIonaMy 
tie purged ana sorleQ orOerot reco'ds is maintained Ma:hinecode 'o' speed 
manes this uselu' it large data 'iies are 'o oe created ''om smaNer ones 
MOOELI Rag. Prica $19.95 Sala Prrc* S1000 

APPARAT SPECIAL AIDS - III SYSTEM 

AIDS - III -*- CALCS IV -t- MERGE - III 
SA\/E**Buy all Ihree at one low price 

Model I Reg Pries ....$128.85 Sale Price $64.45 

LIMITED QUANTITIES 

AIDS III. CALC IV. & MERGE III are trademarks of Meta Technologies. 



MISCELLANEOUS SUPPLIES 

DISKETTES 

Double density, sot! sectored replacement guaranteed Spindfe/Huh 
protected iS'^onlyi 

Verbatim Datalile 5'. ■ 40 track S24 95 

Apparats No Name 5'j' 40 track $2195 

VerOalim Datahfe 8 model II S39 95 

PAPER 
a''i'xl V blank white, tractor feed paper, full boi ... S24 95 

8''i"x1 I ■■ blank white, tractor feed paper, hall box $14.95 

14'/i"xtt" grsen bar, tractor feed paper, full box $34.95 

3'Vxl5/16" tractor feed mailing labels $19,96 

OTHER 
(NEW LOW PRICES) 

5'V" plastic library case S 1 95 

B' plastic library case S 4 95 

5'. Flip-sort $2195 

8' Flip-soft , $31 95 

16K memory kits $19 95 



Apparatjnc. 



UNPRECEDENTED 90% DISCOUNT SALE 

On MODEL II Commarclal Grade Buainatt Softwar* 

(LIMITED Quantitlaa Avallabia} 



TITLE 


LIST PRICE 


SALE PRICE 


General Ledger 


$300.00 


$3000 


Accounts Receivable 


$300 00 


$3000 


Accounts Payable 


$300.00 


$30.00 


Inventory 


$300 00 


$30.00 


Order Entry Processing 


$300 00 


$30.00 


Sales Analysis 


$300.00 


$30.00 


Word Processing 


$400.00 


$40.00 



'All systems includa Bilensive situation oriented documentation, but ii 
supplied on dfsketle onfy 

'Above software sold as is and require a minimum of 64K and two 
drivat 

[Sorry, but al these redtcutously k>w prices our usual so^Tware 
support will not apply) 

ADD $3.00 for postage anij handling tor these items 



tsa 



■On-going Support for Microcomputers" 



4401 S. TamaTac Pkwv • Denver. CO 80237 • (303) 741-1778 • (800) 525-7674 



'S*» L'St ol Advertisors pn p*g»4ia 



80 Microcomputing. December 1981 • 255 



COMSOFT 




TSHARE 2.0 
MULTI-USER SYSTEM 

for the 

MODELS I & 



TRS-60® 



® 



Powerlul addiliofi to NEWDOS80* expands the capacity of a 

single TRS-80 to service TWO active users with full access to 

NewdosSO 

Users operate independently with joint access to disk and up to 

two printers. 

Execute BASIC or ASSEMBLY language (above 7740 Hax). 

2nd user communicates via a TERMINAL, modem, or second 

computer acting as a terminal. 

NEW BUILT-IN FUNCTIONS 

• Communicate between users 

• Execute two programs concurrently 

■ Joint execution o( single source 
program with separate data areas 

• Open same tile by two users 

■ Mulli-user MINI-DOS 

Requires 32K model I or III with one disk drive and a serial port 

interface (software drivers built-in for RS-232* , HUH-8100*. 

TRS232*.andMPR-232* mtertacest 

SIMPLEX mode tor non senal-port users. Requires only expansion 

interface or TRS232 with printer to act as second "screen" 

Jobs share TRS-80 keyboard under user control. 

CONFIGURE utility makes it easy to partition memory between 

users and select I/O modes 

TSHARE 2-0 for NEWDOSSO S 99 

Please specify model t or III (Model in available Sep 1. 19B1) 
TSHARE 1 3forTRSDOS2.3/NEWDOS2,1 t 89 

TSHARE 2 -f MPR-232 interface (tof non RS 232 users! . - $199 

S10 Upgrade privilege for TSHARE ^.3 licensees 



DDM5 



»79 
MODELS I A 



MULTI-FEATURE DATA MANAGER 



up to 20 user detmed lields. 

Files extend across rrtulliple 

diskeites 

Supporls up to lout drives. 

Automatic single drive disk 

mount requests 



Four data types and compu- 
tational fields 

Flexible HEPOflT GENERATOR. 
Fast assembly language sorts 
MULTI-FIELD sons & searches. 
Keyed access on any sorted tie Id. 
Indexed teiatioris between files 



VIEW 



S19.95 CSTOCK 



S49 



A SCREEN FORMATER 
FOR DBMS 

Full CURSOR comrol 

Protected fields 

Usef lorm DESIGN 

File data entry, inquiry. 

&edit 

Elegant & professional look 



DISK DATA BASE « 

ANALYSIS TOOL 

FOR STOCKS 4 OPTIONS 

' Regression analysis 
' Charts 

' Portfolio selection 
' Risk management 



SERIALI/O 
MPR-232 



A serial port interface designed to properly connect to TRS.-80 
with or without an expansion interface. 

• Glitch tree operation 

• Connects with card edge connector 

• Uses TRS-80 power supply 

■ All parameters switch selectable 

■ Baud ratae 50 to 19200 
Manufactured by: 
Micro Projects Engineering Co. 
Culver City, CA 

$119 (ASSEMBLED & TESTED) 



TO ORDER 



CcmScFt 



TRS-aOtm 

Radio Shack/Tandy Corp 
NEWDOS tm Apparat, Inc. 
TRS232 im Small System 

Software 
HUH tm California Computer Systems 



1569 Westwood Blvd. 

Suite B 

W. Los Angeles, CA 90024 

2ia*4M369 



ADD ITEM 



iroRZ-ITOiaifNE 



Program continued 
2na • 

2142 FL-1 

21«5 FORX-Kl-IB TO Xl-1 

215B IF TNIX)-B TliEN XF-X : X-Xl 

215& IJEXT 

2161 IF XF-fl THEN PRINT?968 , "THIS PACK IS F1]LL! 

XT:PHINTPB96," "jiGOTO 2840 

216i PRINT*96B,CHRSi3fll ;"ITEHI !*j 

2j;a SZ-4 : C'J-96€ 

2175 GOSL-B IBB 

21BB If El-0 THEN XF'B : GOTO 2B4I 

2182 IN1XF1-IST(E1] 

21B5 PRINTg572,"DESC :'; 

219B SZ.2e : CU-979 

2195 COSUB 200 : ID$<XF)-E$ 

2200 IF ES-5TRING;(20,32] THEN 2185 

22B5 PRINTJIIBBB.'COST :*i 

2210 SZ-6 ; CU-ie«fi 

2215 GOSUB IBB 

222B ICl IXFl-EI 

222b XF'B : Xl-Xl-IB 

2238 PBINT*960,CHfiS(3B) I : PmNTSB96,' ' ; 

223 5 GOTO 2B25 

2248 ' EDIT 

2242 FL-1 

2245 PRINTg96B,CHRS(3B) i'ITEH I* f ; PR1I'T*B9S, "E" i 

2258 CU-966 : SI-4 

22S5 GOSUBIBB 

2268 IF EI-B THEN PRINTP896,' " j : GOTO 2B4B 

2265 FOR X' Xl-lfl TO Xl-1 

2278 IF E1"IN(X) THEN XF-X: X-Xl 

2275 NEXT X 

2288 IF XF-B THEN PRIKT?972 , "ItOT FOUND";: FOR X-1 TO 20a!SEXTiPR 

INTgB96,- ■!GOT0294e 

2285 PRINT8972,"DE5C:"! 

2290 CU-979 ; SZ-20 

2295 COSUB 208 

23BB IF ES<>5TRIHC$(2B,32)THEN ID$(XF)>ES 

2105 PHlWreiBBB.'COST :'; 

2318 CU-10B6 : SZ-6 

231S GOSUB1B0 

2320 IF ElOB THEN ICUXD-El : PC-1 : PC (XC) -IN(XF1 : XC-XC + 1 

2325 PRlNTS896,CliRS(31) r 

2330 Xl-xl-10: XF-B 

2335 COT02B25 

23 40 ■ END 

2342 IP FL-B THEN 2430 
2345 FOR X-200 TO 1 STEP-1 

2350 IF IN(X)<>B AND FLOB THEN XP-X : FL-0 : X-1 

23 5 5 NEXT 
2360 X-1 

23<5 IF IN(X)<>0 THEN 24B0 

2370 F0RX2-X TO XF 

237! IN(X)-IN(Xtl) 

2380 IDSCXl -IDS(X+1) 

2185 ICI1X)-1CI (X+1) 

2390 NEXT X2 

2395 XF-Xf-1 

2400 IF X<XF TBEH X-X>1 : GOTO 2365 
2483 GOSUB 2SBfl 
2485 OPEN "0",2,"ITQ1S* 
2487 PRINTI2, XF 
2418 FOR X-1 TO XF 

2 415 PRINT*2,IN(X) )CHRS[14) ,IDS[X) iCHHS(34) ;ICJ (X) 
2 428 NEXT 
2422 XX-XF 
2 425 CLOSE 2 
2427 XC-XC-1 
2430 RETURN 
2508 ' 
2585 CLS 
FOR 



IF XOl THEM GOSUB 5081 



2510 

2515 

2520 

2525 

2530 

2535 

♦1) 

2541 

2545 

2558 

2555 



F-B 



- - - ITEM SORT SUBROUTINE - - - 
PRINT048 8, 'SORTING" 
1 TO XF-1 

■1 TO XF-X 

IF 1NIXD-.1) >-IN(XD) THEN 255B 
T1J-I»(XD) :TDS-IDS1XD) .TCl-ICI (XDl 
IN[XD)-IK1XD<-1) !lDSflD)-IDSlXI>-H) iICl(XD)-ICl(XD 



(A 



IN ( XD*1 ) -TH t IDS I XD+1 ) -TDS ! IC 1 (XD-H ) -TC i 
F-1 

NEXT XD 

IF F-0 THEN X-XP-1 
25(0 NEXT X 
25fi5 RETURN 
2999 ■ 

1000 ■ • • • FKOCEDURE FILE MAINT • • • 

3016 rL-BiKS-":PR0CODES-'*:DESCRIPS-'"!Cl-B 
1007 POR X-1 TO 50 

3008 ITtXi-0:O(X>-0:IPIX)-8:CI (XI -8 
3809 NEXT 
3015 CLS 

3020 PRINTB0,CHRS[91I !--BXWRD i ' [CBRS ( 92) j "-PRtfllD : •-CHB 
)DD : (D)EL : IE)DIT"i 
1825 CU.62:SI-1 
3030 G05UB2B8 

3035 IF ES-"" THEK COSUB 908 : RETURN 
3040 A-1NSTR(1,"AIIE',ES1 
3045 IF A-B TEEN 3B3B 
3858 PRIHT§64, 'PROCEDURE t'j 
3055 CU-76:SZ-7 
3B6B GOSUB180 
3865 RC>B 
38fi6 FROCODE$-E$ 
1867 COSUB 658 
3B6B XR-1 : IF L0F(1| 
3B69 GOSUB 758 
3B78 IF PR0C0DES-I.EFTS(NMS,7 

3075 

3871 IF XR-LOF(l) THEN RC-4 

3872 XH-XR«1 
3871 GOTO 1069 

1075 IF RIGHTSINHS,!)-"' THEN RC-1 

30B8 IF HC-4 AND A-1 THEN GOSUB 708 : GOTO 3170 

3085 IF RC-0 OR RC-1 THEN IF A>1 THEN A'3 ; GOTO 3128 ELSE 3128 

3095 fOS X-1 TO 5: PHINT?46B , "•*• PROCEDURE NOT ON FILE *•"; 

3108 FOR XT-1 TO 1BB:NEXT XT 

Prograr" conf/nues 



1 THEN RC- 



GOTO 31 



THEN GOSUB 780 :GOSUB 758 : GOTO 



GOTO 3888 
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Program continued 

3la5 PRINT844e,CHIl$(3t) I 
3187 FOR XT-1 TO 111 , NEXT XT 
3111 HEXTX 
3115 GOT03B35 

3121 ■ COHVERT 

3125 GOSUB TBI i G0S1JB 311 

3167 ■ DISPLAY 

1171 X=l:Xl-l!X2-l 

3175 PRINTei28,"PHOCEOUBE : " jDESCRIPS; !PRINTS175 .•TOT-"; iPRIKT 

USIHG 'SSIt-II'lCI 

3181 PBIBTei92,' ITEHI DESCRIPTION COST 

QTlf EXT -; 

31B5 FOR X2-1 TO II 

1X91 PRINTM2»S4*192, USIHG P2S;X1 ,rT(Xll ,IDS(IP{X1)) ,IC[(IP{X 

1)),Q(X1),CHX1)! 
3195 Xl-Xl+I 

3211 NEXT X2 

3212 IF A>:2 AND RC-I THEN GOSUB 351* : GOTO 3111 

3215 IF RC-1 THEN PRIHTI9I6 , **•• THIS RECORD IS FLAGGED FOR DELE 
TION **•■; 

3217 ' FIELD ENTRY 

3211 PRIHTI96I,* FIELD:'; 

3215 CU=968:Sl-2 

3221 G0SUB2II 

3225 IF ES-'» ■ OR ES-' '" THEN IF FL«1 THEN GOSUB 3381 :G0T0 31 

II EI.SE 3111 

3231 E-A5C(E$) 

3235 IF E-ll AND XK5I THEK 3185 

3241 IF E=91 AND X1>2I THEN Xl-Xl-2i; GOTO 31B5 

3245 FL=1 : El-VAL(ES) 

3246 IF [A=l OR A-3) AND Ei>l THEN IF IT1E!-1)'I AND E1>1 THEN 3 
21i 

3247 IF E1>5I THEK 3215 

3251 IF Cl>l THEN 3285 ELSE IP E!-l THEM 3215 

3255 PRINTe96f, "PROCEDURE ;'; 

3261 S2-2I:CU-97I 

3265 GOSUB 211 

3271 PRINTe96l,CHfiS(3ll i 

3275 DESCRIPS-ES 

32BI PRINTI141,STRINGS(2l,32)!:PRINT?141,ES;:GOT0321l 

32B5 IF EI> Xl-1 OR EKl THEN 3218 ELSE XE=CI»T(E11 

3291 PHINT?975,*ITE11ti ■( 

3295 SZ=4:CU=982 

3311 GOSUBlll 

3315 IT(XE)-E1 

3311 PRINTS99l,'QTYi "j 

3315 SZ-3i CU-996 

3321 GOSUBlll 

3325 Q(X&)-EI 

3331 X2=VAHRIGHTS(STRS(XE) ,1)) 

3335 IP X2-8 TBEN X2-1I 

3336 FOB X3-1 TO 281 

3337 If IT(XB)-IN(X3) THEN IP(XE)-X3 : X3 - 280 

3338 IF IN(x3)-8 THEN X3-2eB 

3339 NEXT X3 

3348 C1{XE)-ICI(IP(XB))*Q[XE) 
3342 Cl'8 

3345 FOR X-1 TO 51 

3355 CI-Cl+CI [X] 

3368 NEXT X 

3365 PRINTei75,"TOT. -" j iPRINTUSING'SSI* .!»" fC! t 

3378 PRINT#X2*64+192,CHBS[38) jiPRINTUSIHG P2S!XEj IN( IP(XE) ) j IDS( 

IP(XE))iICl(IP[XE)),Q[XE)iCI[XE)) 

3375 PRINTI9Se,CHBS(3i),;GOTO 321B 

3381 ' BECORD 

3385 IF A"l THEN XR"LOFll)tl 

3387 IF RIGBTSiPROCODES.l)-"" AND A=3 TBEH MIBS(PR0C!K)ES,8,1) =' 

339i LSET NKS-PROCODCS 

3395 LSET PD$-DESCRIP$ 

3411 FOB X-1 TO 56 

3415 LSET CDS(X-l) "HKIS{IT(X11 

3411 LSET Qy$(X-l) >KKI$(0(X)) 

3415 MXT X 

3435 GOSUB 81* 

3451 RETURN 

3511 ' DELETE PROCEDURE 

3512 PRIIIT«B9e, • IS THIS THE PROCEDURE TO DELETE ? " 

3515 CU-95e I SZ>1 

3511 GOSUB 211 

3515 IF ESO-Y" THEN 3SSI 

3521 HIDS(PB0C0DES,8,1)-"" : Xl-1 

3522 GOSUB 3381 

3525 PRIHTiej6,CHBS(3IJ; 

3531 FOR X-1 TO 111 : KEXT 

3535 PRIHTF918,- • • PROCEDURE DELETED • ""i 

3541 FOR X"l TO 111 : NEXT 

3545 IF Xl<5 THEN Xl-Xl+l i GOTO 3525 

35 51 RETURN 

4111 ■ ••• PRINT **• 

4115 CLS 

4111 PRINTS2B, 'PROCEDURE PRINTOUT" 

4115 PRINT"* = END i A - PRINT ALL : I -^ ITQIS 

EDURES "; 

4121 SZ=l:CU=12e 

4125 GOSUB28I 

4131 IF ES«"*" THEN RETURN 

4135 IF ES-"S" THEN 4125 

4837 IF ES-"I" THEN 4225 

4141 IP ESO'A" THEN 4121 

4145 ' PRINT ALL 

4I5B IF PEEK(14312)<127 THEN 4875 



S = SELECT PROC 



4155 PRINTS488,"' 
4168 SZ>1:CU>448 
4865 GOSUB 2 88 
4B7B GOT04a51 
4875 GOSUB 688 



PLEASE PREPARE PRINTER"*" 



GOSUB 708 : XR=1 



4888 IF LOPdXXR THEN 4115 

4885 GOSUB 758 : IF RIGHTS (NMS , 11 > 

4898 GOSUB 388 

4895 GOSUB 488 

4188 GOSUB 588 

4185 xa - xa+1 

41la GOTO 4880 



IF XP-1 THEK XP-B : GOTO 4115 



Program continues 




Dough 'flo (do'flo) n. [Colloq] a highly inter- 
active business or home finance proor^^, 
designed to instantly analyze where tiMMM 
all that money went. 

Doughtlo. It'* ■ bUBlMSt prafpMn It't ■ horn* tlnanc* program. Ooughno <• (now hold 
your brialh). "in ■xpcndilura orianlKl data baM mwwgafn«r>( lyiMm. " |Wtt«w.) But 
beBl ol •II. Ha «asy lo um 

What tha hack do*t Doo{)htlo do? Lots 

""■ " v^Miysisof buitnetwoitwrnecasfitio* (Fio?l 
-*^-n»8 With up lo 26 u»«f fladnoa caiagoriM. 

at homy tad. tNMl«M» expensM (oi laa. Social 



Sac 
I0««|| 

iiat>i«loi 

cfiecks, ove' any 
cteftciiphont 



copy ol any numlMr ol it*ms and 
lagonas, amounts, vsndort. o' 



B« youf own buslM*« BMljrtt' Vtriwrily oOmIMm a boohliMpar, bccama your com- 
put*r dea* th» work lor you Ua* Doughllo to... 

• Instantly ret'ieve up lo 450 racofdt at a time without ime coniumingdiMi 
access 

• Easily generate (tatailM reports o' all flipenailuies 

• Saiisly youf t>oss. wile, ifios&arnj''). c yourseit thai you Know now wsety 
(O' loolistily) money is t>eing Epent 

Exco«dlng)v itmpta lo us* (w« t*tt*d it on slmplo p«aplat|. now Ittcr* i* no axcua* 
not lo know wtisro Ittc tMll you latt all that money, whathar II was last year or laat 
month Bast ol all. mayba now you'll b* able to save som* ol that dough tot tha 
luture! Requires 32K and one or more disk drives. Specify Modal I or lit. A) only 
S39.95 poalpakl. It's a staal sura to saw you nwnay! ~ 



P.O. BOX 597 FORESTVILL£, CA 95436 
24 hr. phone (707) 887-7237 [-^^-J ^ 



PERFECT 
CLOAD 

I III I 



TIME' * 

ALPHANETICS TRS-fiO TAPE DIGITIZER 

' rroffi t iwiaiir'fn Ihfl Saplvmbw-Oclobtr 1M0Ek«m«nEtiv Etvclronica. Rapftnli ««*llabl« upon i 

At t«*l there It a cure lor TRSH lap« ctoatMng bluas For over three yseis. Alphanellcs 
ha* bean selling ItM TflS-BO Tape Digitliar, a proven hardware solution lor your soltware 
proWems. No longer rMed you juggle the lacordar'a volume control endlessly, trying lor 
a parlaci cload ol a pre-recorded program. Just pop the (apa into the casselle recorder. 
process the signal lt>roughourd>gllMar.Bndyau're ready to nuN a patted loadJ 



Just check out Mm Tape OigKlaer's faalwiaa.- 



tnoepenOeni ol volume control 



itowa copying system and normal tapas wtthout using (^ 

ahee a pecieci digital copy ol any tape, without i 

moving hum. no<Be. and cures Tir>or dropouts 

Mselie svulcti allows mwiual cfeniroi ol cassellarecordar. _. 

Icompular control. 

OoodOata' indicator easily enables setting propar volume. . .doublaaM 

tape monitor. 

-C, powered — rio baiieries to replace ^.. 

Duseainasiu(dy,attractiv«rr>eialcas«. ,':^' ■. ..'j._a. 

Bmpieteiy compatible with level I i II, also LOW speed III 

f. 

^ — -^a IQ »ia AJphwtaMcs Tape PfHtm awd teed youf cot 
mTnmjpm yOM I>|M.^Gm ltd el youf tape bv^a 



^See List ot Advertisors on page 418 




"Simply the Best" 

Service 
Technologies 

Centronics Printer Sale 

Completely Refurbished, 30 Day Warranty 

Model # 

101 165 c.p.s., 132 print posjlions, 5 x 7 dot matrix, 

areal work horse only S449.00 

101A Same as above with the added features ot 9 x 7 
dot matrix and USASCil 95 character 

only S549.00 

101AL Added Bells and Whistles. All the features ot the 
101 line plus LSI only S749.00 

102A 330 c p.s., 125 L.P.M bi-directional print 9 x 7 dot 
matrix only $949.00 

*306 The best of Centronics line at the best price, 

compact, 120 characters per second, 5x7, VFU, 
top of form and more only $689.00 

Ouietizer covers available for this model only 

only S 89.00 

501 120 c p.s., 30 L P M at 132 character lines, 150 

L P M. at 30 character lines, 5 x 7 dot matrix. 
sprocket feed, motor control only $649.00 

503 120 c.p.s., Sister to the 501 with bi-directional 

print at twice the speed only $749.00 

• Print stands available for all models only $ 70.00 

• Paper catchers for all models only $18 00 



Options 



• Add lower case to most 
Centronics Printers only S89.00 

• Add Motor Control to your 
779 printer only S95.00 

Our Converston Kit I gives most 

Centronics printers the ability 

to print in upper and lower 

case $89 00 

Our Conversion Kit II turns 

your motor on and off aulo- 

matjcally Increases the lite ot 

your printer $95 00 

Bolh kits require NO soldering, 

etch cuts, software mod. or 

interlace. Easy Installation. 



Interfaces 

• Now use your Centronics 
Parallel Printer on any Computer 
with a aerial Port. Available in 
lour models all with switchable 
baud rates. 
Model 
CSP ■ 100 

Nobuffer only $175.00 

CSP 200 

256 char buffer only $225 00 
CSP - 200X 

X on/X oft Protocol only S340 00 
CSP - 2000 

2048 char butter only $395 00 

Many More Inlerteces Available 




To order Call 603-883-5369 
Service Technologies 
32 Nightingale Rd. 
Nashua, N.H. 03062 




Visa and Master Charge accepted 
Inquiries Always Welcome 

Shipping and Handling Extra 
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P,agr 



nu^a 



-SELECTED PRINT- 
KEXT X 



1 G05UB bit 
GOTO Allt 



XR THEN 41 8B 



IF XP-1 THEN Xf-e i GOTO 4US 



-SELECTED PRINT- 
HE XT X 



4115 GOSUS 9«e : GOTO 4001 
4135 • 

4127 FOR X-1 TO 4t i PS(X}- 

413 CLS 

4135 PRINT-ENTER PROCEDURE I l£) TO PRINT [KAX*4e]: ENTER • TO 

END*; 

4140 CU-12eiX2-liSZ-7 

4145 GOSUBieB 

415B IF LEFTS(ES,1)-"' THEN 4175 

4155 PS(X2).ES*' • 

41fiB CU'CU4'16 

4165 X2-X2*l 

4179 IF X2<41 THEN 4145 

4175 RC-B 

41Bi GOSUB 680 : GOSUB 780 : XR-1 

4185 GOSUB 7S0 

4190 FOR X3 > 1 TO X2-1 

4195 IF PS1X3)-"' OB PSIX3)<>NHS THEN 4210 

4280 GOSUB 300 : GOSUB 480 

4282 IF XF - 1 THEN XP - : 

4285 PS(X3) •■* i X3 - X2-1 

4218 NEXT X3 

4215 XB - XR+1 1 IF LOFU) 

4220 GOEUB 98 8 : GOTO 4888 

4225 ' PRINT ITEMS 

4229 L-S : X-1 

4238 LPRINTTAB1151 'O.H. PROCEDURE ITEKS"; 

4235 LPHINTTAB(6B)DATES 

4248 LPRINT ' "iLPRlHT" ■ 

4245 LPRI»TTAB(51 'ITEHI DESCRIPTION COST" 

4250 LPRI>nTAB(5) STRINGS (60 , 45] ; : LPRINT' * 

4255 IF L>50 THEN LPRINT STRINGS [67-L, 1381 i L-2 : GOTO 4245 

4260 IP IN(X)-0 THEN 4000 

426 5 LPRIWTT*B(5)'*,iLPRINTUSINGPlS|IN[Xl iIDS(X) iIGKXl 

427ff L-L+1 I X-Xil 

4275 GOTO 4255 

4080 IF LOFdHXR THEN 4115 

4IB5 GOSUB 758 : IF BIGHTS (NHS, 1 )-■* " THEN 4185 

4090 GOSUB 388 

4895 GOSUB 488 

4108 GOSUB 508 

4105 XR - XR-*1 

4118 GOTO 4888 

4115 GOSUB 908 : GOTO 4800 

4125 ' 

4127 FOR X-1 TO 48 : PS(X)' 

4130 CLS 

4135 PRINT'ENTER PROCEDURE I ISl TO PRINT (HAX-4B) : ENTER • TO 

END*) 

4140 CU-12S:X2>1:SZ'7 

4145 GOSUBIBB 

4150 IF LEFTS(ES,11-'*' THEN 4175 

4155 PS1X2).ES+* * 

4160 CU-CU-16 

4165 K2-X2H 

4178 IF X2<41 THI:N 4145 

4175 BC-B 

41BB GOSUB see : GOSUB 708 : XR-1 

4185 GOSLB 75B 

4190 FOR X3 - 1 TO X2-l 

4195 IF PS(X3)-" OR PS(X3)i.>NMS THEN 42ie 

4288 GOSUB 300 : GOSUB 408 : GOSUB 588 

4282 IF XP - 1 THEN XP >^ B : GOTO 4220 

4205 PS(X3}.*- : X3 - X2-1 

421B NEXT X3 

4215 XR - XB-H 1 IF LOFIll >■ XH THEN 41B5 

4228 GOSUB 9B0 i GOTO 4800 

4225 ' PRINT ITEKS 

4229 L-5 : X-1 

4230 LPRINTTABdil "O.F. PROCEDURE ITEMS'; 
4235 LPRINTTAB16B)DATES 

4246 LPRINT " •:LPRINT' " 

4245 LPEINTTAB(51 'ITEHI DESCRIPTION COST" 

4258 LPRIirTTAB(5l STRINGS (6B , 4S} ; : LPRINT" * 

4255 IF L>58 THEN LPRINT STRINGS (67-L , 138) : L-2 : GOTO 4245 

4260 IF IN<XI-B THEN 4080 

426 5 LPRINTTA6I51 "" i : LPKINTL'SINGPl S; IN (X) iIDS(X) iICHX) 

427fl L'L'l i X=X+1 

4275 GOTO 4255 

5B0B ' ... PRINT CHANGED PRICES ' " • 

^805 CLS 

5010 PRINT-DO YOU WISH TO PRINT UPDATED PROCEDURE SHEETS Ct/N)?* 

5020 SZ-1 ! CU-62 

5025 GOSUB 20B 

5038 If ESO'Y" AND ESo'N' THEN 5620 

■1635 IF ES-*N- THEN 5125 

5B4B IF PEEK(143121 >127 THEN PRIVT?48e , "PRINTER NOT BEADY":GOTC 

5B4e ELSE PRiNTe4ee,cuR$i3i) I 

5845 GOSUB GBB : GOSUB 788 : XB-1 

5B5B IF LOFUXXR THEN 5136 

5855 GOSUB 7',0 : IF RIGHTS (NKS, 1 )-"* " THEN 5128 

5BB!i GOSUB 388 

5898 FOR X-1 TO 58 

5095 FOR Xl-1 TO XC 

5186 If 1T(X)-PC(X1)THEN GOSUB 406 :X-5B ;X1 'XC 

5105 IF IT;X1"0 THEN X-5e ; Xl-XC 

5110 NEXT XI 

5115 NEXT X 

5117 GOSUB 508 

511B IF XP-1 THEN XP-B : GOTO 513B 

5128 XR - XR-1 ! GOTO 5850 

5125 ' 

5130 GO£UB 9B0 ! RETURN 

6000 • • • • E3iD PROCESSING • • • 

6685 CLS 

6818 GOSUB 90 B 

6 8 20 END 

10860 ' ERROR TRAP 

1BB61 IF ERB/'2tl<>54 THEN 1888^ 

18862 IF EHI.ObB THEN 18005 

10883 CLS:PRINT:PRINT"PRESS (OTO CREATE 'ITEMS' FILE" : INPUT"PHE 

BS (E| TO END PROGRAM" (AS : 1FAS<>*E"ANDAS<>*C'THEN 16003 

10004 IF AS-"E"TaEN END ELSE OPES'O" , 1 ," ITEMS" : RESUME 68 

lieSS PRINT "ERHOH f = ";ERR/2+li* LINE l"( ERL 

10010 INPUT "PRESS <ENTEB> TO CONTINUE" fAAS :RESUME 
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INTRODUCING PMC-81 




A New "Workalike" Computer In The PMC-80 Family 



The PMC-81 is a disk oriented computer 
which maintains software compatibility 
with the disk-based Level 11 TRS-80' 
Model I computer as well as its sister 
PMC-80. 

The PMC-81 starts with 16K of memory. 
14K of ROM, utilizes a Z-80 micropro- 
cessor and contains a complete stand- 
ard keyboard, built-in amplifier and 
speaker for sound, cassette interface 
and video monitor interface. Like the 
PMC-80, the PMC-81 uses the same 
EXP-lOO Expander to add 32K more 
memory and interfaces for mini floppy 
disks, printer, RS-232C and S-lOO bus. 

As a workalike computer, the PMC-81 
offers some extras over the original TRS- 
80 Model I. First, the PMC computers 
are still in production and being sold as 



brand new units with software compati- 
bility to all previous Model Is. Second, 
we offer S-lOO bus interface as an option 
in our Expander. Third, our PMC-81 has 
a user callable keyboard routine that 
provides upper and lower case charac- 
ters with an identifiable blinking cursor 
for each case plus automatic repeat for 
each key and a print screen command. 
Fourth, the PMC-81 has both a Host and 
a Dumb Terminal routine in the ROM 
which work with the optional RS-232C 
interface in the Expander to permit 
communication between two PMC-81s. 
The Dumb Terminal routine also may be 
used to communicate with timeshare 
networks or with bulletin boards. 

Best of all, the price for either the PMC- 
80 or PMC-81 is below the price of our 
competitor's offering. 

"TRS-80 is a Dademark of Tandy Corp 
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Personal Micro Computers, Inc. 

475 Ellis Street, Mountain View, CA 94043 (415) 962-0220 



UTILITY 



Hand-holding software for neophyte operators. 



Ready— For the Model II? 



Jim J. Barbarello 
R.D. 1. Box241H 
Tennent Rd. 
Englishtown. NJ 07726 



REM* 
REH* 
REH* 
REM* 
REK* 



The TRS-80 Model 11 is an 
amazing machine for some- 
one used to dealing with the 
limitations of a Model I cas- 
sette-based system. But this 
became a love/hate relationship 
for me after my most valued disk 
was destroyed. 

1 discovered two important 
points about a disk system the 
hard way: 

• Never insert a new disk and 
forget to initialize. Unlike the 
Model I, the Model 11 will not 
know where it is and may write 
over your most prized programs 
or data files. 

• Never leave disks in the drives 
all day. 

This second point may seem 
obvious but nowhere in the 
Model II literature could I find 
any such warning. I was given 
this advice from the local Tandy 
Computer repair specialist. 

In setting up the Model II for a 
medium-sized office. I decided 
to use three main disks contain- 
ing the most commonly used 
programs. By naming the pro- 
grams with suitable acronyms, I 
hoped that the most inexperi- 
enced operator could step up to 
the machine and use It. This ap- 
2M • 90 kUcmcomputinu, D»cmmb9r 1981 



proach worked very well for a 
month or so. Then the computer 
broke down, or so I thought. The 
true culprit was uncovered by a 
visit of the area field service 
manager. 

The service manager put my 
machine through its paces. 
Nothing was wrong! After some 



discussion and a look at some 
of my disks, the answer was evi- 
dent. The disks had been physi- 
cally damaged. 

The Model I and Model II disk 
systems are significantly differ- 
ent. Model II disks are contin- 
uously spinning while in the 
drive and are constantly being 



"HEADY" PROGRAM 

TO ALLOW RUNNING OF PROGRAMS AMD DISK INITIAL- 
IZATION BY OTHER 'HAN EXPERIENCED OPrRATOHS... 
WRITTEN BY JIM LakBARELLO - AUGUST 14,1988 



IBB DEFSTR A:OH ERROR GOTO 25Ba 

2>l SYSTEM'DIB':CLS:GOTO 508 

3fli PRINTf[5,221 , "THERE IS NO DISK IN DRIVE t e.-:PRI«T 

4I> FOR l-I TO 2BB:HEXTiPRINTSC7,251 ,'ASI[ FOR ASSISTANCE"i!FOR I 

■1 TO lBBi!JEXT;PRIIfTe(7,35) ,STBINGS(2i,32) iGOTC IBB 

5Ba CLS:PRIHTS{lfl,241 .'REHOVE DISKS IN DRIVES II AND #2"!PRIWTS1 

12, 3B) , "PRESS "jCHRStlfil ;"EJn'ER'jCHRS1251 :" WHEN HEADY*. 

6BS A-INPUTSm 

7Be SYSTEM'DIR 1 ' : CLS 

8BB PRINTS(5,22) ,;:PRINTCMHS(26) ;"DISK IS STILL IN LWIVE I I, PL 

EASE REMOVE. •iPHINTCHRS|25) !PRINT:PRINTTAll|3ai ['PRESS ■lCHfiS[26) 

l"ENTER'|CHRS[25) ;■ WHEN HEADY" | :A-INPUTS [ 1 ) :GOT0 7BB 

99% SYSTQ1"DIR 2"!CLS 

IBIB PHmTS[5,22) ,1 iPRIHTCaRS(2fil ('DISK IS STILL IN DRIVE I 2. P 

LEASE REMOVE. •:PBIHTCHRS;25| :PRINT:PRINTTAB13B) ;"PHESS •iCHRS12S 

1 ;"ENTER-jCHRS(251 ; ■ WHEN BEADY" j : A-INPUTS ! I) iGOTO 9»B 

IIBI PRINTS(IB,3fl) , -DRIVES 1 AND 2 ARE NOW EMPTY. * : PRINT?|1 2 , 22) 

."REMOVE DISK FROM DRIVE I B (NEXT TO SCREEN) .": PRINTS U« r^') r "P 

RESS ■jCHRS(26) ;"ENTER'rCHRS(2S) :" WHEN READY. ";: A-INPUTS ( II 

120B SYSTEM'DIR" :CLS 

13BB PHINT?(5,22) ,):PRINTCHRS(26) ;'D1SK IS STILL IN DRIVE I H. P 

LEASE REMOVE. "iPRlNTCHHSCS) :PRINT;PRlNTTAB13fl) ;'PHESS ";CHHi!26 

I [•ENTER";CaRS(251 !" WHEN READV-;:A-INPUTS|1) :GOTO 12BB 

ItBB CI-S:PRINT?(7,3i) ,*CO«PUTEH READY....' 

15Bi PRINT:PRINTTAB(10) (iLINE ]NPUT"WKAT IS THE MAKE OF THE PROG 

RAM YOU WANT TO RUN...'jAP 

16BB READ AN, AD: IF AN>AP THEN 18Bfl ELSE IF AN"*XXX" THEN ITBB EL 

SE l&BB 

17BB CLS:RESTOHE:PRINT"I CANNOT FIND 'lAPj'. PLEASE TRY AGAIN , 

OH ASK FOR ASSISTANCE'iPRINT?l7,5) ,)iGOT0 ISBB 

IBBB CLE:PRINTS|4,2a) ("I'VE FOUND THE "jANl" PROGRAM. ": PRINT: PHI 

NTTABI32) ("IT'S ON DISK I " J AD : PRI NT : PHI NTTAB [ 1 B ) J ' INSERT DISK ) 

';AD;" INTO DRIVE ( B (NEXT TO SCREEN) AND CLOSE DOOH' 
19B0 PRINT:PHINTTAB(3B) ;*PHESS " ;CHHS ( 26 ); 'ENTER' i CHBS( 251 i * WHE 
N DONE.'iA-lHPUTSdl 

2BBB SYSTEM'I";CLS:PRI»T"LOADING 'jAN;" PROGRAM." 
210B RON AN 

220B DATA STAR , 1 ,SF , 2 ,PDPXREF,3 ,MUX1/BAS,I ,HUK2/BAS, 3 
23BB DATA SUSPENSE, 2, PARTFILE, 4, XXX, XXX 
24BB END 
2S0B CLS 

26BB IF ERL-2B0 THEN RESUME 3B0 
27ee IE ERL-7B0 THEN RESUME 990 
2808 IF EHL-9e0 THEN RESUME IIBB 
2900 IF tHL-12BB THEN RESUME 1480 
3000 IF ERL-21B0 THEN CLS : PRINT'TUE "lANj" PROGRAM IS NOT ON THE 

DISK OR THE DISK IS PROTECTED ,' jPHlNT'PLEASE THY AGAIN. * i RESUME 

15BB 
31BB RESUME NEXT 



Program Listing 



abraded by the internal disk 
jacket cleaning material. You 
can see that the disk gets a little 
warm! This heat, coupled with 
that from the disk drive itself, 
may cause the disk to warp just 
enough to physically touch the 
read/write head. When this hap- 
pens, the head will destroy the 
magnetic coating. 

Now that I had learned my les- 
son, I still had to maintain ac- 
cess to a numtjer of disks by in- 
experienced operators. How- 
ever, having killed another disk 
by inserting it and forgetting to 
type SYSTEM"I", I was worried 
that one of my operators would 
do the same thing. 

My solution was the Ready 
program (Program Listing 1). 
The Ready program guides the 
most inexperienced operator 
through the perils of finding the 
right disk, inserting it in the 
drive, and running the program. 
The program automatically ini- 
tializes the disk. It also prevents 
a disk from being left in any of 
the drives. The Ready program 
resides on each disk and is 
called from any of the programs 
on that disk. 

Each of the programs I have 
written contain a menu of func- 
tions, one of which is End. When 
End is selected, the operator is 
prompted to wait as the Ready 
program is loaded into the ma- 
chine. The Ready program then 
provides very specific instruc- 
tions for the operator. This situ- 
ation produces a continuous 



loop in which either Ihe Ready 
program or the program select- 
ed by the operator Is always In 
control. 

The Ready program is based 
on the use of the error functions 
ON ERROR GOTO and ERL The 
first line of the program (line 
100) defines a jump to tine 2500 
when an error occurs. In normal 
use. the program is called by a 
program resident in the machine 
and, therefore, a disk is in drive 
zero. To check for this, line 200 
asks for a directory of the disk in 
drive zero and if it finds one, 
jumps to line 500. If there is no 
disk in drive zero, an error 
results and execution jumps to 
line 2500. The screen clears and 
since the error occurred in line 
200, execution resumes at line 
300, 

Line 300 informs the operator 
that there is no disk in drive zero 
and line 400 flashes the mes- 
sage "Ask for Assistance". A 
more experienced operator can 
then be called, insert a disk, and 
assure that it is properly ini- 
tialized. If there is a disk in drive 



zero, execution jumps from line 
200 to line 500. The screen clears 
and the operator is prompted to 
remove any disks in drives one 
and two and to press Enter when 
this has been accomplished. 
Line 600 waits for Enter key to 
be hit. 

Then line 700 asks for a direc- 
tory for drive one. If everything is 
fine, it will find an error and jump 
to line 2500. Line 2700 then re- 
sumes execution at line 900 It 
the operator forgot to remove 
the disk in drive one. no error oc- 
curs in line 700 and line 800 in- 
forms the operator that there is 
still a disk in drive one. The op- 
erator cannot proceed until that 
disk is removed. Lines 900. 1000 
and 2800 perform the same 
check of drive two. 

Line 1100 informs the opera- 
tor that drives one and two are 
now empty and that the disk in 
drive zero should be removed. If 
the operator fails to remove the 
remaining disk, line 1300 
prompts that the disk is still in 
drive zero and loops back to line 
1200 until it is removed. When all 



disks have been removed, lines 
1400 and 1500 indicate that the 
computer Is ready and ask what 
program is to be run. At this 
point the operator may leave the 
computer and it may remain in 
this state until someone else 
wishes to run a program. All 
disks have been removed, pre- 
venting the possibility of disk 
damage. 

When someone wishes to run 
a program, they simply type in 
its name. The data lines 2200 
and 2300 contain the names of 
each program followed by the 
disk name it is on. If a valid 
name is entered, the program 
reads the data statements and 
finds that name and the name of 
the disk, whereupon execution 
jumps to line 1800. The operator 
is informed that the program 
has been found and which disk 
to insert into drive zero. When 
that has been done and Enter 
has been pressed (as asked for 
in line 1900), line 2000 initializes 
the disk and runs the requested 
program. 

If the name entered in line 



1500 is not found, line 1600 even- 
tually reads the end of the data 
statement (XXX) and execution 
jumps to line 1700. Line 1700 in- 
forms the operator that the 
name in question cannot be 
found and to try again, or to ask 
for assistance. 

This short program can be 
easily tailored for any number 
drive system. However, as you 
modify the program to add new 
programs, the two XXX's must 
end the last data statement. 

It should be noted that this 
version of the READY program 
was written for, and will work on- 
ly with TRSDOS 1.2. The author 
has since modified the program 
for automatic checking of all on- 
line drives without operator in- 
tervention plus blinking of the 
standby message (to avoid 
screen burn). In addition, a ver- 
sion for TRSDOS 2.0 is now 
available. To obtain both listing 
and an explanation of the 
TRSDOS 2,0 version, forward 
one dollar (to cover the cost of 
reproduction and mailing) to the 
author.B 



FIXED ASSETS 

Put your TRS-80 computer to work keeping track of 
all information related to your fixed assets and deprecia- 
tion. This versatile system, developed by a CPA, will 
compute depreciation according to straight line, declining 
balance, and SYD methods and maintain the complete 
audit trail you need for tinanctal and tax reporting, in- 
cluding fixed asset ledger and acquisition and disposal 
reports. You will be able to project depreciation for cur 
rent and future years, use different methods for financial 
and tax reporting, switch from declining balance to 
straight line when advantageous, compute investment 
tax credit and additional first year depreciation. Reports 
are available in both summarized and detailed formats, 
and can be organized by general ledger account, location, 
department, ADR class, and year of acquisition. 

Currently available for the TRS-80 Mode\ I with at 
least 32K and 2 disk drives, and for the Model III with at 
least 32K and 1 disk drive. Requires Disk Basic and a 
TRSDOS-compatibie operating system. 



TAB132 



FAAS-1 for Model I 
FAAS-3for Model III 



$149 

$149 



At last, here is the solution to LPRtNT TAB problems 
with your TRS-80 Model I computer. Increase your pro- 
gramming productivity with this enhancement to Basic. 
Stop going through string manipulations and contortions 
trying to overcome the TAB{63) limitation. With 
TAB! 32, you will never again have to fret over tabbing 
past position 63 on your line printer. TAB! 32 will allow 
you to correctly tab to any print position up to 255 with 
the normal TAB( I statement. 

TAB! 32 IS a machine language routine which oc- 
cupies 1 GO bytes of memory, and will operate with either 
Level II or Disk Basic on the TRS-80 Model I. The TABl 32 
tape or disk includes modules for several different modes 
of operation. It can be loaded in the System mode or from 
DOS. can be loaded and run as a Basic program or merged 
into your Basic program and activated with a single 
GOSUB at the beginning of the program System and 
DOS modules include a relocating loader to move 
TABl 32 to anywhere in memory. Also supplied is a pro- 
gram which will patch the routine permanently into Disk 
Basic. Specify media when ordering. 

TABl 32 on tape . , $1295 on disk ,, ,$14.95 



P.O. BOX 369 



The Systemworks -«° 

Professional Quality Software for tfie TRS 80 Computer 
MARLBOROUGH, CONN. 06447 



1203)295-8108 



^ See List of Advertisers on page 4 18 
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UTILITY 



In its death throes this program 

generates machine-language data statements. 



The Death Wish 



Alan D. Smith 
P.O. Box 119 
Mortdale. N.S.W 2223 
Australia 



Did you hear the one about 
the schizophrenic pro- 
gram? Seems there was this 
program called MACH/BAS that, 
while runnrng. changed itself 
[nto something completely dif- 
ferent! And I can hear all you as- 
sembler programmers muttering 
"So what? We've all managed to 
wipe out our own programs at 
least once!" But MACH/BAS isa 
little different — it's written in 
Basic; its self-destructfon is 
quite deliberate, and the Basic 
code that takes its place is 
quite usable. 

Many TR&80 users write or 
use Basic programs that inter- 
face (via the USR statement) to 
small machine-code routines 
loaded somewhere near the top 
end of RAM. Perhaps they need 
a specialized printer driver, or a 
high-speed sort of binary search. 
Such an arrangement usually in- 
volves first loading the machine- 
code program, and then (sepa- 
rately) the Basic program— a bit 
of a nuisance, particularly on 
tape-based systems. Some have 
therefore taken the trouble to 
merge txsth programs by con- 
verting the machine code into 
ASCII and coding it Into data 
lines to be POKEd into position 
by the Basic program. 

There's just one problem- 
typing two or three hundred val- 
ues into data statements is both 
tedious and error-prone. And 
that's where MACH/BAS comes 
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to the rescue, by doing the 
whole job for you! 

Death Wish 

Converting machine- lan- 
guage to ASCII has t>een done 
before in programs that list the 
values to screen or printer, leav- 
ing you to simply key them in. 
But why type when you have a 
computer? MACH/BAS replaces 
Itself in RAM with the required 
data statements. 'You may then 
output them to screen or printer, 
or save them to tape or disk. 

But why does MACH/BAS 
have a death-wish? There are 
two reasons: 

• Although setting up the da- 
ta statements in strings and 
writing them to disk is quite 
straightforward, tape output 
is a different matter. Since we 
must write a tape that can be 
read by CLOAD, the only easy 
way to write it is via CSAVE. 
We must, therefore, set up 
data statements as the resi- 
dent Basic program. 

• Having MACH/BAS over- 
write itself reduces RAM us- 
age considerably, and that, in 
turn, allows us a greater 
range of addresses in which 
the machine language may re- 
side. (MACH/BAS uses about 
3200 bytes of RAM, Including 
ail numeric and string 
variables.) 

How It Works 

I'm assuming you have a 
Level II system of 16K or more, 
or a TRSDOS system. First, key 
in the program as listed; avoid 
the temptation to omit or short- 
en the instructions in lines 
30-150, or to change the line 



numbering. Now save It to tape 
or disk before attempting to run 
it — it self-destructs, remember? 
Now (if you haven't already 
done so) load the machine code 
(maximum 400 bytes) you want 
converted. Memory Size must, 
of course, be set so the area into 
which it loads is protected from 
Basic. Run MACH/BAS; after a 
screenful of instructions, you 
will be asked to input just two 
things— the start and end ad- 
dresses of the machine code In 
RAM. You may enter these as 
decimal or hexadecimal. MACH/ 
BAS will decide which you're us- 
ing on the basis of length— four 
characters are hexadecimal, 
five characters are decimal. Var- 
ious checks are performed on 
the addresses you have speci- 
fied to ensure that: 

• They are valid hexadecimal 
or decimal; 

• The start address is not 
lower than the Memory Size 
setting; and 

• The implied length (i.e., end 
minus start) Is within the 
range 1-400 bytes (1-X'190'). 
If all is well. MACH/BAS be- 
gins the conversion. An average 
machine-code program of 200 
bytes will take about 30 seconds. 
During that time you will be kept 
Informed or progress on the 
screen. At the end, it displays 
the first screenful of the new 
data statements. If you enter 
List now, you wiil see that 
MACH/BAS has vanished, and 
in its place is: 

• A REM statement (line 10) 
generated to remind you of 
the start and end addresses; 
and 

• A series of data lines (20, 



30. . .80— just how many is a 
function of the size of the 
machine code converted, and 
the byte values therein). 
You may also LLIST the new 
code to a printer, CSAVE it to 
tape, save it to disk, or simply 
add more code to it immediate- 
ly. The addition of a simple 
Read/POKE loop anywhere in 
your program sets up your ma- 
chine code whenever you run. 
For example, if the start and end 
addresses were 32600 and 
32767 respectively: FOR X^ 
32600 TO 32767 :READ Y :POKE 
X,Y :NEXTX. Those of you who 
have more than 16K RAM, don't 
forget that POKE requires deci- 
mal addresses above 32767 to 
be in the form "desired address 
minus 65536", TRSDOS users 
may simply use &H (hexadeci- 
mal) and avoid that complica- 
tion.) 

The Program 

For those of you with an in- 
terest in how MACH/BAS works 
(or a burning desire to improve 
it), I'll continue with an explana- 
tion of the techniques involved. 
Perhaps the best way is to fol- 
low the program from first state- 
ment to last, commenting on im- 
portant points as we go. 

First, let's recap the in-core 
structure of a Basic line, be- 
cause that knowledge is basic 
to an understanding of MACH/ 
BAS. (For a more complete dis- 
cussion, see Curtis F. Gerald's 
article "Append It!" in the Feb- 
ruary 1980, 80 Microcomputing.) 
Each line is built like this: 

• A two-byte pointer to the 
next line; 

• A two-byte line number (the 



second byte is zero for line 
numbers up to 255. but Is rele- 
vant from 256 on); 

• Tfie Basic line itself— re- 
member ttiat many keywords 
are compressed, e.g. REM is 
stored as a one-byte value 
(ASCII 147), as is DATA (ASCII 
136); 

• One extra byte (always 
zero) at the end of the line. 

In addition, the very last line is 
followed by two more bytes con- 
taining zero. 

Line 10 IS the program initiali- 
zation. Note that the DEFINT, by 
not specifying D, allows (by de- 
fault) variables DA, DS, DE to be 
single-precision. (They may han- 
dle addresses outside integer 
range.) In line 20, LIS is initial- 
ized (in compressed format) to 
10 REM START - , and this will 
form the basis of the new line 10 
in the generated code. Lines 
30-160 output instructions. 

Lines 170-190 use a subrou- 
tine at line 240 to ask for the 
Start address of the machine 
language, then checks that val- 
ue against the Memory Size? 
setting. Locations 16561/2 con- 
tain the Memory Size value in 
standard ZBO format (LSB/ 
or, more correctly, they contain 
the Memory Size? setting minus 
two. For example it you replied 
32700 in response to Memory 
Size?, then 16561/2 will contain 
32696— hence the check against 
the input address (DA) minus 
three. 

Lines 200-220 use the same in- 
put subroutine to ask for the end 
address, and then check that 
the implied length does not ex- 
ceed 400 bytes. Line 230 is a 
simple subroutine to draw a dot- 
ted line across the screen; it re- 
quires variable Y to be set in the 
range 0-47. Lines 240-330 are 
the input subroutine invoked 
from lines 170, 190, 200 and 220; 
they interpret five-character in- 
put as decimal, four-character 
as hexadecimal, and validate 
accordingly. Lines 280-330 con- 
stitute a handy hex-to-decimal 
conversion routine— a four-digit 
hex value in ADS gives a decimal 
address in DA. In line 310. the ex- 
pression ASC(WK$)-55 gives 
decimal 10forA(sincethe ASCII 
value o1 A is 65), ^^ for B, etc. 

Lines 340-350 set up WK$ 
with the full REM statement to 



contained in the new line (in 
compressed format). In line 360, 
locations 16548/9 point to the 
start of the Basic program ar- 
ea— the value we pick up, there- 
fore, will vary between Level II 
and TRSDOS systems. Starting 
from the beginning of MACH/ 
BAS, we now loop until we lo- 
cate line 370 in RAM. Remember 
that at the start of 370 will be a 
pointer to line 380. 

We now change the pointer at 
the start of line 10 (which nor- 
mally points to line 20) so It 
points to line 380. Effectively, 
then, the line numbering in 
MACH/BAS now runs 10, 380, 
390, etc., because we're plan- 
ning to keep MACH/BAS run- 
ning (above line 380) while we 
build new Basic lines between 
10 and 370. If we did not main- 
tain continuity in line numbering 
from the start. MACH/BAS 
would meet a premature end as 
soon as we encountered our 
first GOTO or GOSUB (since 
Basic locates the line we're 
branching to by scanning from 
the start of the program). The 
GOSUB 500 at the end of line 
380 POKES the new line 10 into 
position at the start of MACH/ 
BAS— the self-destruction pro- 
cess has begun! 

Line 390 sets up a pointer in 
L2to the spot where the new line 
20 will reside. Line 4(X] Incre- 
ments the line number by 10, 
tells the user what it's up to, and 
sets WKS to the new line num- 
ber plus DATA (in compressed 
format). Lines 410-420 start 
PEEKIng In the machine lan- 
guage area, and adding the ap- 
propriate ASCII values to the 
string in WKS- Line 430 stays in 
this loop (410-430), putting com- 
mas between successive val- 
ues, until we reach the end ad- 
dress or this data line is full. 

Lines 440-450 use the subrou- 
tine at 500 to POKE the new data 
line into RAM, put a zero byte at 
the end of it, point this line to the 
next one to be set up, and loop 
back. After we've finished set- 
ting up all the data lines, line 460 
POKES two extra zero bytes at 
the end of the new program, and 
then points the new line 10 to 
the new line 20. 

If you think lines 470-480 are a 
little crazy, then you're right! As 
a last dying wish, MACH/BAS 




IJG would 

like to apologize lo all 

readers, and dealers, who ordered 

Tlw Custum TRS-SO and hu\'e been wonderinj; where it is. 

Magazine advertisements have to be prepared 2 to ;i 
months before they actually appear in print. Originally the 
book was scheduled for printing in early May, just as the 
first advertisements were to appear, but the Editor must 
have been in a time-warp when he made the original 
production estimatesl 

He completely under-estimated the time needed to 
prepare and process the dozens of photographs, circuit 
diagrams, printed circuit layouts, assembly language 
programs and reams of information that Dennis Kitsz had 
provided. 

The book has now been scheduled for printing in early 
November, and should be available before the end of the 
month. It will be worth the wait, it's one heck of a bookl 

Credit card orders are not being processed until the book 
is back from the printers. If you prepaid by check, and 
would prefer not to wait, then you can obtain a full refund 
prior to shipment - or use your credit towards other IJG 
products. 

Sorry about this, thank you for waiting, 



■J^^^ 



"*-n 



Jim {'What year is it?') Perry, Editor 
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1260 West Foothill Blvd., 
Upland, California 91786 

(714) 946-5805 
TRS-80 is a trademark of Tandv 




Don't be misled by more expensive imitations! 

This IS the original Plioti> point light pen pre- 
ferred and supported by some of the leadtng 
software sources like, "Quality Software"— 'In- 
stant Software "—' Level IV 'products and so on. 

Just imagine . . . 

In playing backgannmon, (included) when you 
want to move a man. you just point at where you 
want to move from, then point at where you 
want to move to. and your man moves!!! No 
more fumbling with keyboards — YEA' 

Your Photo Point package comes complete; 

• 1 Photo point light pen (of course) 

• Into sheets on how to connect the pen and 
how to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System. 
(DOS too!) 

• Does not void any Radio Shack warranties 

Requirements: 

• Level II basic 

• And a little /magirraf/on.'.' 

For fast real time programming it is your lowest 
cost peripheral at *19.9^ 



Announcing 
NEW PEN BASIC by Steve Bjork 

Steve is one of the Best Assembly Lang pro 
grammers around, and he has come up with PEN 
BASIC This low memory routine will add 10 more com- 
mands to Level II such as PENGET which searches the 
entire screen for the pen and returns a number between 
0-1024 in about 1 sec. Plus 9 other commands. Perfect lor 
you lightware authors and NEW light pen owners 
too! only *14.95 




(COUPON) 

Micro Matrix ^ea 

P.O. Bov^JM • PanfiCLt. CA ^•/O-?^ 

Send tor yours NOW: (41 5) 355-4635 

Name 



Address 

City . 

Zip 

Card# _ 

Ex, 
Date 



St.. 



Photopoint 
$19,95 

Pen Basic 
[ I $14,95 



Money 
CK. Order Visa I^C 



wants to change the endot- 
program pointer in 16633/4 to 
point to the end of the new code 
instead of the old. (The new 
code would work anyway, but 
CSAVE would write more to tape 
than it needs to, and that's not 
tidy,) Such a pointer change 
could be done as follows: Y = 
(NL + 3);256:POKE 16633,NL + 
3-Y.256:POKE 16634, Y. 

Unfortunately, the pointer in 
16633/4 also serves as a pointer 
for variables, to change the 
pointer, but as soon as we start 
changing the pointer, Basic 
can't find the variables! For that 
reason, I used the two bytes at 
fixed locations 16411/2 as a tem- 



porary storage area so 1 

wouldn't need variables when 
committing the deed. If you look 
at the memory map in your Level 
II manual, you'll see that 16411/2 
are two constant bytes (contain- 
ing K and I) within the keyboard 
device control block. Since 
we're not using the keyboard at 
this precise moment (and we put 
the K and I back again when 
we're finished anyway), the sys- 
tem will never know! 

Line 490 lists the new code, 
and that's where we finish. Fi- 
nally, line 500 is a subroutine for 
POKEing the bytes contained in 
WK$ (i.e., new Basic lines) into 
RAM.B 



IB CLS :CLEAB3B3 :DEF1NT B,L.N,X,Y 

2» LIS ' CHRSIIBI - CHRS(B1 • CHfiS1147) ♦ ' STfcBT ■* ;Y-1 tCOSUB 

2JB 

it PHIMT "HACH/BAS COWVERTS UP TO 4te ( K'19>' } BYTES OF RA.". [ 

USUALLY A" 

4S PRINT "MACH-LANC. PkOC ) INTO A jET "F BASIC 'DATA' STATEMENTS 

THAT MAY" 
5B PHINT 'BE JSED VIA 'POKE* COHHANDS TO RE-CREATE THE ORIGINAL 
RAX AREA.' 
61 PRIWT "THE NEW CODE MAY BE OUTPUT TO VIDEO , PRIHTEH , TAPE , 

OR DISH.' 
71 Y-16 iCOSUB 239 ;PRI(JT TAB{12) ••*• PLEASE NOTE THE FOLLOHINC 

POIWTS ••■■ 
SB PRINT *(AI PRIOR TO RUNNING .4ACH/BAS , MEMORY SIZE SHOULD BE 
SET LXJHEB" 

9B PRINT * THAN TriE BEGINNING OF THE RAM AREA WHICH IS TO BE 

CONVERTED" 

IBi PHINT "IB) IN RUNNING , MACH/BAS WILL SELF-DESTRUCT I THE CR 
BATED CODE" 

IIB PRINT " OVERWRITES IT ) , THUS OPTIMIZING CORE .^PACE AND 

PERmTTINC" 

121 PRIdT • USAGE OF THE STkNDAHD SYSTEH COHMAMDS LIST/LLIST/ 

CSAVE/SAVE" 

131 PRINT "(C] ADDRESSES INPUT TO MACH/BAS HILL BE INTERPRETED A 
S 'HEX' If" 
141 PRItfT " 4-DIGIT ( E.G. BCi» ) AND DECIHAL IF 5-DIGIT ( E. 

c. «ei2e I " 

ISfl Y-43 iCOSUB 23B iPHINT TA&[I21 "*•* PLEASE PRESS <ENTER> TO 

CONTINUE •••■; 

IfiB IF INKEY$>*" THEN 161 

17fl CLS :PRIHTe 32»,; :SES-'EHTER START" :GOSUB 24B 

IBB IF PEEKIlt^ei! •PEEIlUE5e2) *256 C- DA-1 THEN DS'DA :GOTO 2IB 

J9B PRINT ■' INVALID - IS LOWER THAN MEMORY SUE SETTING •" :GOS 

UB 241 :G0TO ISB 

2ai PRINT :SEJ-*HOH THE END' :COSUB 241 

2ia IF DA->DS AND DA-DS<-399 THEN DE-DA :GOTO 341 

lit PHINT "' INVALID - LENGTH MUST BE 1-418 ( 1-K'19B' 1 •" :GOS 

UB 24fl :GOT0 21t 

23B PRINT :FOR X-B TO 126 STEP2 :,4ET (X,Y1 : NEXTX iRETUHN 

24fl PRINT SES; :INPUT " ADDRESS OF RAH AREA TO BE CONVERTED "; A 

DS 

251 IF LEN(ADS)-5 THEN DA-VALIADSl :IF DA>9999 THEN ReniRN ELSE 

27i 

26* IF LEN<AD;|'4 T^iEN DA-fl :GOTO 289 

271 PHINT "• INVALID - MOT 4-DlGlT HEX / 5-DIGIT DECIHAL •" :COT 

O 241 

281 FOR Y-I TO 4 

291 W1lS-niDS|AD5,Y,I| 

311 IF WRS->"1" AND mS':-"9" THEN X-VALIHVS) :COT0 321 

311 IF WKS->"A" AND WltS<-"F" THEN X-ASC(WHS1 -55 ELSE 271 

32B DA - DA*16+X 

331 NEXTY : RETURN 

341 CLS :PRtHT» 471, 'SETTING UP LINE II* 

351 Wits - LIS ♦ STRS(DS) » ■, END -" ♦ 5TR$(De) * CHRSftl 

161 BS - PEEXllfi54B)«PEEK(16S49)>256 :NL-BS 

171 HL - PEEX(HL)*PEEK(HL*1}*256 :IP PEEX (NL+2) *PEEK (NL*31 'JS* < 

171 THEN 371 
3Bi POKE BS,PEER(NLI :P0FE BS»1 ,PEER(NL*1| :«L-BS-1 tGOSUB 511 
391 L2-BS>X TNL-L3 :LN-1B : IF DS>32767 THEN D5-OS-65536 :DE-DE-6 
5536 

411 LN-LN + ll :PRINTg 485, LH :W1tS - CHBSILK) * CHRSdl * CHRS(13 
61 

411 WKS - WKS t «IDS(STBS(PEEII[DS11 ,2,3) !DS-DS + 1 
42a IF DS-3276a THEN D5— DS iDE-DE-65516 

43B IF □S<-D£ AND LEN1WKS}<234 THEN HKS-WKSt"," : GOTO 41B 
44B GOSUB 5BB iPOKE NL'2«X,B : Y- INL<3 tX) /256 

451 POKE NL*1,NL-3*X-Y'2S6 :POKE NL*2,Y :NL-NL*2*X :IF DS<*DE TH 
EN 411 
461 POKE NL'l.B :POKF HL-«2,fl ;Y - (L2tl)/256 :POFE BS,L2-1-Y*356 

:POKE BS»1.Y 
47B Y = (NL'3)/256 : POKE 1641 1 , NL»3-Y*256 ! POKE 16412, Y 
iSt POKE 16633, FECK(16411) :POKE 16634 ,PEEK1 1641 2) : POKE1641 1 , 75 

: POKE16412,73 
491 CLS :LIST-4B 

5tB FOR X'l TO LEN[WKS) :POKE NLt2>X ,ASC1MID$(WKS, X, 1) ) :NEXTX : 
RETURN 



Program Listmg 
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MED SYSTEMS SOFTWARE is proud to present THE 
INSTITUTE, the newest and most intricate adventure by Jyy 
Pearson. You begin in an institution populated by a dwarf, 
counselor, guards, and other inmates. You can enter whole 
sentences as well as one and two word commands, as you 
strive to retain your sanity. You must escape, but 
the key to escape is not in the building itself. Your 
dreams, brought on by a mysterious powder, hold -.^^ 
the key to escape, as well as four whole worlds of 
bizarre characters and locations. It's like playing X 
five adventures in one! 
THE INSTITUTE - Model I or Modellll 

16K cassette $19.95 32K diskette $22.95 

' parental discretion advised 



To Order Call Med Systems 

1-800-334-S470 





ASYLUM 



ASYLUM, the newest Continuum adventure, 
places you in an institution full of guards, 
inmates, doctors, and many more bizarre 
characters. ASYLUM features an advanced lan- 
guage interpreter which allows input of complete 
sentences as well as one and two 
word commands. Graphic rooms. 
hallways, and doors twist and 
turn in a layout guaranteed to 
send you screaming! 
ASYLUM -Modell or Model II 
Cassette S19.95 Diskette S22.95 



^S«9UatofAat»ftis»fsofip»g0 4lB 
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QWERTY 3.0 



Since introducing Qwerty 3.0 in September, 
people have been calling to ask if we were 
making ludicrous claims. The answer is NO! 
Qwerty 3.0 does all we claimed and more! No 
other software of this type can match Gkweity 
3.0. 

More than "fully tested," Qwerty 3,0 has seen 
thousands of hours of use In a university 
environment. A master's thesis and a statisti- 
cal doctoral dissertation were produced arxl 
accepted right off a Centronics 737 using this 
package. It is the best. Period. We guarantee 
you will agree! If for some reason you find that 
this program does not meet your needs, 
return the entire package within 14 days for a 
prompt and cheerful refuruJ. 



Some Features ofQioerty XO 

1. Automatically prints in propodional print, with a suitable 

rormat. Transitions between the three |>rinl st>tes are easy 
including all expanded pfinl modes- 

2. Ghrci^ 3Ji adds 75 new symbols, including upper and 
km«r case Greek letters, mathematical symbols such as 
integraband summations, arrows, brackets, and probability 
symbols. 

3. Any character can be used as a subscript or supersctipt 
even simultaneously Carats, bars, and bidescan be placed 
over any character, with precise position control. 

4. Underlining, with or without underlirung of spaces. irKluding 

kx^ mtk>s and malhemalical expressions 

5 Footnote* can be placed or any page so Ihat they remain 
on the desired page, even if toxt is inserted tater 

6.1hMe commands enable positionir>g of the print head 

I anywhteie Ona line, hwluable in printing neat mathematical 

layouts, tables, coiumnar materia I. etc.. in propO(tior>al print 

7. Pretty coownands allow printing of repetitions of a chosen 
character. When combined with TaUe, decorative borders 
can be produced with ease. 

8. FoHo format produces output in two or three columns per 

page, in either proportkxial or 16.7 cpi mode, kleal lor 
newsletters. 
I 

9. Supplies a third outpu nwde. in which only Scilpaft 
commands are obeyed. AJk>ws printing of special Qwei^ 
commands for future reference. 

I 10. Page EimI indicates where pages will end, and the page 
J number, without printing the text. Or« can prepare an 

I almost error-free document without ever using paper. 

I 11.Conect)onof8alpilt'sefTorsandinconwnerK:e$,extensh« 
documentation, and much morel 



For cautious buyers, we offer the manual 
(over 70 pages) for $10. When you decide to 
buy Ghverty 3.0, we will credit the full n>anual 
price. 

Qwerty 3.0 Disk, Manual. Reference 

Card, and Printer Table Rule $49.95 

Qwerty Manual Atone $ 1 0.00 

*Qwerty3,0nquinsa32KTKS80,MoMlor 
II, Centronics 737, 739, or Uneprtnter IV and 
boo disk drives. 



STATISTICAL PACKAGE FOR 
MICROCOMPUTERS (SPM) 

By Bruce P. Douglasa 

MED SYSTEMS Is proud to onnounce SPM, the Stotlstl- 
col PcKkoge for Mk;rocomputers. This packoge offers 
eight different procedures to provide o wide range o) 
statistical analyses, some of which are not avaUabte 
In any other computer package. 

In the disk system, files for one onotysls may be trar>s- 
formed Into files for any ott^r program using FILE- 
TRAN. Previoustv entered files can be concentrated 
or new varksbles added. Fltes can t>e merged ond 
new voikables created from functions ot other varks- 
bles. 

Transformations avaltable Include linear transforma- 
tions, logarithms, exponentkstion, absolute values, 
ar>d trigonorrwtrk: functions. 

•DESCRIPTIVE STATISTICS: Provides mean, standard 
deviation, standard error, and number of entries. 

•ANALYSIS OF VARIANCE: One-way anotysts of var- 
iance, equal or unequal sample sizes. Provides "f 
statistics and percentiles, ond provides stotistics for 
post hoc comparisons of results. 

• TWO WAY ANALYSIS OF VARIANCE: IWo way ANOVA. 

equal sample sizes only Ar>atyses interaction ef- 
fects and provide |x>st hoc comparisons. 

• LINEAR REGRESSION: Computes leost squores re- 
gression equation, Pearson correkitfon coeflk:lent, 
"F' statistics, and calcukites Y value for a given X. 

• MULTIPLE LINEAR REGRESSION: Produces first order 
correlation matrix, regression equation, multiple 
correlation coefRcient, confldence intervals, and 
Indicates slgnNlcance of adding varkibles. 

•NON-LINEAR REGRESSION: Uses Morquardt method 
of least squares, altows input of number of itera- 
tions, convergerxre criteria and parameter esti- 
mates, one Independent variable ar>d up to 5 
parameters. Each Iteration gives variance, poro- 
nrwter values and standard devkations. and wf>ettier 
criteria were met. 

•MULTIPLE rK>t>RINEAR REGRESSION: The only pro- 
gram of Its UrKJ on microcomputers. Allows up to 5 
variables and 10 parameters, plus everythlr>g Norv 
llnear Regression (above) ofFsrs. 

SPM procedures will run In 16K. Tape and disk ver- 
sk>n$ ore available. Data files are saved to taF>e on 
tape versions, disk on disk versions, liard-copy 
output is avatkable from all programs. 

SPM svnm ns M cantm #74.99 

OWwNe $t9.9S 

Individual piocediNM ovolloMe CosMle $24.95 
(Specify proc«dtMe) DMnMe $29.9S 

MEDSVSTOWSSOFTWAIIf ^'"> 
PO lox 2674-T Chapel Mil. NC 27514 



The main cHy super-structure of the Untted States Is under attack. You control 
the primary ABL (Antl-Balllsttc Laser) target console. Only your six laser bases 
can halt the onslaught of ICBM's, killer pods and lunar blasters. As each wave 
becomes faster and longer, your tired fingers itch to activate the ultimate 
defense ... ERADICATIONI 
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LASER DEFENSE Is a fast-actlon 
arcade game for the TTTS-SO. 

Features Include: 

• One or two players 

• Multiple difflcutty levels 

' • Fast machine language graphics 

• Sourxl effects 

• „A j^rantee of satisfaction 




MED SYSTEMS SOFTWARE 
PO lox 2674-T 
Chapel Hill, NC 27514 
l-«)0'334-5470 



Model I or Model III 16K 



Cassette. 



.$14.95 Diskette. 



INTERFACE 



An account of the Selectric connection. 



Tandy Acquires IBM! 



W. R. Stanley 
City Rt. 5 
204 Avery Lane 
LaGrange. GA 30240 



No, this is not a review of the 
latest offering from IBM. 
This article is designed to assist 
you in interfacing the iBM Model 
1980 Selectric typewriter with 
our favorite computer. Although 
I am writing specifically about 
the Model 1980-9, the subject 
matter can be applied with mi- 
nor modifications to many other 
versions of the Selectric I/O 
machine. 

The replacement of the pin- 
feed platen with a standard 
wide-carriage platen was the on- 
ly modification to the 1980 I 
recently purchased. All other 
conversion is in software and 
the 7441-1 interface. 

Basically, the 1980 is a binary 
coded decimal (BCD) printer 
with a 15-inch carriage and a 
keyboard. Several control keys 
and signal lamps are located on 
either side of the keyboard. 

The 7441 is a vintage transis- 
tor-transistor logic (TTL) relay 
interface that allows communi- 
cation over common carrier 
lines between the 1980 and 
remote computers. It uses the 
RS232 signal format for serial 
operation only. 

Since the solid state com- 
ponents have nonstandard 



markings, figuring out the func- 
tion and pinout of the ICs in the 
7441 would have taken too many 
hours. 

Other than the power supply 
schematic and a general 
description of its operation with 
remote computers, I could get 
very little information on the 
7441. The very healthy power 
supply (with outputs of -♦-48V, 
12V, 5V, and -12V direct cur- 
rent) is the 7441 's strongest 
feature. I kept the 7441 as a 
power source for this and other 
projects. I decided to start an in- 
terface board from scratch us- 
ing as much of the 7441 as 
possible. 

A bonus is the oddball 82 pin 
connector mounted on the rear 
panel. This connector mates 
with the one on the end of the 
heavy cable going to the printer. 

Except for the - 12V supply, 
the dc outputs of the 7441 are 
not regulated in the usual man- 
ner. The output is stabilized by 
use of high-current capability 
rectifiers and huge filter capaci- 
tors. Output from the power 
transformer is stabilized by res- 
onant winding. 

If you decide to purchase the 
1980, be sure to obtain the 
printer schematic. A standard 
IBM schematic won't be of too 
much help, because the 1980-9 
comes equipped with a long 
cable terminated in an 82 pin 
AMP connector. The standard 
I/O machine connector has only 
50 pins. 



The 1980 Is the same In basic 
operation as most other I/O 
Selectrics; specific solenoids 
must be energized to result in a 
particular operation. Seven 
solenoids tilt and rotate the typ- 
ing element to select characters 
to be printed. Another solenoid 
controls the carriage return-line 
feed (CRLF). Others control tab, 
space and backspace. All oper- 
ate with a nominal power supply 
of + 48V, with individual current 
requirements in the rangeof 100 
to 300 mA. 

Operation of the 1980 with the 
TRS-80 requires energizing the 
appropriate solenoids at the 
right time. Simple enough, Isn't 
it? 

The maximum operating 
speed of the 1980 is slightly less 
than 15 operations per second. 
The solenoids need to be ener- 
gized for about 10 milliseconds 
to allow enough time to perform 
their mechanical functions. Tim- 
ing loops in the software are 
used for this purpose. 

A handshake is used by the 
character printing routine to 
delay the next character selec- 
tion until feedback is received 
from the printer. 

If a liming loop is placed in 
the driver program to allow for 
completion of the CRLF func- 
tion, that loop must provide 
delay each time for the worst- 
case condition— return of the 
typing mechanism from the 
right margin to the left margin- 
even though the line being 



printed Is only one Inch long. 

This is maddening if you are 
printing a single column hex 

dump In the T-Bug format, for 
example. The printer is idle a 
large portion of the time. 

A solution Is to delay machine 
operations only until the com- 
puter receives a signal from the 
printer that the CRLF operation 
is complete. This is easy since 
the 1980 has several switches 
that open or close at the begin- 
ning or end of any particular ma- 
chine operation. 

Two additional switches tetl 
the computer whether the ma- 
chine Is in upper or lowercase. If 
the printer is already in the prop- 
er case configuration for print- 
ing of the next character, why 
transmit to the printer a preced- 
ing case signal? 

There Is only one externa 
signal path to these solenoids 
Operated by the shift mechan 
ism, one line Is alternately con 
nected to each of these sole 
noids by means of a SPOT 
switch. The machine remains in 
one shift configuration until the 
next shift signal is received. 

IBM included another switch 
that is also operated by the shift 
mechanism. This SPOT switch 
can be used to provide another 
handshaking signal that is used 
within the driver program to 
transmit the next character to 
the printer or precede that char- 
acter with a shift signal and ap- 
propriate delay. 

Now, let's get down to busi 
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A DIVISION OF SCOTT ADAMS INC 
BOX 3435 LONGWOOD, FL 32750 
(305(862 6917 ^,„.- 

WRITE FOR OUR FREE CATALOG---,,,, 



E^veuR tee^rvEALER, if he does not 

HAVE THE PROGRAM YOU WANT THEN CALL; 

TOLL FREE 1 800-327 7172 (Orders Only) OR WRITE US. 



BY CHAMELEON SOFTWARE 





BALROG 

Meet the Chromatic Dragon lace-loflame in BALROG. the first in the MACES & MAGIC Series, This fantasy adventure features one of 
ihe largest data bases ever created for a microcomputer role playing game Not only can you create completely individual characters, but 
you may also choose from a huge inventory of specific weapons and armor items. Freeform input combined with choices suggested by the 
program makes the discovery of the more secret areas of the dungeon a real challenge! . 

STONE OF SISYPHUS 

The STONE OF SISYPHUS carries you to a thinking man's" OunQeon. wherein you must apply your skills to effect survival and to realize 
your goals This is an unfriendly subterranean world populated by hideous monsters, and dripping with fabulous treasures — the latter 
enticing you lo lace the former' Your survival hinges upon hard intellect, as opposed to the wispy uncertainty of chance, so be prepared to 
draw deeply from your intellectual reservoir' And — the responsiveness of the program to the individual qualities of your character make this 
grand adventure Irustraiingly enjoyable for hundreds of hours before all of US elusive secrets can be unlocked! 

MORTON'S FORK 

The third entry m Ihe Maces & Magic series. MORTONS FORK transports you mto a world bereft of natural laws — a realm populated by 
magical beings and strange creatures The scenario is set within Ihe confines of an ancient wizard s fortress. Through your keytKiard input, 
you equip your warnor with armor, weapons, and gold, as well as with desirable personal attributes. Only then will you be able to face the 
dangers of MORTON'S FORK! Features include multiple skill levels and a comprehensive manual describing the colorful Maces & Magic 

world 



MACES a MAGIC are fantasy adventures involving you and your computer. Armed only with your wits, a microcomputer, and the 
software provided, you can become the hero or the meal your destiny dictates You create a character, equip him (or her) with suitable 
weapons and armor, and enter the dungeon in search of tame and fortune Neither is particularly easy to obtain 

If you are successful m avoiding or conquering the various monsters, traps, enchantments and illusions set by our nefarious 
dungeonmaslers, you may escape with nches and glory Your name and deeds will be recorded for posterity in the records of the 
dungeon. More importantly, you'll be ahve. You may then use the same character m his more experienced and wealthy form when 
^ you enter dungeons on later occasions 

; In each dungeon there are random events which occur, but in the vast majority of cases Ihe skill of the player m mak- 

J ing correct choices determine the outcome of the game The majority of instructions are furnished within the program in 

the form of appropriate prompts. 

There are many ways to meet an untimely demise m the dungeon Monsters and such are iust one of the lines of 
defense between you and the treasures stored there Various traps await the unwary (and the wary too). Some are lethal, 
while others are merely unpleasant or inconvenient It pays to be suspicious Beware of ores bearing gifts. 
i The object of the whole exercise is not just to fight the monsters and collect treasure You have to get out alive to en- 

^^ loy It. In every dungeon there is at least one exit it is possible to escape from each and every dungeon with a whole skin. 
^^k^ We stale that fact here because players often believe this not to be true We really aren't out to get you. Not really . . 
^^^k Once you successfully exit Irom the dungeon you wi!l have an opportunity to save your character tor further adven- 

tures m this and other dungeons. Your treasures will be converted to their gold equivalent and your weapons and armor 
stored in bat guano. When you start another adventure, you may call up your experienced character for another trip. The on- 
ly limitation is that once a character is Kilted, he may reincarnated three limes: alter thai, he is gone forever No second 
chances, no tears, no breast beating. Gone. Kaput Finished. You will have the distinction ol adding to the dungeon 
statistics, however A sort of second hand immortality in recognition of a nice try. No glory or cash though. 
CHARGE!! 



Maces & Magic Series 

8y Cnatneleori Sollwaie 

BALROG 

r«quir«$ 2 drive system 
TRS SO 32K DISK Modal 1 012 OOM S 

TAS-U 48K DISK Modal 3 012-OOW t 



STONE OF SISYPHUS 

Works on 1 or 2 drive syslams 
TRS-80 32K DISK Modal 1 012-0100 

TRS eo 48K DISK Modal 3 012-0100 

ATARI 40K DISK 052-0100 

APPLE 2 PLUS Ol APPLE 2 - 48K 

with Applaaott in ROM 

WORKS ON 3.2 OR 3.3 042-0100 



£^»£^^ 



MORTON'S FORK 

Works on 1 or 2 drive systems 
TRS-80 32K DISK ModaM 012-0113 129.05 

TRS-S0 48K DISK Modal 3 012-0113 S20 05 

APPLE 2 PLUS or APPLE 2 • 48K 

Willi Applatoll in ROM 

WORKS ON 3.2 OR 3.3 042-0113 S29.95 
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ness. Look in your pile of 80 
M/crocompuf/ng magazines and 
dig out the Feb. '81 issue. Flip to 
page 175 and you'll find my arti- 
cle on construction of a pro- 
grammable interface board that 
works well with the TRS-80. This 
particular board is a natural for 
use in interfacing the Selectric 
since it can be programmed to 
provide both latched outputs 
and handshaking signal inputs. 

This interface board cannot 
be used to directly drive the 
Selectric magnets because both 
the maximum voltage and cur- 
rent ratings of the 8255 chip 
would be greatly exceeded. The 
8255 outputs are, however, ca- 
pable of driving suitable 
medium-power NPN transistors 
whose collector circuits include 
the appropriate Selectric sole- 
noids. 

My particular conversion 
makes use of 12 solenoids in- 
side the 1980 to perform all the 
functions I desired. There are 
several more solenoids inside 
the machine that are not used 
here. 

When you start planning com- 
ponent layout for your interface, 
I suggest you allow for future ex- 
pansion. Through proper pro- 
gramming and circuit additions 
you can control the printer 
motor with the computer, use 
some of the keyboard indicator 
lights for visual feedback, or 
make good use of the controls 
and switches on the front of the 
1980. 



The -t-5V supply is readily 
checked by measuring the volt- 
age at the vertical aluminum 
bracket toward the front of the 
power supply board. This brack- 
et serves as a heat sink for the 
5V rectifiers. 

The + 12V output can be mea- 
sured at the power supply board 
fuse near the front panel of the 
7441. The fuse next to this one is 
in the + 48V supply line. 

The -12V regulator output 
can be measured by connecting 
the negative meter lead to a pro- 
jection about halfway down the 
left side (when you are looking 
from the left side of the 7441 at 
that plug-in board) of the vertical 
regulator board. 

All power supply voltage mea- 
surements are given in respect 
to chassis ground. Although on- 
ly the +5W and -t-48V supplies 
are actually used here, proper 
operation of the other supplies 
will contribute to peace of mind. 

Examine the numbered paper 
tags on the wires ending in the 
82 pin connector mounted in the 
rear panel of the 7441 . Now look 
closely at the pin numbers mold- 
ed into the outer face of that 
connector. Quite a difference, 
isn't there? 1 will refer to pin and 
wire numbers for this connector 
by the numbers molded into the 
connector. 

Several leads in the 7441 will 
be cut and reconnected to the 
transistor driver board to be 



placed inside the 7441. Most of 
the affected leads are in the 
printer solenoid circuits. 

Some other leads will be used 
for handshaking signals. One 
additional lead that will be cut 
and grounded controls a relay 
that in turn applies ac through 
the 1980 keyboard on-off switch 
to the printer motor. 

Fig. 1 shows the schematic of 
the Selectric interface board. 
The pin numbers on the left are 
for the 8255 chip that is dis- 
cussed in the Feb. article. The 
pin numbers on the right repre- 
sent those of the 82 pin connec- 
tor on the rear of the 7441. 

Remove the cable lacing from 
the wire bundle going to the 
chassis connector, to make it 
easier to identify wire numbers 
and to trace them. With the ex- 
ception of the wires presently 
connected to pins 74 and 75, 
trace each wire identified on the 
right side of Fig. 1. Cut each at 
the end away from the 82 pin 
connector. 

Unplug the four connectors 
from the underside of the plastic 
t>oard that held the original cir- 
cuit cards and discard that 
board. This area will be used for 
mounting the transistor driver 
board. 

If you do not wisfi to drill and 
fileon the rear panel of the 7441, 
remove the signal cable from 
the existing hole near the large 
connector. Feed a length of mul- 



ticonductor cable (12-pair tele- 
phone cable is suitable] through 
the hole. Reinstall the plastic re- 
tainer on the cable. Make the 
necessary connections be- 
tween this cable and the input to 
the interface troard. Tie the sev- 
eral extra cable leads together 
and connect this wire group to 
chassis ground. 

The opposite end of the inter- 
connecting cable goes to the 
8255 on the referenced interface 
board. You can follow either of 
two paths at this point; direct 
connections can be made to the 
8255 pins, ora mating connector 
set can be used. (A DB-25 set will 
be fine.) Be sure that proper con- 
nections between the 8255 and 
the interface board are main- 
tained and cannot be acciden- 
tally reversed. 

If you wish to add another 
connector set (such as the 
DB-25) at the 7441 end of the 
cable, be prepared to exert 
some effort. Steel is not as pli- 
able as aluminum. 

Mount the completed driver 
board In the area vacated 
earlier. Position the short cables 
terminating in the large connec- 
tor so that no contact can be 
made with either the chassis or 
the added board. Keep in mind 
that TTL and MOS components 
don't take kindly to doses of 
48V. 

Software 

A screen printer program I 
find very useful is shown in 
Listing 1. When initialized, this 
program reconfigures the jump 
address in the video DCB and 
sends characters to the driver 
before they are displayed on the 
monitor. 

The program contains a sub- 
routine that checks the TRS-80 
keyboard for two specific two- 
character inputs. Simultaneous 



7441 Modifications 

Before modifying the 7441, 
check its power supply for prop- 
er operation. Remove all plug-in 
cards from the cabinet, with the 
exception of the - 12V regulator 
card on the power supply board. 
Apply power to the 7441. It 
makes no difference whether 
the Selectric cable Is connected. 
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i SmaU 

AMERICAN B.si^.ss 

i^ COMPUTERS 

1 18 S. MILL ST. PRYOR, OK. 74J61 

AMERICAN SMALL BUSINESS 
COMPUTERS STOCKS THE 
ENTIRE LINE OF EPSON 



PRODUCTS AND ACCESSORIES 



CALL FOR OUR 
PRICING ! 

WE PROMISE IT WILL BE 
WORTH THE CALL !! 





918-82^-4844 



.^u» 



RETAIL STORE LOCATION - SOUTHWOOD 
SHOPPING CENTER — PRYOR, OK. 



Color Computer News 

Coloi Computn N«ws is Ihe first and only magazine devoted to the users 
ol Radio Shack s Color Computer Color Computet N*wt aOows CC users to 
have a source of inlormotion about then machine plus lonims tor the ex- 
change ol ideas, discoveries, helps, and comploinls CON is published every 
other monlh and contains features like 6fl09 Assembler piogiamming. 
Novice Basic, Advanced Basic. Letters and Techrucal Forums CCN reviews 
current products lot the Color Computer and tells the truth about them, good 
or bod 

It's not )ust a beginners magazine either, il prints what old hackers need 
to know too Things like entry points to the ROM and pointers in the Basic 
scratchpad 

Coloi Comput9i N«ws IS more than just a magazine, it's also a soltwaie 
excharige service. Color Computer owners can exchange ohginal soft 
ware by conlnbuting it to the CCN library where several of these programs 
are put on a tape and distributed tor a nominal lee CCN is also a nation- 
wide Users Group CCN helps establish local User's Groups with form letters, 
posters, names and publicity 

If you own a Color Computer you need a subscnption to Colot Computei 
News. While the other magazines will print some articles about the Color 
Computer you need a constant source ot intormation to stay abreast of 
what s happening with the Color Computei 

A charter subscription to Color Computer News is lust S9.00 for 6 issues But 
you'd belter hurry, you don't want to miss a single issue 

Available Fiom: 

REMorkable Software 

P.O.BOXU92 
Muskegon. MI 49443 



Some back issues available lor S2.50 including postage and handling 
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SAVE 
SSS 



TRS-80 

MICROCOMPUTERS 

CALLUS... 
SAVE MONEY 



SAVE 
$$$ 




Model II 
64 K 

$3270.00 
up to 16% 
discount off 
retail 



CALL COLLECT: 

512-689-5536 

Master Electronics, Inc. 

154N.5th, Raymondville, Tx. 7 8580 
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Form F48 Provided 
Standard Warranty On Merchandise 




Authorized TRS-80 Dealer. Store #F-723 





Program Listing 


6000 


3E89 


LD 


A, 89 


6002 


D303 


OUT 


(03), A 


6004 


3EU 


LD 


A, 11 


6006 


321E40 


LD 


(401E).A 


6009 


3E60 


LD 


A, 60 


600B 


321F40 


LD 


(401F),A 


600E 


C37200 


JP 


0072 


6011 


F5 


PUSH 


AF 


6012 


C5 


PUSH 


BC 


6013 


D5 


PUSH 


DE 


6014 


E5 


PUSH 


RL 


6015 


C3A961 


JP 


61A9 


6018 


2005 


JR 


NZ,601F 


60 lA 


CD2960 


CALL 


6029 


60 ID 


1803 


JR 


6022 


60 IF 


CDA660 


CALL 


60A6 


6022 


El 


POP 


HL 


6023 


Dl 


POP 


DE 


6024 


CI 


POP 


BC 


6025 


Fl 


POP 


AF 


6026 


C38061 


JP 


6180 


6029 


FE20 


CP 


20 


602B 


CAA660 


JP 


2.60A6 


602E 


FEOD 


CP 


OD 


6030 


CAAB60 


JP 


Z,60AB 


60 33 


FEOA 


CP 


OA 


6035 


CAB460 


JP 


Z,60B4 


60 38 


FE08 


CP 


08 


60 3A 


CABD60 


JP 


Z,60BD 


60 3D 


FE09 


CP 


09 


60 3F 


CAC660 


JP 


Z,60C6 


6042 


FE2E 


CP 


2E 


6044 


CAE660 


JP 


Z,60E6 


6047 


FE2C 


CP 


2C 


6049 


CAEB60 


JP 


Z,60EB 


604C 


2661 


LD 


H,61 


604E 


E67F 


AND 


7F 


6050 


6F 


LD 


L.A 


6051 


7E 


LD 


A, (HL) 


6052 


FEOO 


CP 


00 


6054 


CAA660 


JP 


Z,60A6 


6057 


47 


LD 


B,A 


6058 


CB7F 


BIT 


7, A 


60 5A 


C26860 


JP 


NZ,6068 


60 5D 


DB02 


IN 


A,C02) 


605F 


CB47 


BIT 


0,A 


5061 


C47360 


CALL 


NZ.6073 


6364 


CD 84 60 


CALL 


6084 


6067 


C9 


RET 




6068 


DBG 2 


IN 


A, (02) 


606A 


CB4F 


BIT 


1,A 


60 6C 


C47360 


CALL 


NZ,6073 


606F 


CD8460 


CALL 


6084 


6072 


C9 


RET 




6073 


3E01 


LD 


A, 01 


6075 


D301 


OUT 


(01), A 


6077 


CD9660 


CALL 


6096 


60 7A 


AF 


XOR 


A 


60 7 B 


0301 


OUT 


(01). A 


60 7D 


OB02 


IN 


A, (02) 


607F 


CB5F 


BIT 


3. A 


6081 


20FA 


JR 


NZ,607D 


6083 


C9 


PJ-T 
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78 


LD 


A,B 


6085 


E67F 


AND 


7F 


6087 


D300 


OUT 


(00), A 


6089 


CD9660 


CALL 


6096 


60 8C 


AF 


XOR 


A 


60 8D 


D300 


OUT 


(00), A 


60 8F 


DB02 


IN 


A, (02) 


6091 


CB5F 


BIT 


3,A 


6093 


28FA 


JR 


Z,608F 


6095 


C9 


SET 


Program corytinues 
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Program continued 



6096 
6097 
6098 
609 B 
609 E 
60A1 
60A3 
60AA 
60A5 

60 A6 
60AS 

60 AB 
60 AD 
60 BO 
60B3 

60 B4 
60 B6 
60 R9 
60 BC 



E5 

C5 

210000 

110000 

OlOOOC 

EDBO 

CI 

El 

C9 

3E82 
C 387 60 

3E02 
CDCF60 
CDD860 
C9 

3E04 
CDCF60 
CODF60 
C9 



60 BD 3E10 

60 BF CDCF60 

60C2 CDDF60 

60C5 C9 

60 C6 3E08 

60 C 8 CDCF60 

60CB CDD860 

60CE C9 

60CF D301 

60D1 CD9660 

60 D4 AF 

60D5 0331 

60D7 C9 

6008 CD9661 

60DB 00 

60 DC 00 

60 DD 00 

600E C9 

60DF DB02 

60E1 CB5F 

60E3 20FA 

60 E5 C9 

60 E6 3E2C 

60E8 C38760 

60 EB 3E48 

60ED C38760 



PUSH 

POSH 

LD 

LD 

LD 

LDIR 

POP 

POP 

RET 

LD 
JP 

LD 

CALL 

CALL 

RET 

LD 
CALL 
CALL 
RET 

LD 

CALL 
CALL 
RET 

LD 
CALL 

CALL 
RET 

OUT 
CALL 
XOR 
OUT 

RET 

CALL 

NOP 

NOP 

NOP 

RET 

IN 

BIT 
JR 

RET 

LD 
JP 

LD 
JP 



HL 

BC 

HL.OOOO 

DE.OOOO 

BC.OCOO 

BC 

HL 



A, 82 

6087 

A,02 
60CF 
60D8 



A.0& 
60CF 
60DF 



A, 10 

60CF 
60DP 



A, OS 
60CF 

60 08 



(01). A 

6096 

A 

(OD.A 



6196 



A, (02) 
3, A 
NZ,60DF 



A,2C 
6987 

A, 48 
6087 



60 FO 
6100 
6110 
6120 
6130 
6U0 
6150 
6160 
6170 

6180 
6181 
6182 
6183 
6184 
61B7 
61UA 
618D 
bl8F 
t.190 
6191 
6192 
6193 



00 00 
00 00 
00 00 
00 3C 
15 70 
00 cc 
93 S3 
00 4C 
13 08 



00 00 
00 00 

00 00 
9C ED 
2D 6D 
81 C9 
DC 94 

01 49 
5C 14 



F5 

C5 

D5 

E5 

2 10 000 

113000 

010006 

EDBO 

El 

ul 

Cl 

Fl 

C358Q4 



00 00 
00 00 
00 00 
D5 9D 
55 ID 
D9 99 
B9 E9 
59 19 
39 69 

PUSH 

PUSH 

PUSH 

PUSH 

LD 

LD 

LD 

LDIR 

POP 

POP 

PGP 

POP 

JP 



00 00 00 
00 00 00 
00 00 00 
OD IC 35 
OD 5D 4D 
E8 F9 91 
EC 84 F9 
68 78 11 
6C 04 79 

AF 
BC 

DE 

HL 

HL.OOOO 

DE.OOOO 

BC.ObOO 

HL 
D£ 
BC 
AT 
0458 



00 00 
00 00 
00 00 
95 CD 
05 DB 
SC B8 
90 BD 
OC 38 
10 3D 



00 00 
0.) 00 
00 00 
A8 C8 
58 8D 
89 Dl 
00 00 
09 51 
00 00 



00 00 FF 
00 00 00 
00 00 00 
02 AC 50 
2 8 BC DO 
FC A9 D4 
00 00 00 
7C 29 54 
00 00 00 



Progiarr) carifinues 
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^'OQ'jr" 


I'l'-ruea 










6196 


CD966Q 


CALL 


6096 




6199 


CD966a 


CALL 


6096 




619C 


CD9663 


CALL 


6096 




619F 


CD9660 


CALL 


6096 




61U 


UB02 


IN 


A, (02) 




61A4 


CB67 


BIT 


4. A 




61A6 


28FA 


JR 


Z,61A2 




61A8 


C9 


RET 






61A9 


3A7r38 


LD 


A,(387P) 




61AC 


B7 


OR 


A 




61AO 


2813 


JR 


Z.61C7 




61A,F 


FEia 


CP 


IS 




61B1 


2806 


JR 


Z,61B9 




61B3 


FE60 


CP 


60 




61B5 


2809 


JR 


Z,61C0 




61B7 


180E 


JR 


61C7 




61B9 


3EFF 


LD 


A, OFF 




6 IBB 


32FF60 


LO 


(60Fy).A 




61SE 


I80E 


JR 


61CE 




61C0 


3E00 


LD 


A, 00 




61C2 


32FF60 


LD 


(60 FT), A 




61C5 


180A 


JR 


61D1 




61C7 


3AFF60 


LD 


A, (60FF) 




61CA 


FEFF 


CP 


OFF 




6 ICC 


2006 


JR 


NZ,61D4 




6 ICE 


79 


LD 


A,C 




61CF 


CB7F 


BIT 


7, A 




61D1 


C31860 


JP 


6018 




61D4 


El 


POP 


HL 




61D5 


Dl 


POP 


PE 




61D6 


CI 


POP 


BC 




6ID7 


Fl 


POP 


AF 




61D8 


C35804 


JP 


0458 



depression of the up and down to reconstruct the lookup table. 



arrows prints characters sent to 
the monitor. Depressing the left 
and right arrows bypasses print- 
ing functions. 

Since the driver program de- 
pends upon handshaking sig- 
nals from the printer, you will 
get a video display lockup if you 
have the print option on and turn 
the printer or 7441 oft. Once the 
Selectric driver program has 
been loaded and is running, you 
must either press the left and 
right arrow combination or 
POKE the original jump address 
back into the video DCB before 
shutting off power on the inter- 
face or printer. 

The driver program treats the 
non-printable characters, such 
as graphics symbols and some 
ASCII characters that are not on 
the typeball, as spaces. 

I used the data processing 
typeball, IBM PIN 1167169. The 
lookup table in the driver is writ- 
ten to correspond with the char- 
acter and symbol locations on 
this particular typeball. 

You can use almost any typ- 
ing element with the Selectric 
driver program, but be prepared 
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You can print almost anything 
desired by inserting the ap- 
propriate typeball and loading a 
corresponding lookup table. 



Lookup Tabte 

Look closely at the Selectric 
typeball. There are four circular 
rows of 22 characters per row. 
Position the ball with the arrow 
on top of the ball pointing direct- 
ly at you. The hemisphere you 
are now seeing prints lower- 
case, while the entire hemi- 
sphere away from you prints up- 
percase. 

The four characters or sym- 
bols directly under the arrow on 
top of the element are known as 
the "home" characters. When 
the machine is at rest in lower- 
case this column is opposite the 
platen. If the Selectric is shifted 
to uppercase, the ball is rotated 
160 degrees to bring the other 
sat of home characters nearest 
the platen. 

Any character can be printed 
by the correct amount and direc- 
tion of rotation, combined with 
the correct tilt. A case shift 
rotates the element a half-turn. 



n 



«r 



-^> 



-«— (- 



-»- 



-<^ 



-<^ 



-»- 



«^-^ »- 



-«- 



^>- 



am ' interco'«ne;:ting 

«|-E«FACE CABLE 
SOAHD LCOMaECTDHS 

OPTIONAL ) 




<i 



-< ' t 



HON PRINT 

SHIFT 



INDEX 

TAB 

BACKSPACE 



DAIVEI^ BOARD ADOED 
INSIDE '441 CABINET 



CABLE 
9BC'9 



STROBE 

CW INTLK 
MOTOn HEl-Al 
HAKDSHAKF REF 
■UC/LC FEEOBAC'! REF 

TO 



Fig. 1 



Position the typing element 
so that the arrow on top is point- 
ing directly to you. Construct a 
table using the row and column 
format shown in Tables 1 and 2. 
Remember that all characters 
are backward on the typeball. 

Place the four home charac- 
ters in the table in the same 
order they appear on the ball. 
Next write down the five charac- 
ters to the left of the upper home 
character, then the five to the 
right, and so on for the remain- 
ing three rows. You now have a 
table of the lowercase hemi- 
sphere. 

The next step is to construct a 
table for the uppercase hemi- 
sphere. Your table will agree 
with mine only if you are using 
the same typing element. Ac- 
cording to my table, an upper- 
case K is printed by the R2A and 
T2 solenoids. An asterisk is 
printed in uppercase by the R5. 
R2A, Tl and T2. Powering all six 
tilt and rotate solenoids prints a 
1 in lowercase. 

Hexadecimal Conversion 

Now we have to convert the 
tilt, rotate code and case for 



each character into hexadeci- 
mal form. 

Construct anothertable using 
the format shown in Table 3, 
which is the hexadecimal con- 
version of the Selectric codes 
for the typeball I used. Include 
the case, rotate and tilt code for 
each of the characters of your 
typeball in your table. 

One in the case column repre- 
sents uppercase. 

Enter the data at the address 
indicated by the ASCII equiva- 
lent of the character. For exam- 
ple, the tilt, rotation and case 
code for the slash (/) should be 
entered at 2F. The codes for G 
would be entered at 47. 

In Table 3 I used the ASCII 
code 2D for the hyphen. The CK 
{check) solenoid must be ener- 
gized to print any character on 
the typeball that is represented 
by no tilt or rotate. 

Any typeball character you do 
not wish to have access to, or 
any character not equivalent to 
an ASCII character, can be print- 
ed as a space. Merely use a zero 
in each of the eight code col- 
umns for that character in your 
version of Table 3. 



Computer experts 
(the pros) usually have big 
computer experience. 
That's why when they shop 
system software for Z80 
micros, they look for 
the big system features 
they're used to. And that's 
why they like Multi-User 
OASIS. You will too. 



(THEN COMPARE.) 



DATA INTEGRITY: FILE & 
AUTOMATIC RECORD LOCKING 






The biggest challenge 
for any multi-user system 
is co-ordinating requests 
from several uscr^ C 
to change \-:e ^-.mgreiCrd 
atthe aafnet'mc. ^| 
^kthcut proper! ^J 
:3*t)rdi nation, ".''S;j 
^coTfusion and D-cblemj 
,cf irtacc'jrate or even 
ips.'oyec datff^n bi 
"sta'ngcrir.Q- 

Our Fi f 9 and Airtorratic 
'eooroLOcKinfi fei^ros 
icIvathcsGpronfems. 

FcreyaiT'ple normally 
ijlusc's can viev\/a 
particular record at the 
same time. But, if that 
record is being updated 
by one user, automatic 
record locking will deny all 
other users access to the 
record until the up-date is 
completed. So records 
are always accurate, 
up-to-date and integrity 
is assured. 

Pros demand file & 
automatic record locl<ing. 
OASIS has It. 



Without this control, 
unauthorized users could 
access your programs and 
data and do what they like. 
A frightening prospect 
isn't it? 

And multi-users 
can multiply the problem. 
But with the Loc 

Passwo rd and Pri 

Level features oi M 'Jiti- Use r 
CASIS. a syE-teiii manager 
A spec fy for each user 
'ji^.'Ch programs and files 
■TKRy be accessed — 
anC *orwnat ou''pose. 
"'Security is fu'thor 
enhanced by Us or 
Aeco' jntmg — a feature t'ia; 
leis yojkeep a history 
ofv.hiGh user has been 
logged on, when and 

(.for now long. 

Pros insist on these 

I security features. 

I OASIS has them. 



memory is needed- Even 
if you have more than 64K, cm 
your pay-off is cost savingiiF'' 
and moreefficien' /-;■; 
of all the memoryyo J have 
available— because ii 
services more users. 

iDt^md like a pro feature'^ 
ItilArKJOASiShasit, 



OASIS IS AVAILABLE FOR 

SYSTEMS A'los Cc-npiiCOrD Cromemco. 

Delia Pfodnc's DigHii 
Mic'osysrefris Dynab 
IrOc Inlpr systems f 
SD Sysleiis 
G'apliic Vo'ii 

CONTRO 



Mike tO' com 



ANDLOTSMORE... 



EFFICIENCY: 
RE-ENTRANT BASIC 

A multi-user system 
is often not even practical 
on computers limited 
to 64K memory. 

OASIS Re-entrant 
BASIC makes it practical. 

How? 

Because all users use a 
single run-time BASIC 
module, to execute their 
compiled programs, less 



Mytti-Use' OASfS supports 
asnan/ac iSterm.nals 
andean tun in^ little as 
56'< meffiory. Or. with 
bP"'^' switching, as much 
■as 784 K. 

Multi-Tasking lets each 
user run more than one 
]ob at the same time. 

And there's our BAS'C- 
a compiler, interpreter and 
debugger all in one. 
An OASIS exclusive. 

Still more: Editor: H ard 
& Floppy Disk Support: 
Keyed (ISAM). Directs. 
Sequential Files; Mail-Box. 



Scheduler: Spooler: 
all fromOASIS- 

Our documentation is 
recognized as some of the 
best, most extensive, in the 
industry. And, of course, 
there's plenty of 
application software. 

Putitalltogetherand it's 
easy to see why the real 
pros like OASiS- Join them. 
Send your order today. 



SYSTEM SECURITY: 
LOGON, PASSWORD 
& USER ACCOUNTING 

Controlling who gets on 
your system and what they 
do once they're on it is the 
essence of system security. 





PLEASE SEND ME: 
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i\GLE"-uSEP 



HE-ENTRANT BASIC 

COMPILER, interpreter; 

DEBUGGER 



DEVELOPMENT PACKAGE 
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, -KSC* tOitC, 



Vl- ■ _■■( ,es.\ 

Cu-i,e'Te's f.\« 
Wecj.e'i D sk Tti^ 
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.:>i..r OS etc . 



COMMUNICATIONS 
PACKAGE 



Mtnual 
Only 



SUSD 



PACKAGE PRICE 



COBOL-ANSI 74 



Phase One Systems, Inc. 

7700 Edgewater Drive, Suite 830 

Oakland. CA 94621 

IWX 910-356-7139 

NAME_^ 

STREET 

niTY 



NO BOX 



rATE 



.ZIP. 
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■:,Glem descnot.on. 

Ca'i'O'n a ■esiCe"ls adO sales :ax) 
n Check enclosed "VISA 
; UPS COD □ Mastercharge 

Card Number 

Enoiralion Dale 
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MAKES MICROS RUN LIKE MINIS 



Underscoring 

Although my typing element 
has an underscore symbol, I 
don't use it because the Selec- 
tric cannot execute a carriage 
return without an accompanying 
line feed. 

Underscoring can be used if 
you need it, but you would have 
some extra operations to go 
through. You could type a char- 
acter, backspace and then un- 
derscore. Oryou could manually 
operate the platen to get back to 
the line to underscore. 

The lookup table in the Pro- 
gram Listing has a starting ad- 
dress of 6100H and goes to 
617FH. 

The ASCII value being sent to 
the video circuits is in the C 
register at the point where the 
driver program is patched. This 
value is loaded into the A regis- 
ter, converted into seven bit for- 
mat, and loaded into the L regis- 
ter. The H register has been 
loaded at 61 H. Now the HL reg- 
ister has the address of the look- 
up table. 

The A register is loaded at the 

location to which HL points, and 
the program proceeds to initiate 
printer functions. When the driv- 
er has completed its functions, 
the video display routine is com- 
pleted. 

Once you enter your version 
of Table 3, convert the eight bit 
quantities into hex format. The 



ADDRESS 


CHAR 


CAW. 


R5 R2 


Rl 


R2A 


Tl 


CK 


T2 


HEX 


6121 


I 





1 


1 


1 


1 








3C 


22 









1 


1 


1 








9C 


23 


M 




1 1 





1 


1 







ED 


24 


S 




1 


1 





1 







D5 


25 


'/■ 







1 


1 


1 







90 


26 


♦ 




1 


1 


1 


1 







DD 


27 










1 


I 


1 








1C 


28 


( 













1 







85 


29 


) 







1 





1 







9B 


2A 






1 





1 


t 







CD 


2B 


+ 




^ 





1 











AS 


20 






1 





1 











C8 


20 










a 








1 





02 


2E 




1 


1 





1 


1 








AC 


2F 


/ 





1 


t 














SO 


30 











1 


a 


1 







15 


31 


1 


a 


1 1 


1 


1 


1 







7D 


32 


2 





1 





1 


1 







2D 


33 


3 





1 1 





1 


1 







6D 


34 


4 





1 


1 





1 







55 


35 


5 








1 


1 


1 







ID 


36 


6 











1 


1 







OD 


37 


7 





1 


1 


1 


I 







5D 


36 


8 





1 





1 


1 







4D 


39 


9 





□ 








1 







05 


3A 






1 


1 


1 











Dfi 


3B 






1 


1 


1 





a 





58 


3C 


I 










1 


1 





1 


60 


3D 


= 




□ 1 





1 











28 


3E 


) 




1 


1 


1 


1 








BC 


3F 


•) 




1 


1 





a 








DO 


40 

























OO 


41 


A 




1 





1 


1 








CC 


42 


B 




a 














1 


81 


43 


C 




1 





1 








1 


09 


44 


□ 




1 


1 


1 








1 


09 


45 


E 







1 


1 








1 


99 


46 


F 




1 1 





1 











EB 


47 


G 





1 1 
1 


1 




1 
1 




1 










F6 
4C 


61 


a 


62 


b 




















1 


01 


63 


c 






1 







1 





1 






1 




49 

04 


77 


w 


76 


11 





1 1 


1 


1 








1 


79 


79 


y 








1 














10 


7s 


z 


□ 


1 


1 


1 


1 





1 


3D 








Tafi/e 3 















hex values should be entered in 
the program lookup table at the 
address indicated by the hex 
valueof the ASCII byte. 

You will generate a mess on 
paper if you use a non-BCD type- 
ball on the 1960 and use the 
printer keyt>oard for input. You 
have two choices— either use 
BCD typing elements or change 
the 1980 keylsoard interposers 
to the Correspondence style. 

If you choose the latter ap- 
proach, I recommend a fine two- 
part article by Robert M. Weil in 
the December 1979 and January 
1980 issues of Kilobaud Micro- 
computing. 

Additional Comments 

I have been using the 1980 for 
several months, primarily as a 
source for hard copies of hex 
dumps and disassembled list- 
ings. The machine has become 
almost indispensable because 
it is so much easier to trace pro- 
gram flow when it is all laid out 
before you. And the manuscript 
for this article was prepared us- 
ing the 1980. 

Machine language program- 
mers should have little difficulty 
adapting the driver program to 
any of the several word process- 
ing programs on the market. It 
should also be easy to reconfig- 
ure the driver for use with the 
LLIST and LPRINT functions in 
Basic. ■ 



nnnrnnnnccncncccricnnncnccccnnnnnnnncccccccccc 
Instructor of Finance and Accounting at UCLA has written 

AND EDITED THESE NEW PROFESSIONAL PROGRAMS FOR THE TRS - 80^ MODEL II 



BUSINESS MANAGEMENT I ($125) 

• Morlgage/Annuitv Program 

• Effective Interest Rate Analysis 

• Depreciation Analysis 

• Savings Analysis 

• Internal Rate of Return Program 

• Present Value Analysis w\th Plot 
BUSINESS MANAGEMENT II ($100) 

• Lease versus Purchase Analysis 

BUSINESS MANAGEMENT III ($110) 

• Linear Regression 

• Confidence Limits on Linear 
Regression 

• Statistical Anolysis 

• Curve Fitting 

• Multiple Regression v^'ith Plot 

Write or caW fof tree brochure 




Bach system on a single 8" diskette 

with TQSDOS Version 2.0A 

Complete support, extensive documen 

tation and examples for each program 

All programs are user-oriented 

and 'Ready to Go" 

Programs operational for past 10 years 

Computer consulting available and 

other software paclcages under 

development 

Programs written and compiled in an 

efficient program language 

Save postoge & honaiing 
Send check or Monev OrOer lodav 'n 

CENTURY SOFTWARE SYSTEMS 

1875 Century Park East. Suite 173D, 
(213) 879-591 1 Los Ar^geies, CA 90067 
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Not all Spelling Checkers are the same. 



MICROPROOF 



T.M. 



stands out! 



EASY TO USE: Prepare your text on any Z-80 based micro- 
computer, using any of a number of popular word 
processing programs. When you are finished, enter the 
appropriate command, and MICROPROOF proofreads 
your document, displaying misspellings and typos on the 
screen. Then correcting MICROPROOF can display each 
error separately, requesting you to enter the correct 
spelling for each. You are also given the option of displaying 
errors in context or adding words to MICROPROOF's 
50.000 word vocabulary. Finally, MICROPROOF corrects 
your document. All in less than a minute. 



SELECT APPflOPRIATE RESPONSE: 



CORRECT MISSPELLED WORD: 
LEAVE WORD AS IS ": 
DISPLAY WORD IN CONTEXT: 
ADO WORD TO DICTIONARY 

EXIT: 



ENTER CORRECT WORD 
HIT ENTER' KEY 

? 



WORD: 
RESPONSE: 



lYour error] 



Correcting MICROPROOF Screer^ Display 

SPEED is the single most important factor in a dictionary 
program. All dictionary programs will find your potential 
errors but if the program is too slow, you are not likely to 
use it. MICROPROOF's speed is outstanding. It can proof- 
read a several page letter in 20 seconds. 



LOW PRICES: Standard MICROPROOF is available for 

either $89.50 (TRS-80» Models 1 or III ) or 
$149.50 (CP M**. TRS-80*' Model II and all others). The 
optional correction feature can be added at any time for 
an additional $60.00. Optional patches to integrate 
MICROPROOF into your word processing software can 
also be added at any time for an additional $35.00. 
(Integration patch not needed for Wordstar*.) 



MICROPROOF'S FULL M.OM WORD VOCABU- 
LARY saves you time and allows you greater confidence 
in the lists of potential errors that MICROPROOF 
identifies. The mini-dictionary programs, with their 10,000 
and 20,000 word vocabularies, have many correctly spelled 
words omitted from their vocabularies. Consequentially, 
they identify as pKitential "errors" many words that arc 
actually spelled correctly; five to ten times as many such 
words as does MICROPROOF. So. when you use 
MICROPROOF you will have far fewer extra words to 
evaluate, a major lime savings. There will be less need to 
look up words in order to verify that they are in fact spelled 
correctly The extra 30.000 words in MICROPROOF's 
vocabulary assures you confidence in the error lists that 
MICROPROOF generates. 

There are other proofreading programs available to choose 
from. Since MICROPROOF became available in December 
of 1980, a number of companies have announced programs 
with small dictionaries. It took us almost two years to 
develop MICROPROOF. During that time we were able to 
compress our full 50.000 word dictionary into a manageable 
size (fits on one single density 5 ^ inch disk). And we were 
able to design a proofing program which operates 
remarkably fast. The chart belou- illustrates the compara- 
tive advantages of MICROPROOF. 

ADVANTAGES OF MICROPROOF 



MICROPROOF 

DICTIONARY 

SOFTWARE 



OTHERS 

(Mini- 

Dtctionaries) 



DICTIONARY SIZE 

DISK SPACE 

REQUIRED 

FOR DICTIONARY 

DICTIONARY 

ENLARGEMENT 

SPEED- 400 Words 
SPEED- 3,000 Words 

CORRECTION 

FEATURE 



50,000 Words 

70.000 BYTES 
(fits easily on 
one 5'j" disk) 

VIRTUALLY 

UNLIMITED 

20 Seconds 
! Minule 
Opiional 


20.000 Words 
170,000 BYTES 

EXTREMELY 
LIMITED 

1 to 5 Minutes 

2 to 10 Minutes 

Not AivdiJjble 




See vour local microcomputer dealer or write lo: 

CORNUCOPIA SOFTWARE 



Post Office Box 5028. Walnut Creek. Calitornu 945% 



(415) 893 0633 .^378 



DATA MANAGEMENT 



Find your favorite ROM addresses fast. 



80 Black Book 



Dave McGlumphy 
4429 Paula Lane 
Red Bank. TN 37415 

This program is for the 
Model 1 Level (I TRS-80, 
with or without disk. Its pur- 
pose is to serve as a data base 



to help you find those elusive 
ROM addresses that you re- 
member seeing— somewhere. 

A card tile with ROM ad- 
dresses and descriptions would 
serve just as well, but this pro- 
gram can rapidly scan data by 
keywords or by addresses. Ac- 



Program Listing 



ADDRESS 



N D 



IB HE STORE 

2B CLEA£ 498 

2t IF PEEKil4317) -a OH PEEK 1 1*3:7 ) -255 THEN OSS-'T" ELSE OSS-'D' 

sHEK OPERATING SYSTEM-TAPE OR DISK 

40 CLS 

50 PRINT§a32,"DAVi; MCGLUMPHY 

B6/13/81- 
e> PHINT"*429 PAULA LANE" 
7» PHINT"HED BANK, TN 37<1S"| 
SB PBINT#B," QUICKIE BOM 

E H" 
98 PRINT 

IBB PRINT'THIE FHOGKAH HAS A LIST Of HANDY ADDRESSES." 
IIB PRINT : PBlNT'l'LL SEARCH FOR A KEYWORD {STRING) OR AN ADDKE 
SS FDR YOU . " 
128 PRINT ! PRINT'TYPE WHATEVER YOU WANT TO FIND. (E.G. DISK OR 

16396.] 
138 IF OSS"*T* THEN INPUT SS ELSE LINEINPUT S$ 
1*8 CLS 

lie FOR J-1 TO 5BB 
16B PRIKT3B,J; 
178 READ DS 

IBB ir DS-"999RND" THEN Cl^ ; PRINT'NO MORE DATA TO READ.* : COS 
tlB 790 : GOTO 33B 

198 IF OSS-'D" THEN IF INETR ( DS , SS 1 ^B THEN 32B ELSE 26B 
280 REM SEE PAGE 'j/12 OF THE LEVEL II MANUAL TO EXPLAIN THE 

'INSTRINC FUNCTION WHICH FOLIJ3WE THIS REMARK, 
2ie IF LEN{SS) >LEN(DSI THEN XS-SS ; YS-DS ELSf, XS-DS : YS-SS 
22B FOB K-I TO LEN[XS) -LEN { YSl ♦! 
23B IF YS'HIDS(XS,K,LEN(YS) ) THEN 26B 
248 NEXT K 
2S8 GOTO 328 

268 HEM FOUND THE REQUESTED OBJECT 
278 CLS 
288 PRINT DS 

298 PRINT#B96,ETRINGSI63,130) 

30B PRINT"DO YOU WANT TO LOOK FOR MORE POSSIBLE MATCHES?* J ! 1 S-I N 
KEYSiIS-" 
318 1S=INKEYS:IF IS="Y* THEN PRINT IS i GOTO 32B 

ELSE IF IS-"N" THEN GOTO 33B 

ELiiE 310 
32B CI.S ; NEXT J 

338 CLii : PRINT"WHICH OF THE FOLLOWING WJ YOU WANT TO DO NEXT? 
[TYPE THE FIRST LETTER.! 

340 PRINT'A. RUN THIS PROGRAM AGAIN. 

B. RETURN TO BASIC. 

C. RETURN TO DOS, 

D. LIST A SCREENFUL OF DATA STATQIESTS, 

E . OO BANANAS . " J 
35B IS-INKEYS 

36B IF IS<"A" OH 1S>"Z" THEN 35a 

37B ON ASC(IS)-64 GOTO IB , 818 ,398 , 41B , 42H 

3Bfl GOTO 35B 

39B CLS ! IF OSS*"T' THEN PRINT'FIRST, YOU'LL HAVE TO BUY A DISI 

Program continuts 



tually, this program makes a 
good data base searcher no 
matter what the subject is. It can 
easily be used for phone 
numbers, photographs, stamps, 
recipes, or anything that needs 
some sort of indexing arrange- 
ment. 

The program's utility comes 
from the INSTR function, which 
lets you search quickly through 
strings (words, sentences or 
what have you as opposed to 
numbers). 

You don't need a disk system 
to use the program. Level II 
Basic doesn't have the INSTR 
command, but look on page 
5/12 of the Level II manual. 
You'll find a routine described 
that simulates INSTR, without 
its speed. The simulation is in 
Basic, while the INSTR com- 
mand in Disk Basic is a ma- 
chine-language subroutine, I 
wrote this program so that you 
don't have to make any changes 
to run it on either Disk Basic or 
Level II Basic. 

Line 10 resets the data point- 
er so that each time this pro- 
gram starts from line 10, it'll 
be able to read all the data. Yes, 
it's true that each time you run 
a program, the data pointer is 
reset to the beginning of the 
data. What about when you 
want to start the program over 
again without the command 
Run as In line 340? Restore 
gives you a way. 

Why not just use Run? Be- 
sides resetting the data pointer, 
Run also clears all the variables. 



and there may be some situa- 
tions where you wouldn't want 
that to happen. 

Line 30 determines whether 
the computer running is a disk 
system or a non-disk system. 
Variable OSS (operating system) 
holds a D if it's a disk system, 
and a T if it's a tape system. 

The program needs to know 
if it's on a disk system m three 
places. Line 130 uses the 
customary input statement if 
it's a tape system, but it uses 
the line input statement if it's a 
disk system. What's the dif- 
ference? Line input does about 
the same thing as input except 
that (1) leading blanks aren't Ig- 
nored, (2) the string being input 
can have either commas or 
quotes embedded in it, (3) no 
question mark is displayed on 
the screen, and (4) only one 
variable can be used with each 
line input statement. 

If you're using a tape system 
and you type in a string that in- 
cludes a comma, you'll get an 
error message that says "extra 
ignored" which means that 
nothing after the comma be- 
comes part of the search string. 
If you want to search for some- 
thing that has a comma, put 
quotes around the string. 

The second place the pro- 
gram needs to know if it is run- 
ning on a disk system is In line 
190. This is where I use the Disk 
Basic command INSTR or the 
Level II Basic routine. 

On a disk system in line 390 
the user has requested to 
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return the DOS. You can't 
return to the disk operating 
system if you don't have one. 

Line 150 limits you to 500 ex- 
ecutions of the read statement 
in line 1 70. You can change that 
if you need to, but I doubt you'll 
have more information in data 
statements than line 150 al- 
lows. You need to have fewer 
data statements than the last 
number in line 150. 

Line 1B0 checks D$ (data 
which was read by line 170) to 
see If It Is 99gEND. If it Is, there 
Isn't anymore data to read. In 
this case, the program presents 
a menu of options. 

Line 290 prints a line of 
graphic characters just above 
the bottom line of the screen to 
visually separate the informa- 
tion at the top of the screen 
from the Instruction at the bot- 
tom of the screen. 

In line 330 notice that the 
words "{TYPE the . . . )" aren't on 
the same line as "Next?" even 
though there appears to be 
plenty of room on the line. 
That's because I used the 
down-arrow when typing line 330 
todrop'-fryPEThe. . .)"downa 
line. It drops down both in the 
program listing and on the 
screen when you run the pro- 
gram. It's a good way to format 
the screen displays. 

Lines 360 and 370 show a 
handy way to allow a user to 
select a function from a menu 
of up to 26 choices. The menu 



has a letter of the alphabet in 
front of each choice, starting 
from A and going with con- 
secutive letters until there are 
no more choices. Line 350 waits 
for the user to type a letter. Line 
360 makes sure that the user 
typed an unshifted letter, and 
line 370 makes the program 
branch to the requested 
routine. 

The ASCII value for the letter 
A is 65. If you subtract 64 from 
the ASCII value of the letter 
A, you get 1. If line 370 evalu- 
ates ASC{l$)-64 as a 1, it then 
branches to the first address in 
the list of addresses. In this 
case, it's to line 10. If the user 
typed J, then line 370 would 
evaluate ASC(l$)-64 as 10. and 
it would try to jump to the tenth 
entry in its list of addresses. 
Since there Is no tenth entry, 
control would pass to the next 
line, line 380, which says to go 
back and wait for the user to 
type another key. 

You might want to print an er- 
ror message between lines 370 
and 380. 

Line 400 is a command for 
disk users. It says to leave 
Basic and go back to the disk 
operating system. 

Lines 480 through 770 con- 
tain the data (database?). 
Notice that there are quotes 
around the data in each line; 
when I read a line of data, I'll 
get the entire line including 
commas. ■ 



Program conf:nijea 

SYSTEM!" ! GOSUB 79fl : SOTO 33B 
4Za CLS ! CMC'S' : HEM RETURN TO DOS 
410 CLS : LIST 488-540 
4 20 CLS 

43e PRINT CHRSI23) 
4*B FOB J-1 TO 10B 
450 PRINT? RND(1451*7, "BANANAS*; 
460 NEXT J 
470 GOTO 33B 
tee DATA'TO GOTO READY ON MODEL 1 OR III, LO BC,1A18H 



JP 19AEH 



490 DATA"CHRS(271=UPWARD LINE FEED. EX: AS-CHRS t 222) +CHRS{27) , 

FORX-ITOS: INPUT 'NAME' :NS(XI :PRINTAS;: INPUT" AGE" ; Am) :NEXT' 
50B DATA'INPUT 246 PORT ON MODI 1 1 . JBH-PBINTEH READY." 
518 DATA"PEEK1293I . 73-MODEL III, ANYTHING ELSE'MODEL 1." 
520 DATA '143B8 POKE N.B HERE TO SELECT TAPE DRIVEtl. 
POKE N,l TO GETt2, I'SE 255, N TO TURN MOTOR ON/OFF" 
530 DATA"14312 MODEL 1 PRINTER STATUS. 
iFS127, PRINTER NOT READY OR ATTACHED. 
63«PR1NTER READY.* 
54B DATA-14)17 DISK/TAPE FLAG. 8 OR FF=TAPE, ANYTHING ELSL^DISK. 

ON MODEL m, INPUT PORT FB : FF-TAPE, ANYTHING ELSE'DISK." 



S5B DATA '151B5 ?ABCDEFG 

/81 P131' 

560 DATA'15106 H 



578 DATA-151BB 

580 DATA*15112 

598 DATA'15120 

600 DATA"15136 



L M N O 
R S T U V W 



1 2 
9 : 



3 4 5 6 7 

! . - . / 



PEEK KEYBOARD : SEE BBMICRO 04 

PEEK KEYBOARD" 

PEEK KEYBOARD" 

PEEK KEYBOARD" 

PEEK KEYBOARD' 

PEEK KEYBOARD" 
618 DATA"1516S ENTER CLEAR BREAK L'PARHOW DNARROh' LFARROM BTARROW 

SP" 
620 DATA"15232 SHIFT PEEK KEYBOARD* 

638 DATA"POK£1536B,l:PRlNTPEEK(1536e) . 1-RADIO SHACK LOWERCASE M 
OD. 

65-NOT RS HOD OR LOWERCASE DRIVER PROGRAM IS INSTALLED. 
SEE THE 02/81 RS NEWLETTER , PAGE 4.* 
640 DATA'lf.396 DISABLES BREAK IN LtMEL II BASIC IF YOU POKE N,23 

POKE N,221 ENABLES.' 

65B DATA"PEEK|16439)«0 IF KEYBOARD IS GENERATING UPPER 4 LOWERCA 

5E 

AND THE LOWERCASE MOD IS INSTALLED AND THE DRIVER IS WORKING.* 

66B DATA"1641*-16415-VIDEO CONTROL BLOCK POINTER. 

POKE16414,141:POKElf415,5 TO SEND VIDEO TO UNEPRIKTER. 

POKE16414,eBiPOKE16415,4 TO RESTORE VIDEO, SEE 16422.* 

678 DATA"C-PEEK(164iei •256"PEEK(164ni TO MAKE C-CURSOR POSITION 

6B8 DATA'16422-23»PRINTEB CONTROL BLOCK POINTER. 
PORE16422,88:POKE16423,4 SENDS LINEPRIKTER OUTPUT TO VIDEO. 
POKE16422,141:POKE16423,5 TO RESTORE LINEPRINTER. SEE 16414.' 
690 DATA'16424 POKE N,4B TO SET LINEB/PAGE COUNT AT 39.' 
788 DATA'16425 POKE N,B TO RESET LIHECOUNT" 
718 DATA'I644b POKE N,8-PRINT CHBS123) (WIDE LETTERS! . 

POKE N,8 TO RESET TO 64 CHAR/LINE-DOESN "T REPOSITION THE 

CURSOR LIKE PRINT CHHS(28) DOES." 
728 DATA"16526-7»POINTER TO USH ROUTINE. TO CALCULATE VALUES TO 
POKE, INPUT'QECIMAL ENTRY PT " ;DV:MS"F JX(DV/256) -. 
LS-INT( (DV/2 56-MH1 '256) :POKE16526,LS:POKE16527,MS' 
73B DATA"I6')39 TO LPRINT TAB(N1 WHEN N>63, USE 



741 
HD, 



758 
760 
778 
7 88 
7 98 



LPRINT STRINCSIN-PEEK(16539) ,32) FOLLOWED flY WHATEVER.' 
DATA"1654B-9-POINTER TO BEGINNING OF BASIC PROGRAM. TO APPE 

POKE1654B.PEEKa6633) -2: POKE16549,PE£K( 166341 :CLOAD: 
POKE165*e,233:POKE16549,66 (DECIMAL 171291 ," 

DATA'16561-2-MEKORY SIZE FOP MODEL 1." 

DATA"16fi31-4-POINTER TO END OF BASIC PROGRAM" 

OATA*ni29-BEGINNING OF BASIC PROGRAMS IN LEVEL II BASIC." 

DATA"999END' 

PRINTe975, 'PRESS ANY KEY TO CONTINUE."; : 1 S=IHKEYS 

IF 1NKEYS-" THEN 080 ELSE RETURN 

CLS : END 



^^^ CHEAP CHIPS ARE NO BARGAIN ^^ 

I BUYING ADD-ON MEMORY? 
I GET THE BEST!!! 

I Mvnorylaitures cost rou lima inn morgy JipanMtlM 

I RAM cnipj navaiona-to-lsn m-strvca Ijiluri ntioio U S 

^ ChinJ-from i study By H AnOarsor, Compular Div , 

£ HswIiu.puKan] ripcntd IT m Fcwiaatef. 4-76-80 

Weoflar 4116 [Hips By Fii|iliu, NEC, HKacrii, Tostiibj 
^ io(] Mitsubishi toe moiT pwuUr campuUfi iM 
5 expansion mamoy ooardi. mciuamg 

1 -Afpta -Al TRS-H'I *IIM HI 'Hw* H-<f 

o 411IOTHAIICIIAIil THEIEST 

g 20Dns<C Plastic S23 70. Ctrink tlT.IS 

J ISOnifc Piislic $30 95 

S ITATK RAMS 

° 2114 45OnsKS3 30 300nsM: S3 90. 7101 S2 30 

X EnoilS I4SC nsK stfl. uk tof hispMd it rtquntd) 
_ 2708 M 80. :716 5V-.12V »9 40. 2716 5V J9 70. 
3 3732 118 90 

_, W« It bHi any ItgilimM pnct lor cani|Hribl< tfHps.Hi- 
^ vokjma uHts.Oulars.Drcbbs.asli torguanlily accounts 
« SHIPPtNG lo 175. il U S50. ti over ISO. FREE 
COD *V 40 

Dv«r I7O0. lOS 
294M TrilNii 
1991-7433 

iilM hi 

US ANYTIME 
- Sv0 List of Adv»rtia»rs on pmg«41B 




REAL ESTATE SOFTWARE 

(~> \rrLE. TRS-M . rcT 
> PBOPKBTV MANA(;l!;MENTSV»rrF,M! HIS 

• TlAMI Hlltorr • OiIninM* FMi 

■ LM Km ttepMi • BriiaiBt *win> 

• VKMCf a>inn • uwhn tt**! 
- • Mtm\ • III ttt»n» M**rt 

• AMI iMi Offt • Mian CMcii 

■ MirnM CkKli • PnM MmM 

• FRUPt:HTl LISTINGS' COMPARABLtV »32.<> 



UMl/ItlM/C*| 

Mo n>c*/l«c*>i* 
■n P'ict'Sg 'HI 
MnCHUnn 



S m 
E " 



II lim'LKMg 
lOOa l.iiini/Ont 
LiiUni Hw* fMI 



REAL E>TATK A.\A1.VSIS MOUlil.Ks (40 MiKlult 

• Hn PmMM • Tb DMVfM EicMiifi 

• lutti^ f'W AaMfll • V* iHo ilwhIHi 

• ^I**') SUH • l(M iKM'litlMa 

W(HtD PROCESSOR - mack: WAND: •28.1 



IJbi:"- . c.j:n' 



■ fen> CM aiiKi 

CH •HMHM Mi 6% I 



SaXII Qhi > Mltll* SttMt. HdlUIWI luU C« NIM 




COMPACT 2yi-\% 
INTERCONNECT SET 

• Eaiy. full conllgurBllon of line signals 

• All 25 signals pasted to headers 

• Designed for wire-wrap or jumpers 

• Additional header tor breat>-ln round cable 

• Made for permanent Installation 

LOW COST -on// $35.00 

JIS- Jumper Set 6.50 

S YZ Y G Y " '^^ 

"the interlace people" 

256 W. San Bernardino Rd. 

Covina. CA 91723 * (213)332-3320 
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UTILITY 
LOAD 80 



Mainframe menu for diminutive micros? Yeah! 



Dexterous Data Entry 



Bob Shuken 
973 Harney Way 
Sunnyvale. CA 94087 



ATRS-80 with a couple ol 
disk drives and a printer 
makes a top-notch, low cost 
business computer. TRSDOS 
and disk Basic provide a iot of 
computing power, yet are sim- 
ple enough that a relative novice 
can write fairly complex, data- 
based business programs tor 
number crunching, report gener- 
ating, and record keeping. Un- 
fortunately, in the area of key- 
board data entry, the 80 falls 
short. 

Professional small business 
minicomputers provide good 
CRT/keyboard control and query 
language to simplify trath the 
programming of screens and 
menus and the keyboard opera- 
tor's data entries. The 80 hardly 
addresses these areas. 

I have come up with some 
useful modular subroutines that 
I incorporate in just about every 
program. The most important is 
a data entry subroutine that sim- 
ulates the display and control 
needed for data entry using in- 
put screens. It displays data in 
the right place, provides for- 
ward-backward, flashing cursor 
and backspace functions, and 
generally simulates the presen- 
tation found on a professional 
business mini. 

The program has to guide the 
inexperienced user through ev- 



ery step, using language he is 
familiar with, and must tolerate 
any mistake without a crash. I 
have tried to simulate tech- 
niques used by business mini 
pros for selection menus, data 
input screens, and subroutines 
for cursor control and data 
verification. 

Menus give the operator a se- 
lection of program functions. 
They should be clear and unam- 
biguous, and prevent panic in 
event of a mistake. 

Screens are more complex. 
First, the layout must be de- 
signed. Once the screen is dis- 
played. THS-80 Basic does not 
provide any high-level language 
commands for properly using 
the screen for data input. Sever- 
al subroutines must be incorpo- 
rated to guide the operator and 
give him control, plus keep the 
screens intact under all condi- 
tions and make sure that the da- 
ta entered meets program and 
file constraints. 

Menu Generating Subroutines 

In a typical program, there are 
several to a dozen or more 
menus, starting with a main pro- 
gram selection menu, and pro- 
ceeding to subordinate selec- 
tion menus. I also provide a 
menu that allows the operator to 
verity or cancel the input and 
decide what to do next. Display- 
ing a single screen or menu is 
simple, but in a program with 
many displays, subroutines sim- 
plify programming and subse- 
quent modifications, and be- 



come effective modules usable 
from program to program. 

A typical menu generating 
listing is shown in Program 
Listing 1. Lines 500-530 define 
the menu header and display it. 
centered, at the top of the CRT. 
Obviously, we could accomplish 
the same thing with a one-liner: 

500 CLS:PRINT TAB(23| ■■SELECTION 
MENU*' :PRINT PRINT 

but in a complex program with 
many displays of screens and 
menus, lines 510-530 twcome a 
one-line subroutine and 500 is 
simplified to: 

500CLS:H1S = "•SELECTION MENU*'' 
:GOSUB XXX: PR) NT: PRINT 

Lines 550-590 print the menu. 
1% defines the number of menu 
items to t>e displayed. The items 
themselves are located in a 
single data statement at line 
9010. 

Get the Right Data 

Using the Read/data state- 
ments to generate displays is 
very handy. Where dozens of 
displays are used, each can t>e 
defined and easily modified sim- 
ply by editing one data state- 
ment and perhaps a variable or 
two. Unfortunately, there is no 
way to jump around, select and 
reuse a particular data state- 
ment. However, the TRS-80 
reads data statements quickly, 
so the subroutine shown in Pro- 
gram Listing 2 can be used with 
dozens of data statements with 
only a minor delay. 



Listing 2 replaces lines 540 
and 9010 of Listing 1 and adds a 
subroutine starting at line 
10100. To find the desired data 
statement, add a keyword as the 
first item in the data statement. 
S$ and H1$ are dummy vari- 
ables. The Restore in line 101 10 
sets the Read sequence to start 
at the first data item. Line 10130 
looks for a match between 8$ 
and HIS. When the match is 
found, the program returns to 
the main listing and the next 
Read statement will start at the 
first real item of the selected 
data statement. 

Make the keyword descriptive 
of the application (e.g., MENU, 
SCREEN1), and put all data 
statements in one place. This 
makes it simple to find any dis- 
play and review its contents. A 
string variable (H1$) is the dum- 
my, so both numeric and string 
data can be read during the 
search. Quotes are not needed 
around string data elements un- 
less they start with a leading 
blank or contain terminators. 

One from Column A 

There are a number of ways to 
let the operator make a menu 
selection. Only a valid entry 
should be accepted. The best 
technique I have found is de- 
scritied by C. W. Simpson {The 
Alternate Source, Vol. 1, Num- 
ber 4. p. 38) and shown in Listing 
3. It uses mnemonics and the 
characteristics of INSTR and 
ON. ..GOTO... or ON... 
GOSUB. . . . 
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SiB 


CI^ : 


HIS • ■• SELECTION HEND 


*• 


SIB 


HH - 


LENIHIS) 








528 


Q ■ (64-HU)/2 








bit 


PBIHT 


TAB(Q) HIS : 


PRINT : 


PRINT 1 


5*9 


REM 










5sa 


I3» - 


5 : 12% • 23 








560 


FOR H ■ 1 TO 13% 








57B 


READ 


i2S 








i»a 


PRINT 


TABI12I] H2S 








i99 


NEXT 


I\ 








eae 


GOTO 


lee 








90 a B REM 










9B1B DATA 


<A>UU,<C>HANGE, <D>KI,ETE 


<P>HINT,<0>UIT 






Program 


Listing 


1. 





548 SS - 'MEKL" 




nte 


REH 




itie 


JATA MENU,<:A>DD,(C>HANGE, 1 




'D>ELET£,<P>RINT,<Q>UIT | 


itiet 


BEH 




leiiB 


RESTORE 




iei2e 


READ HIS 




10130 


IF HIS - SS THEN 


RETURN 


10140 


GOTO 101 20 






Program Listmg 


2. 



Listing 2 generated a tive- 
item menu with the first letter 
mnemonic of each item (in or- 
der) being A, C, D, P and Q. In 
Listing 3, these five characters 
are made into one string in line 
620. When a key is depressed, 
line 620 searches the string us- 
ing the INSTR command in line 
610, to find the first location 
matching the key depressed 
(A$). If a match is found, A% 
takes the value of the position of 
AS in ACDPQ. Since this value is 
also the order number of the 
item in the menu selection, it is 
used directly for branching in 
line 630. If no match is found, IN- 
STR returns A% as zero. ON A% 
GOTO... ignores a zero and 
passes control to the next state- 
ment, so if an invalid key is de- 
pressed (even an Enter), A% is 
zero, line 630 is ignored and line 
640 jumps back to line 610. 
There are no REDOs and no 
scrolling, so everything stays 
put. 

Make Your Own Screen 

Data input screens provide a 
visual format as an aid in enter- 
ing data quickly and accurately. 
In most cases, the source data 
is hand-written. The optimum 
screen is identical to the input 
form. If you can't arrange the in- 
put that way due to the physical 
constraints of the CRT display, 
rearrange the screen input for- 
mat as logically as possible. If 
there are more items than can 
be included in a single screen, 
use multiple screens with each 
faithfully reproducing one seg- 
ment of the source data form. 

If the source data does not 
come from some other docu- 
ment, arrange the screen to di- 
rect the user through a logical 
sequence consistent with the 
source data. 

Use the exact wording of the 



source data as closely as possi- 
ble. But don't overcrowd the 
screen, it generates mistakes 
and slovi/s down data entry 
speed. Use a top-to-bottom, left- 
to-fight flow. 

The data entry screen con- 
sists of two (and sometimes 
three) independent but inter- 
related patterns. First is the 
screen display itself. Second is 
the pattern of blank spaces for 
data entry. Both patterns are al- 
ways required. The third pattern 
used for data editing displays 
the existing data prior to the 
edit. 

The two basic types of 
screens most useful are the 
form type and the column type. 
In the column type, the prompt 
words appear as a vertical col- 
umn, and the blank spaces for 
data entry are Immediately adja- 
cent to the right. This form is 
useful for entering columns of 
numbers. For data editing, dis- 
play the existing data to the 
right of the prompt word, and 
the space for the new data entry 
to the right of the existing data. 

The form type duplicates the 
appearance of the source data 
form. Start the data entry flow at 
the top, running left-to-right, 
top-to-bottom, with the space 
for data entry immediately 
above the associated prompt 
words. 

Listing 4 shows an example of 
the form type, using techniques 
similar to those for generating 
the menu, but showing one im- 
portant difference. Here each 
prompt word must be in a specif- 
ic location to simulate the form, 
so that a simple Print Tab{l2%) 
command becomes a nuisance. 
In the data statement, each 
prompt word is preceded by a 
number equal to the print posi- 
tion of the first character of the 
word. Line 1530 reads both HI % 



6B0 


FOR 


I ■ 1 TO 5 


■ PRINT : 


NEXT 


I 


bl0 


AS - 


INKEKS 1 


IF AS - •• 


GOTO 


610 


£20 


At - 


IHSTR(*ACDPC*,ASI 






63B 


ON A* GOTO 651 


,650,6^0,650,651 




64B 


GOTC 


610 








65B 


GOTO 


650 

Program 


Listing 3. 







ise0 


HIS • *• DATA IKPUT SCREEN •■ : 




GOSUB 10000 




1510 


SS ■ 'SCREENS" 


: 005UB 10100 


15 20 


FOR I - 1 TO 7 




1530 


READ Hll : REAI 


HIS 


1540 


PRISTg HH, HIS 




1550 


NEXT I 




1560 


GOTO 1560 




90B0 


REM 




9B3B 


DATA SCREEK3,2B9,[ LAST NAME {, 1 




22B, [FIRST NAKEl, 406,1 STREET | 




ADDRESS [,5B9, 


i CITY ( , 




61B, ISTATEl ,622 


,UIP[ ,796, 




1 PHONE [ 




100B 


REM 




10811 


Kit - LENIHIS) 


:Q - 164-Hl»)/2 : 




PRINT TAB(Q) 


lis : RETURN 


101B' 


REM 




1011 


RESTORE 




10121 


READ KlS : IF 


lis • SS THEN RETURN 


10131 


GOTO 10120 






Program 


Listing 4. 



AS 


Ninu ItMi selection nunCer 


Ai 


INttYI tempor»ry virliBle 


B1I 


Zunor memory locition msh 


B» 


Cursor noiwry locjtior 1st 


OU(N,J] 


Mill dau »rra/, 1 records of J items eacrt 


oej(i.j) 


renporary data entry storage array 


ERI 


Invalid entry flag and counter 


n 


ASCII ualue of clMracter to Ce verified 


F8S 


Complete string generated by data entry subroutine 


ni 


Single cHaractir entered by INK£YI 


FU 


Tnnporary itring fonned for data verification 


F3 


Flashing cursor timer counter 


n.1 


Data entry error flag 


HIS 


Display header string consMnt 


HIS 


Display ^leader print position 


I 


FOR NEXT loop counter 


11 


Lengtfi of character field minus one {PI - ^0) 


IZI 


Tab position for menu display 


131 


Number of selectable menu 1te«s 


J 


fOfl-NEXT looo counter 


1! 


FOfi-NEXT loop counter 


Lt 


Leriqth of data string to 6e verified 


> 


Data entry reconj ni«eer 


NTI 


Data display record nuster 


P(J.Z) 


Print position storage array 


P« 


Screen print position of first character (0-1023) 


?^ 


Screen print position of last character (0-1023) 


n 


Current print position [0-10!3) 


P3 


Current print position (15360-16383J 


P4 


ASCII value of underline (95) or blank (3ZJ 


P5 


Toggle constant for P4 {95 + 32 ■ 127) 


Q 


Calculated Reader tab position 


SJ 


Data statement keyword string constant 


M 


Display delay dixmry variable 




Table 1. List of Variables 
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FREEPREMIUM! 
1982 subscribers will 
receive the special 
MATH1 package ol 
PC programs. You 
qualify to receive 
this valuable free 
gtft if you check 
either box 2 or 3 
belovwl Don't delay! 
Get started learning 
how lo enjOy your 
pocket computer to- 
day. Use this handy 
subscription card! 



SUBSCRIPTION FORM 



D 1981 Charter Subscriber (Issues 1 - 10). S20.00 for U.S. 

delivery. (U.S. S24.00 to Canada. U.S. S30 00 elsewhere-) 
D 1981/82 Charter Subscriber (Issues 1 - 20) S40.00 m 

U.S. (U.S. $48 00 to Canada. U.S. $60.00 elsewhere.) 
G 1982 Regular Subscriber (Issues 11 - 20). $30.00 in U.S. 

{U.S. $36.00 to Canada. U.S. $45.00 elsewhere.) 
D Sample issue. $3 00 in U.S. (U.S. $4.00 elsewhere.) 

Orders must be accompanied by payment m full. We do not 

issue invoices for the POCKET COMPUTER NEWSLETTER. 

Thank you tor your remittance. 

Name: 

Addr; 

City: State: Zip: 

MC/VISA # Expires: 

Signature: 



AUTO-WRITER 





i MAKE YOUR WORD PROCESSOR OO 
THE THIIMOS YOU BOUGHT IT TO DO 

SALES MANAGERS: Imp ■ customer hit 
SECRETARIES' send out cuatomiied furm letters 
BOOKKEEPERS: prepare reports tor the boss 
WRITERS: maintain, organiie and aort bibliographies 
BOSSES: create reports and sorl data liles 

Use YOUR WORDPROCESSOR to create end maintain m mailing list or 
any data basa. 

Join that mailing liat to e form tatter with a wnda range of options 
Sort your Name C Aitdress (ites by any key, aiien iMhenthe last name or 
fip coda am buried in a line! 

• Son 1000 "NAMES". Use up to 20 items per name. 

■ Insart into the teat of a form-lattar or report command linas that Mill 
change the printmg format from one line to the nail in mid 
run EVEN WHEN USING ELECTRK: PENCIL TO CREATE YOUR 
FILES! 

■ Use the built-m Wordprocessor to edit a lettar, or, CREATE ■ Mriolly 
naw latter or raport — and — store it in e tile that •■ loadable by your 
UUordproc essor . 

- Parsonaliie form lettars as you run! Insert "hays" [wonls or phrases] 
FROM THE MAILING LIST! Automatically insart ■ name or title or a 
comment. f, .,..-."'' ' 

■ Insart any phrase from the keyboard. . ^ . .. •■'" 

• STOP autiimatically lor manual sfioat food! .'578 

• SET spK* lor AUTOMATIC BhMtfaads. 

• Craati aubaats of your DATA BABE with pouierful SELECT IF software 
...Visa and Maitarcerd accaptad,,. 

NOW AVAILABLE FOR >72.a3 [tor residents of Minnesota add 5°g sales tan] 
- • 'SPECIFY WHEN ORDERING WHETHER MODEL i OR MODEL III' ' 

NlidvaeBt Data Systems 



SCRIPSIT 

LAZYWRrtER 

ELECTRIC PENCIL 



and H1$ and Hl% as the print 
position of HIS, and line 1540 
displays the word where it 
belongs. You can rearrange the 
form easily until you get what 
you want by changing the print 
position numbers m the data 
statement. 

Control that Cursor 

When entefing data and 
showing error messages you 
must be able to move around the 
display at will. Unfortunately, 
the TRS-80 has a cursor with an 
uncanny ability to erase any- 
thing it passes over. Fortunate- 
ly, there is a way out. You can 
position the cursor anywhere on 
the screen, without causing any 
blanking of displayed charac- 
ters, by POKEing the cursor lo- 
cation into memory locations 
16417 (msb) and 16416 (!sb). To 
derive the proper byte values, 
first define the desired display 
location of the cursor as a value 
between print positions and 
1023. The msb is then 60 plus 
the integer value of the print po- 
sition divided by 256 (60'256 = 
15360, the video memory loca- 
tion of print position zero). The 
Isb is the difference between the 
print position and (60-msb)'256. 
Finally, POKE these values us- 
ing the form POKE 16417, 
msb:POKE 16416, Isb. 

Now a Print command starts 
at the POKEd cursor location 
without disturbing anything on 
the display (end the Print state- 



ment with a semicolon to inhibit 
the iine feed or you may lose 

control again). 

Data Entry Subroutine 

We cannot rely on Level 
ll/Disk Basic to actually enter 
the data. We would be stuck 
with input and tine input, and the 
cursor would obliterate ad our 
hard work. The only thing Ihal 
saves us is INKEYS, and it needs 
help- 
Professional minicomputers 
provide: a flashing cursor to tell 
the operator where he is; a dis- 
play of each character as en- 
tered; the ability to correct typ- 
ing errors; and an opportunity to 
visually verify the data before 
processing. The accompanying 
software also validates the 
data. Validity includes data type 
(string or numeric) and data size 
(within boundary values for 
numerics and within program 
constraints for strings). 

Program Listing 6 accom- 
plishes all of these tasks, rely- 
ing primarily on the data entry 
subroutine shown in Program 
Listing 5, starting at line 60000. 
The subroutine in Listing 5 is the 
heart of the data entry pro- 
grams, so save it on disk and 
tack it onto the end of every pro- 
gram with the Append com- 
mand. Use unusual variables to 
avoid incompatibility. Use a 
highly compressed form, which 
is expanded in Listing 5 for 
readability. 



6BIII 

6aaiB 
eai2i 

6»tit 

&aisi 

6BB7a 
5: 

6IIBI 

6BB9I 



6B12a 

eeni 

'1- 

6fll5B 
6B16B 
6B17B 
fiBlBB 
fiB19B 
6B2B0 
60210 
eB2!B 
6B23B 
6e24B 
6B25B 
6B26B 
60211 
6B28fl 
6B29B 
6B3BB 
69311 



REM 

REN .«.«.*..... ,,,t.,..,..t,,.i,,.*t,.tt,,t,t. 

REM ••••• DfcTA ENTRY SUBROUTINE PROVIDING •■••• 

REK ••••• FLJISHINC CURSOR, POSITION LOCATOR ••••• 

REM •••«• AMD BACKSPACE FUNCTION ••••• 

REM •*.......................................•.•... 

REH 

LET P2-PI:LET FeS-*':LET I1«P1-PB:LET P3-1536B-P2 : LET P4'9 

LET F3-B:LET Pi-127 

POH I-B TO lliPOKE P3tI,95:NEXT 1 ; GOTO 68118 

LET P3-1536B*P2!LET Pt-9S 

POKE P3,P4:LET P3-B 

LET F1S-INI;EYS:IF F1S'^>" THEN GOTO 6913B ELSE LET F3-F3*! 

IF FStS GOTO 6ailB 
LET P<-P5-P4tGOTO 6BieB 

IF F1S-"1" AND LEKlFaS)-a THEN FBS»F1S : RETURN 
■UP ARROW 

IF ASC(F1S1<513 GOTO 68178 
FOR I-P2 TO P1:P0KE 1536B*I , 32 : NEXT I 
RETURN 

IF ASC|F1S1«>32 OH ASC|tlSl-BB THEN GOTO 60198 
GOTO 6B11B 

IF ASCIFISJOBB OOTO 6B258 
POKE 1536B-P2,9^ 
IF LENfFBSKI GOTO 68098 
LET p:-PI-1:LET P3-P3-1 [POKE P3,95 
LET FflS-LEFTS(FBS,LEIi|rlS)-ll 
GOTO 681 Be 
POKE p3,ASC(F1S) 

LET F8S-FBStFlS:LET P2=P2«1;LET r3-P3*l 
IF P2(-P1 GOTO GBIBB 

LET FIS-INKEYS; IF FIS-^"" GOTO 6B2B8 
IF ASC(FlSl-n THEN RETURN 

IE a.sc;fiS)'Bm then goto 6B22B 
GOTO 68288 

Program Listing 5. 
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BASICS ll/CMD Mod I or III $69.95 

BASIC/Sll'sa BASIC compiler tor a powerful subset of TRS-BO Disk BASIC 
(Mod l/IH| which IS ilsell written in BASIC, but now iS a stand alone ' CMD tile 
compiled by BASCOMlc), and is FASTi (previously sold as BASIC/S 3 1 1 It runs 
under almost ANY DOS, Mod I or III (as do the /CMD files it generatesi. 

BASIC/S II will compile BASIC programs up to about 1 0K m size (but since 
one compiled program can run another with no loss ot variables, Ihis is not a 
serious limitation] Variables allowed are integers and strings (A-Z and A$-ZS| 
and also arrays ot integer and string ( t or 2 dimensions) Array names can be' 
any length, with alt characters signihcanl Integer ari-hmelic is limited to 
addition, subtracl'on multiplication, and division with at most two operands on 
the right hand side (eg A=B*C or Z— D Fi Arrayeiemenismay be used nereas 
usual, as may constants (as m A=ARRAY i7i '5. tor eiamplei 

Most Level 1 1 String functions a re supported. INSTR.STRS.VAL. CHRS ASC, 
LEFTS, RIGHTS, M IDS, I NKEYS Comple-Slnng formulae are not allowed (thus 
you can t say A$=LEFTS (XS+y$,2i, you would need to say something like 
B$=XS+Y$:A$ = LEFTS(BS,2i, instead 

Disk I/O IS supported, both sequential and random (with LRL < 25b as well}. 
You can have up to 10 tiles open at one lime, and twoot them may be random 
files. Disk statements that are supported include OPEN, CLOSE. LINE INPUT 
«, PRINT » FIELD LSET, GET, PUT LOF EOF, CVI and WKIS 

LZAP/CMD Mod i or III (LDOS only) $39,95 

LZAP CMD IS the most powertu; easy to use ZAP routine ever writ'en and it is 

tor LDOS Mod I or III' LZAP uses the resident drivers ol LDOS, thereby taking 

FULL ADVANTAGE C^ THIS POWERFUL OPERATING SYSTEM LZAP wH 

auto-contigure itself to drive capacity It will support any » of drives *tom 0-~ . 

any cylinder count up to 255 and any sector ■ to 255. Will page between 

double sided drives, 8" drives, LX-80, and hard drive 5 " floppies of all sizes a1 

same time without getting lost' 

Contains these tealures: 

(R) ead (Ei mt (Di ebugl 

lAl sen Modify (C) compare (Gl o Directory 

iMi odify Hex iWi ri'e iBi Locate Byte 

|F| ind tile iHi ash codeiLi ocal searcn 

iSi earch Global iXi Escape iT. oggie 

ISOace ban br.ngs up a command menu fo- lea-ners and OUICK reference ai 
anytime' Also contains an ERROR DlCTlONARV that can be turned of to over- 
ride those crasfied or protected 'iles 'o' e-Lar"inal'0'' 



a ED 



HEN PftOUCT NEKS 




'' .mmmmmm m '^ 



SUPER UTILITY! 

fiis taniastiL- 24K sran.i alone machine language program aliou-'s rapid rtnd 
eaii, access to controll.ng data Super Lit iiti. u.ril!en bi, Kim Wall ol Br^e^e 
Comput-nq. lit come-; u,]th .111 p^at-t of ea^v lo un:ter'.[and step>h^-^iep 
instrui" lions assunng m^xmum use nfvour valuahl^ time 

Seten main menu', irimbminy 4,1 maioi programminij iit dibk repair iiplions 
makes this single program incredibly uersaiile For lasl anil easy relerernre we've 



iR) emove Password 
(I! Go Extent 
iZi ero buffer 
iPi nnl screen 
7 page drive 



rapsuled some o 
ZAP 

Diip;^^ StidinUisk 1^ 
t)„plai M^mori 

Cnmpor^ Dl,k Serli,,. 

C'>0\ *ii Stfitoi! 
Wrfi, [),,. Vcl.;'< 

njRGE 



prog 
hhe 



(.1^- n ■ 



sr options belou.' 
DISK FORIHAT 

itdndfliJ Fnrmrft 
F.iimal Wilhi.ul Ftiw 
Spen^, Fn.,„,,i 
Ri^ad A.JJrv,. M.irk, 

DISK COPY 

■-■Itndari; C.-pi, W-'hou' 

Fmm,!' 
■iiwc J C.ps, ' ,.ijc>i jp 

TJiijie.-T*! ,!,»-.» 



If ,>r^iQ»'j 



only) 



$69.95 



CLONE/CM D 
VDISK,.'Ctvin- 



QSD Utilily Disk #1 for LDOS (c) (Mod 

Increase the Speed and power of LDOS'' Contains 

LZAP/CMD- RESIDELD/CMD- 

CHANGE/CM D DCAL/CMO" 

STAT/CMD- 6INHEX/CMD- 

And also contained on the disk, by Kim Watt (author of Super Ulililyi 

LCOPV'CMD RECOVER CMO DVORAK CMD L PURGE CMD" 

■means works n Double De^sitv 



.[■■■■jwJDr 

.- l'-iu>fti Gt 

Hv ral,'i)<ir, 



DISK REPAIR 

R^p,VT G,iiT.ibk 
H^l>jir Bool 

H.'.v1 IV.lft-' Ditnlorv \i 
R.' ■•.,• K.lle,) Fii.- 
r-,.-,. rire.-ioa 

MEMORY 

M .,,■ M^-ii ■-. 

L" -r-iiMi^ M,'m-.T\ 
/^T.. M»ftKvr, 
;^>' M^mor, 



l-.p-' B' 
Ouipuibut T 
M^m^n. T,i [>■ 

Uisk Ti, M^m. 



LDDS 



MOD I OR III $149.95 

LDOS is th« latMt gsfwratfon of sophist)- 
cstsd opsrsting systsms for th« TRS-M 
computers. LDOS is complMoly docu- 
msntsd in a 2S2-pag« rsfsranca manual. 
Total support is provldad from soms of 
tha most knowlsdgaablo paopte in tha 
Industry. You owe it to yourself to Invas- 
tigata this system. Call or write for details. 



STM-lll 



TAPE COPY 

Bii-K up miftt rRiSII itpn 
10 rriaiT^T hu^ iT a r^ocd- 
^d llrir .rnyTi*] pLirchasei 
1. hiiinjf Name^Ditt, P,l^s■ jif only! 

Chftiiq*- Flit Param*ners 

KeiiJing from 4 OtlOH lo 'IFFFH Super Urilitv has us own [,,() :trvers and does nm uit 

art.- MOM or DOS wNs So gistoihe heart nt your protected d:iki an J read and,.' iiimfidity 

drtt.A jiing simple l-iie\ rommands Noii' iiine is on your side' 

To Order. . . *S*tk1 ;ri«ii ■r mofwv 'K.3rr lot noK W1 ■IS piii' %i r>i ' ihippir.gand ri.iiiill -k; 

SUPER UTILITY 2.0 (SINGLE/DOUBLE DENSITY) 

$74.95 



EDFS 



EDAS is a sophisticated Editor 
and Assembler for the '80 Model 
I or Model 111. All commands 
and SOURCE text can be enter- 
ed in upper or lower case. Direct 
assembly for memory or mul- 
tiple disk files by means of *GET 
assembler directives provides 
the capability of assembling 
huge source files with X,000 
bytes of symbol table. Direct 
assembly to disk or memory for 
faster debugging operations. 
DOS functions DIR, KILL, and 
LIST are available from within 
EDAS. The Editor provides 
block move & global change 
with BASICsyntaxediting. EDAS 
provides power with ease of 
use. $79 -I- SS&H. 



The Ultimate Communications Package: 

Price $150.00 
The package includes the STSO-IH" smart terminal program 
and nine other communication utilities: Fulty documented 
with easy to follow instructions, ST80-III '" is by far the best 
terminal product on the market today. 

TWO Printers on ONE Computer 

FOR MOD 1,11, AND III... 
^ PARALLEL ONLY 
^ SCHOTKEY CIRCUITRY 
^ FULLY BUFFERED... 

^ SWITCH SELECTABLE... 
$1 39.95 IN STOCKl 



— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

11500 STEMMONS EXPRESSWAY, SUITE 104 ^^B 
DALLAS, TEXAS 75229 VIW 

PHONE {214) 484-2976 mimm 

miDts<:Ftn.ii>( MICRONET 70130,203 ^«t[>HiMiiii>Kk<ii« 

TitdtnuiiioltindiCnii 'ostitt 

MENTION THIS AD AND DEDUCT 5% 




^27 



ADD $2.50 
SHIPPING (USA) 



^Saa List ol Adiftrlisars on page 418 
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PORTFOLIO MANAGER 
TRS-80 

FOR COMPLETE PORTFOLIO MANAGEMENT: 

• Fast!!! Auto-Retrieval Of Market Quotes 

• Instant Updating Of One Or More Portfolios 

• Handle Any Combination of Stocks, Options, 
Warrants, Bonds, or Mutual Funds 

(Long and Short Positions) 

• Printed Analysis of Each Position to Show: 

• Current Market Value 

• Value Change from Previous Day 

• Current Gain or Loss 

• Listing of All Quotes Retrieved 

• History File to Maintain Detail Record of All 
Closed Positions 

Ptease send more information about 
PORTFOLIO MANAGER to: 

Name 



T M. 



Address 

CiTV- 



State Zip. 



Mail to: 



Market Management Svstems »^ 593 
P O Box 40049 
1080 Madison Avenue 
Memphis, TN 38104 

Or Call Toll Free 1-800-238-7626 

(In Tennessee 1 901 527 8262) 



MODEL III OWNERS 

LAYMAN'S GUIDE TO NEWOOS $5.00 

An easy to understand plain-english guide to the 
most commonly used (by the layman) features of 

NEWDOS 80. 



CONVERT MODEL I SCRIPSIT 
TO MODEL III 

■Renumber Program Lines 

'Move Prograrn lines 

"Move Blocks of Program Lines 

"Duplicate Program Lines 

'Selective Variable Clearing 

"Program Single Stepping 

"Memory sort multi-dimensioned arrays 



AND/OR VISICALC 

PLUS 

'Swap Variables 

'Read & Write to Mod I disks 

"Reference Keywords 

"Spool Printing 

'Change Disk Speeds 

•Disable BREAK and /or CLEAR 

'Much Much More!! 



All of the above shipped v^ith Apparats New^dos 80 2.0 
Regular $149.95 — Now only $129.95 (Mod III only) 

COPY MODEL III SCRIPSIT AND VISICALC $15.00 

Allows UNLIMITED BACKUPS of your fvlaster Disk, 
Works if you have already backed up twice. 
Comes as a simple 17 line basic program. 

ST80D PATCH $15.00 

Makes your Model I ST80D work on Model III. 
Comes as a simple 30 line basic program. 

VISA - Mastercard - Money Orders - COO 

Allow 2 weeks tor personal checks 
Kansas residents add 3.5% sales tax. 

L i^ e: 8 526 East 4th, 316-665-3611 




'J».TJ».,mi*rc;. 



Hutchinson. Ks. 67501 



►^ 143 



The variables are given in Fig. 
1. Before entering the subrou- 
tine, the main program must de- 
fine the values of variables PO 
and PI. The value of PO is the 
display print position (between 
and 1023) of the first character 
of the data to be entered. Pi is 
the display print position ot the 
last allowable character of the 
data to be entered. Specifically 
defining position PI prevents 
the entry of more characters 
than the data file or format per- 
mits, and also provides a dis- 
play of the allowable data field 
size. Also before entering the 
subroutine, the main program 
must tuck the actual cursor 
away. Put it at the start of CRT 
line 15 (POKE 16417, 63:POKE 
16416, 128) so you can print error 
messages without disturbing 
the screen. The cursor displayed 
Is the underline. ASCII 95. When 
data entry for each item is com- 
pleted, the subroutine returns 
string F0$, which can be used as 
is or converted to a numeric by 
VAL(FO$). 

In Listing 5, line 60070 sets in- 
itial values for the subroutine 
variables. Line 60080 POKEs the 
underline (ASCII 95), used as the 
simulated cursor, into each 
character position from PO to 
P1. This gives a display of both 
the location and maximum 
length of the data item to be 



entered. 

The program jumps to line 
60110, testing F1$ for a charac- 
ter entry. If no character is 
entered during the keyboard 
strobe, F3 is incremented by one 
and tested for value. If F3 <3, 
F1$ is immediately tested again 
for character entry. It F3 = 3, line 
60120 toggles P4 between ASCII 
95 (underline) and ASCII 32 
(blank), and repeats the key- 
board scan. This provides the 
flashing cursor while minimiz- 
ing dead time for keyboard 
strobing. The test value of F3 
can be changed to vary the 
flashing rate of the cursor 
without significantly affecting 
maximum typing speed. Maxi- 
mum typing speed is much high- 
er than with using a fixed delay 
to flash the cursor. 

When a character Is entered, 
the program jumps to line 60130 
and tests for an up-arrow as the 
first character entered. The 
main program will respond to 
this up-arrow by moving the en- 
try back one item to correct a 
previous error, so line 60130 sim- 
ply sets F0$ equal to the up-ar- 
row and returns. (Assume that 
backing up for a correction will 
never occur once an item entry 
has been started, so that an up- 
arrow is a valid character entry 
unless it is the first character 
entered.) 



jaae 


SS • "SCHEP13DATA" : GOSUB 10100 


2919 


FOB J - 


1 TO 7 


DBSdrJ) ■ CHBS(32) ! KEXT J 


2B2e 


FOK I ■ 


1 TO 7 


FOK J - 1 TO 2 1 P(I,J) - : NEXT J, I 


i«iR 


FOR J - 


1 TO 7 


DBSdrJ) ■ DASIN.J) : NEXT J 


ifl40 


FOH J = 


1 TO 7 


READ P(J,1) : READ PIJ,2) : NEXT J 


2050 


FOR tt - 


1 TO 7 


2B6I 


ER% ■ 




2 07 


P0 - PlK.ll : PI = P(K,21 


2080 


G05UB 60000 


2090 


IF F0$ 


■ •■ GOSUB 2220 ! GOTO 2180 


2100 


IF F0S 


- -Q" GOSUB 2220 : GOTO 2190 


2110 


IF F0S 


- ■(• GOTO 2200 '"[" - UP ARROW 


2120 


ON R COSUB 0000, 6000, ea00, 0000, B000,S000, 8000 | 


2130 


IF ER« 


C> U)SU8 8500 ELSE GOTO 2170 


2140 


ERt • 


1 


2150 


PORE 16417,63 : POKE 16416,128 : PRINT STIltNGS(64 ,32) i : 




POKE 16417,63 : POKE 16416,128 


2160 


GOTO 2080 


2170 


DBSll.C 


- FBS 


21S0 


NEXT K 




2190 

N 
2200 


GOTO 2190 'GOTO NEXT KAIN PROGRAM FtlNCTlO 


COSUB 2220 : K-K-1 i IF K<1 THEN K-^I 


2210 


GOTO 2060 


2220 


FOR 1 ' 


TO 11 : POKE P3 t 1,32 1 NEXT I j 




PBINTS 


P0,DBStl,R!; : GOSUB 10390 : RETURN 


aeee 


Rcn 




6010 


HEH 


DATA VERIFICATION SUBROUTINES 


6020 


KETUHN 




t>500 


HtX 




8510 


ROi 


ERROR MESSAGES 


S520 


RETL'HN 




9eee 


RLK 




S010 


REM 


DATA STATEMENT 


101BB 


REM 




10110 


IJEM 


^"I^JD DATA STATEMENT 


1S120 


RETIIHN 




B00eB 


HtM 




6001B 


REM 


DATA ENTRY SUBROUTINE 


60020 


RETURN 


Program Listing 6. 
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Line 60140 tests for a carriage 
return (Enter), ASCII 13. If the 
character is not a CR, ttie pro- 
gram jumps to line 60170 and 
tests for legal characters 
(ASCII = >32) or backspace (left 
arrow, ASCII 08) and jumps to 
line 60190, where it separates 
the backspace from a character. 
If it is a character, it jumps to 
line 60250. 

At lines 60250-60260, the char- 
acter is displayed at position P3 
and added to string F0$. String 
position counter P2 and display 
position counter P3 are incre- 
mented by one. Line 60270 tests 
P2 to see if the last allowable 
position (PI) has been exceed- 
ed. If not, the program jumps 
back to line 60100, where it 
starts flashing the next cursor 
position and looks for the next 
character. 

When the last allowable 
character has been entered 
(P2>P1). only the carriage re- 
turn terminator and the back- 
space are permitted. Lines 
60280-60310 wait for one of 
these two, and take the appro- 
priate action. 

When a carriage return is en- 
tered, line 60150 deletes all un- 
used underlines by POKEing 
blanks from P2 to PI (for esthet- 
ic purposes only), and line 601 60 
returns string F0$ to the main 
program. 

A backspace must remove the 
previously entered character 
from F0$, delete it from the CRT, 
move the flashing cursor left 
one position, and be prevented 
from going back past the first 
character position. Lines 
60200-60240 take care of these 
functions. Line 60200 puts the 
underline back at P2. Line 60210 
tests to see if F0$ is empty. If it 
is, no further backspacing is 
permitted and the program 



jumps back to the character en- 
try statements. Line 60220 dec- 
rements P2 and P3, and deletes 
the character displayed by 
POKEing the underline into 
position P3. Line 60230 removes 
the deleted character from F0$. 

This subroutine provides all 
of the features available on 
larger business computers, and 
the only sacrifice is a slight 
delay in maximum keyboard typ- 
ing speed. The optional word Let 
in all assignment statements 
noticeably speeds up the sub- 
routine. 

Program Listing 6 is a sample 
segment of a main program thai 
shows how to use the data entry 
subroutine. The example as- 
sumes there are seven data 
items to be entered using the 
screen shown in Listing 4. 

Arrays can keep track of 
multiple data items in a record. 
Listing 6 uses these previously 
dimensioned arrays. DA$(N, J) is 
the main data array, dimen- 
sioned to hold N records of J 
items each (in these examples, 
N^IO arbitrarily and J =7 for 
the seven data items on the 
screen). String arrays can be 
used even for numeric data. 
DB$(1, J) is a temporary, one- 
record by J element array, which 
allows the entered data to be 
stored and verified before dis- 
turbing the main data array. This 
is primarily useful in editing, but 
keeps things simple even for 
original entry. P(J, 2) is an inte- 
ger array used to store the val- 
ues of PO and PI (used in Listing 
5) for each of the J items to be 
entered. Storing these values is 
necessary for backing up to re- 
peat/correct a previously en- 
tered item. 

Line 2000 finds the data state- 
ment thai contains the values of 
PO and PI. Line 2010 clears 





Program Listing 7. 


: REM 


«•••• DATft ENTRY PROGRAM USING ENTRY SCREENS 


2 REH 

• ***■ 


***** AND SUBROUTINES INCLUDING FLASHING 


3 REM 


***** CURSOR 


4 REM 




5 REM 


***** BOB SHUKEN JULy,198B 


6 REM 




lae RGH 


•••■••••••(•...ai............. 


lie REH 
123 REM 


***** INITIALIZATION •••■• 


13B REM 




14e CLLAR 


laee : s-b :ci.s 




P'Ogran) continues 




' Mmmmmmm 



BASIC/S 3.0 (MOD I/Ill) $39.95 

A Basic compiler for the Mod I/Ill 48K Disk System. BASIC/ 
S compiles a subset of TRS-80'^ Basic into 480 machine 
code. The machine code can then be run as a /CMD file, 
most of the features and built in functions of Level II are 
implemented, along with sequential and random disk i/o 
(including LRL/256). Allows variables, reals, and strings. 
This a programmer's compiler. Not intended to compile 
"off the shelf" software, but will compile code written or 
modified along it parameters. No royalty fee to pay! Many 
basic programs you are using today can be compiled. 
Supports all Mod I and Mod III operating systems. 

QSD UTILITY DISK #1 FOR 
LDOS® (MOD I) 69.95 

Increase the speed and power of LDOS! Contains: 

LZAP/CMD — Uses resident disk driver of LDOS and thus 
enjoys its flexibility & device independence. It will 
auto configure itself to drive capacity. LZAP will 
support any number of drives from 0-7, any cyliner 
count up to 255 and any sector number to 255. It 
supports both single and double denity automatical- 
ly! Various drive sizes and densities can be inter- 
mixed and LZAP will page between them without 
error. The ultimate ZAP routine for the ultimate 
system. Many more features including a "help" 
command for beginners to assembly code 

RESIDELD/CMD — Allows you to SYSGEN system over- 
lays for increased speed and free space on disk, plus 
more! 
CLONE/CMD CHANGE/CMD DCAL/CMD 
VDISK/CMD STAT/CMD BINHEX/CMD 

And by Kim Watt... 

LCOPY/CMD — Mass file transfer package. Fast and 
versatile! 

LPURGE/CMD — Allows you to selectively purge by class, 
list, ext, etc. Contains over 20 features. A "mini 
super-utilityl" 

RECOVER/CMD — A "smart" recover routine for "killed" 
files. 

DVORAK/CMD — the famous DVORAK keyboard layout. 

EXTRA SPECIAL DELIVERY 
(I/Ill) $179.00 

Machine Language program to maintain your mailing list, 
print labels, and merge data from your mail list into a letter 
created by Scripsif^ or Electric Pencil?^. 

— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

11500STEMMONSEXPRESSWAY, SUITE 104 ^^^ 
DALLAS, TEXAS 75229 vSa 

PHONE (214) 484-2976 M^Mi 

TRSIOtScriputirt MICRONET 70130,203 ^27 PictDatiNollndudt 

Triilcinirki of TiikIt Corp Pntj[F 



^Sse List o> AdvertiSBfs on page 418 
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Progiam conhnued 

158 DIM DAS(1B,7) t DIN DBS(1,7| : DIK P(7,21 
16B GOTO b»e 
5BB REM 

51B REM • 

52B REH •••.. GENERATE MAIS MENU ..»•• 

5JB REM .................................. 

S4B REM 

5Se CI.S:HIS-** SELECTION NENLJ "iGOSUB 1 BBBB : PBINTi PHIKT 

56a SS-'HENU" 

57B GOSUB IBIBB 

58B 131-2:121-21 

59B GOSUB 1S2B0 

6BB GOSUB IBlSBiPRINT 'ENTER SELECTION : "; 

61B AS-INIIEYS:IF AS-'" GOTO 610 ELSE A^-I^JSTB ( 'ED" ,AS) : 

ON At GOTO f>19,6te 
620 GOTO 61B 
639 CLSjGOTO 1000 
64B CL5:G0TO 4000 
1B00 REM 

IfllB REK 

1020 REM •.... SELECT NEXT RECORD ..... 

1B30 REM .................................. 

1B40 REM 

1050 CLS 

1060 N-N»l 

1070 IF N<11 GOTO 1SB0 

1088 FBINTg 4BB,"DATA ARRAY FILLED* 

109B FOR W-1 TO JBBiNEXT WsN-N-l 

110B GOTO 500 

1500 REM 

15 IB REM 

1520 HEM ..... GENERATE ENTRY SCREEN ..... 

153B REM 

lS4fl REM 

15 50 CLS 

J56B HIS"" DATA INPUT SCREEN •*:GOSUB 1BBB0 

1570 PRItrr "RECORD HO. ' iK 

1560 SS-"SCREEN3" 

1590 GOSUB IB100 

1600 FOR I-l TO 7 

I6I0 READ H1«:READ HlS:PRIMT@ Kit, HIS 

1620 NEXT I 

163B GOSUB ie390:GOTa 2000 

2eBB REN 

2aiB REM .......................... 

2B2B REM ..... data ehtRY •••*• 

203B REM 

2040 RCH 

2B5B SS-'SCREEN3DATA* i GOSUB IBIBB iGOSC'B 357B 

2B6B FOR I-l TO 7 ! FOR J-1 TO 2-. P(I , J) -B ;NEXT J:NEXT I 

2070 FOR J-1 TO 7:DBS(1,J)-DAS1N,J1 :NEXT J 

2060 FOR X-1 TO 7:READ P|K,1)iREAD f{¥. ,2) -.VEXT R 

2B90 FOR K-1 TO 7 

2100 ERl-B 

211e PB-FlK.l) :P1*P1K,21 

2120 GOSUB 60fl0B 

2130 IF F0S-'* GOSUB 224Bi GOTO 220B 

2141 IF F0$-'Q' GOSUB 2240: GOTO 221B 

2150 IF FBS-"[" GOTO 2220 '"["-UP AJIROW 

2160 OH K GOSUB 8000 ,6000 , 0100 , dBB0 , B00B ,6060,8100 

2170 IF ERtOB GOSUB 8500 ELSE GOTO 2190 

2180 ERI-0IGO5UB ]0360:GOSUB 1B3SB:G0T0 2120 

2190 DBS(1,K)-F0S 

2200 NEXT X 

2210 GOTO 252B 

2221 GOSUB 2240r X-K-1:IF K<1 THEN K-1 

223B GOTO 210B 

2240 FOR 1 • B TO 1 1 : POKE P3*I,32! NEXT 1: PRINTS PB.DBSd.K) ; ■ 

GOSUB lfl390 ! RETURN 
250e REM 

2510 REM •* 

2520 BEH ..... SCREEN COMMAND MENU ..... 
2530 REM 

2540 REM 

2550 GOSUB 10360!PRINT 'ENTER ; <N>EXT RECORD : <Q>UIT : <C>ASCE 

L !-i 

2560 AS-INKEY$:IF A$>"* GOTO 2560 ELSE At-INSTR{ 'NQC' ,AS) 

2570 GOSUB 1(380 

2560 OV A% GOSUB 3500,1506,3570 

2590 ON At GOTO 1000,560,2600 

2600 N-N-IiCOTO 50B 

3500 REM 

3 510 REM 

3520 REK ..... ENTER DATA INTO SAIN ARRAY ..•■■ 

3531 REM ..... AjjD CLEAR DATA ENTRY ARRAY ..... 

3540 HEM .......................................... 

3550 HEM 

3560 FOB J-1 TO 7 iDAS (N, J) -DBS 1 1 , J ) : NEXT J 

3570 FOR J-1 TO 7!DBS(1,J1-CHRS(32) :NEXT J 

358fl RETURN 

4000 REM 

4B10 REM •••' 

4B20 REM ..... OATk DISPLAY ••■». 

4030 REM 

404B REM 

4056 CLS:IHPUT"ENTER DESIRED RECORD NUMBER : ■;N1» 

4060 IF Kit <1 OR Nit > IB GOTO 4050 

4070 CLS:SS-"SCREEN3DATA",G0SUB 10180 

4860 HIS"** DATA DISPLAY •'jGOSUB 18008 

4090 PRItfT "RECORD NO. "jNH 

4100 FOR I"l TO 7 

411B BEAD P0:READ PI 

412B BU-INT(Pe/256| : B2t -PB- ( 256'Bll ) iBlt-BU'-eB 

413B POKE 16417, Bit iPOKE 16416,824 

4140 PRINT DASINll.IJ 
4150 NEXT I 
4160 GOSUB 16398 

4170 PRINT "ENTER : <A>NOT»ER RECORD : <R>ETURN TO MENU :*! 
4180 AS-INREyS:IE AS-'" GOTO 4160 ELSE AI-INSTB ( "AR* ,AS) 
4198 GOSUB 18388 
4200 OH At GOTO 4660,500 

4210 GOTO 4170 

6086 REM 

8010 HEM ...•......•*•*..•••*.•*••****.*»•*.**•••****. 

B020 REM *.**. DJ^TA VERIFICATION SUBROUTINES ••••• 

aB3B REM •••»..•*.**••.•«•*•.*•*•.**•.**.****.***♦*... 

8646 REM 



30 50 RETURN 

8868 IF LEN(KBS) 05 THEN ESt-l:HETURN 

6078 H-5:F2S-FBS:GOSUB 817B 

HB8B IF FLt-1 THEN ERl-1 

6B9B RETURN 

8188 IF LEN(FB5I<B THEN ERt-2 : RETURN 

BllB IF MIDS(FBS,4,1| <>"-• THEN £Rt-2:RETURN 

B12B H-3:r2S-LEFTS(FBS,3) iGOSUB S170 

6130 IF FLt-l THEN ERI-2:RETURS 

8146 Lt-4:F25-RIGHTS{F0S,4) :GOSUB 8170 

0156 IF FL»-1 THEN ERt-2 

6166 RETURN 

8178 fL.1'9 

BIB8 FOR J-1 TO H 

BJ98 Ft-ASC(MIDS(F2$,J,1)) 

B200 IF Ft<4B OR F»>57 THEN FLt-1 

S210 NEXT J 

B220 RETURN 

6500 REM 

8510 REM ...................................... 

8528 BEK ..... GENERATE ERROR MESSAGES ••••• 

85 30 REM ...................................... 

B548 REM 

8558 GOSUB 10390 

8568 PRINT ■" INPUT ERROR «•*! 

8578 ON ERt GOTO 8580,8610 

8588 PRINT "ZIP MUST BE 5 DIGITS"; 

8590 GOSUB B9B0 

8600 RETURN 

8610 PRIKT'PHONE FORMAT IS XXX-YYYY"! 

8620 GOSUB 8900 

6630 RETURN 

8900 FOR W-1 TO 300!NEXT K 

8910 GOSUB 10380 ; GOSUB 10390 

8920 RETURN 

9080 REM 

9018 REM ••..»*..............».......... 

9828 REM ..... 0A1A STATEMENTS ..... 

9830 REM ............................... 

9048 REM 

9B58 DATA 5CREEN3DATA,145 ,159 ,165, 174 , 342 , 361 ,535, 539, 548 , 549 , 

556,562,732,739 
9860 DATA «ENU,<E)NTEB DATA, <D>ISPLAY DATA 
9070 DATA SCHEEN3,209, [ LAST NAME [,228, [FIRST NAHE|,406, 

I STREET ADDRESS [,589,( CITY [ ,618 , [ STATEl , 

622, [ll?[ ,796, [PHONE |, 

' [ - UP ARROW 
10066 REM 



18018 
16020 
IB03B 
18040 
18050 
10060 
18078 
108BB 
10188 
10118 
10128 
10138 
10140 
16158 
10168 
16176 
16180 
16198 
18280 
10210 
10220 
10218 

10366 

10310 
10320 
16316 
10340 
10350 
10366 
10370 
10380 
10390 
10488 
60000 
60010 
60020 
68830 
68840 
68850 
68860 
60070 

60068 
60090 
60100 
60110 



PRINT DISPLAY HEADER 



FIND SELECTED DATA STATEHEHT 



HEM ....... 

REM ••*** 

REM ..••.•• 

REM 

Hlt-LEN(H1$) 

0-(64-Hlt)/2 

PRINT TABIO) HIS 

RETURN 

REM 

REM ...... 

REM ..... 

HEM .•••..••..••..*••.***.••..•*.•.•......*•.••. 

REM 

RESTORE 

READ HIS 

IF HIS-SS THEN RETURN 

GOTO 10160 

NEXT I 

REM ............................ 

REM ..... DISPLAY MENU •*••• 

REM ....»............*......».*. 

FOR It'l TO I3t:READ H2$:PRIHT TAB{I2t) H3$iHEXT lt:RETURN 



CLEAR CRT LINES 14415 
AMD LOCATE CURSOR 



HEM 

HEM " 

HEM " 

REM •• 

HEM ..............*.........*....... •••.. 

POKE 16417, 63:POKE 16416, 64 : GOSUB 10400 

POEE 16417, 63:POKE 16416,64 : RETURN 

POKE 16417, 61:P0KE 16416,128 : GOSUB 10400 

POCE 16417, 63:PORE 16416,128 : RETURN 

PRINT STRING$<64,32) ; : RETURN 

REM 

REM ............................................... 

REM ..... DATji ENTRY SUBROUTINE PROVIDING ••■•• 

REM ..... FLASHING CURSOR, POSITION LOCATOR ••••• 

REM ..... jujD BACKSPACE FUNCTION ••... 

REM 

REM 

LET P2-P0!LET FOS-"*:LET I1"P1-P0:LET P3-15360*P2! 

LET P4-95:LET F3-0:LET P5-127 

FOR 1 = TO lliPOKE P3-»I,95:NEXT IjGOTO 60110 

LET P3-15360+PI:LET P4-95 

POKE P3,P4;LET F3-B 

LET F1S=INKEYS:IF FISO"* THEN GOTO 68130 ELSE LET F3.F3tl 

IF F30 GOTO 68110 

LET P4-P5-P4!COTC 601BB 

IF F1S-*!' AND LEN(F0S1"B THEN F0S-F1 S: RETURN 

IF ASCIFIS; <'>13 GOTO 68178 

FDR I-P2 TO PliPOKE 15360*1 ,32 : NEXT 1 

RETURN 

IF A£C(FlS)->32 OR ASC(F1S1"B8 THEN GOTO 60190 

GOTO 601 IB 

IF ASC(FlS)<>8a GOTO 68250 

POKE 15360*P2,95 

IF LENIFOS)'! GOTO 60898 

LET P2'P2-1;LET P3-P3-l:POKE P3,95 



68120 
68130 
6B148 
68150 
68168 
68178 
681B0 
68190 
60200 
68218 
68228 

68216 LET F0S-LEFTS I F0S , LEN [FBSl -11 

68248 GOTO 68180 

60250 POKE P3,ASC|F1S1 

68260 LET FBS-F8S*FIS;LET P2»P2»l!LET P3.P3*1 

6B27B IF P2<-'P1 GOTO 6B188 

60288 LET F1S = INI!EYS : IF FIS-"" GOTO 6B28B 

68290 IF ASCIFlSl-13 THEN RETURN 

661BB IF ASCIFISI-BB THEN GOTO 68220 

60)10 GOTO 6B28B 
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TRS-80- MODEL II 



BASIC CROSS REFERENCE 



• hNl. ViHiKl ■.^MI^ *!<( L 5lU I^M- 
aCAS >OL UlllII [HAI UNI' USD OUT' 

• DOXlL MAVI Df AtJtODINC 

• WANl A MCI l'kO<:HAM IISIINC. WITH 
DATI S TIMF IN HF ADINC 



>>^\l Mill «•. 

IPARAILII SIHIM F'KIMIHS 
tSEVf KAl OPTIONS 
K..B1PI VAHIABtl 
IIM WIDlll A PAf.f IHPIH 



Mlirt AVAIL AHll 



939.99 HANDLING 

l)(XLMIMAll()SONt.> tlUlKi 
151 DU( TIHll (>NPlR<HASt 



DISK SORT 

• HAM>I.)M llll^ 

• ( MAINS lo sisn VI 

UK HASH. PKUGKAM> 



BASIC COMPILER 



YOU DON 1 HAVI lO Ul A i'ROCKAAlWlH lO LSI II 

• t AS\ lOUSl •! AS> TO ISSIKI IMU 

• tASI' lOHSIRf AM lOR 

• SPUS SAVED NON-b'OPHLNNIN(.' 
ON DISK rxXlJMlNTAIION ONI V illllW 

L)llX,i( IIMII ON HLJHt HAS! 



$69.99 



♦ POSTAGE & 

HANDLING 



• IKSIXIS" UrSK I OMI'^IPIUI 

• fASim ItlAN HASH HV UP Ul 
«) IIMIS 

IRSNII* A TRSDOS'ARI RtCISIIHIll 
IHA1)IMrkKsC)f TANDVIORP 



1 [ *st |i M M 

I AUl.MlNIfl) WIIH OlR 
WHIMISIAIION 



>V\HI1 :i S HI Mil ROSniT 



$350.00 



+ POSTAGE & 

HANDLING 



GOODLYDDON DATA SYSTEMS 

S4e6 RIVERSIDE DR.. CHINO. CA 9t7tO 



MASTER CHARGE or 
VISA accBptWl. 



VISA/MC Order Line Onty (except Mich.) 800-253-4358 ext. 100 

FINDISK-ll The ultimate In automatic dish Indexing with exclusive fealute* Modell 120.00 

AUTOMATICALLY tu'dii' INDLX of i»..gr<)[m .>t >!^i.) from a:; vnur liisks pr.nt disk LABf.LS print 
alpli<itH.-M/fd MASILRLI^I dn fast SLAHCH adc DLSCRIPTION^ A.^o auiomalicallv dewct DATA ot 
SYS liisKs, FURCL disM and index of old files, and UPDATE from reused disks onli, 
SOLAR-f The critical cakuUttoiM tax paMlvc deslfln. . . Mf>del-I >30.00 Modcl-II $45.00 

INPUT any laliTude, urientatk>n, slope, roof overhang storage type building loss, OUTPUT, soUr angles 
shading, lime heal gain loss, pertiiiii solar, fuel um' Priiil report by hour, tnonrh. vear ir presentation lormiii 

RIAII Complex Real EsUtc Investment Analysla Modell 130.00 Model-li 145.00 

Analysis for mveslor or homeo*Tier using P.lwoixl method INPUT Pmieirl costs, loan <ird Ijx data 
expenses, depreciation rate OUTPUT Cap rate value mortgage paymenis, before aflei tax cash flows, return 
'IRR) . profit ■ gain from sale over arty time series 

DEPRECIATE-I Manage a list ol depreciable Items Model! tlS.OO Model-ll S20 00 

Tracks long list ot dt'|)ri'("iabli' ]ti'rn= with viirving purchase dates depreciation rates, or per i;enl busine!!^ iisi' 
Upddti' .irii, tiriu' F'l'iM.n lorrti Used bv many CPAs 

STRUCT-I Graphic design of steel ' wood beams and moment transfer Model-I 115.00 

INPUr span caniileter. liniloim point loads, beam niattrial OUTPUT *itti screen graphics beam momen: 
Si -.(leat liiagianis PnnI job report with diagram slresse>, and required beam Si«s 

M:n 12K OnLl:>t iMixi I ont driv.".rd^r tapei Add fl IH) pnst.iq.:. iMicb add 4X lax: VISA MC 
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Other Models 
•LNW DEMI-CASE..$32.50 

'LNW SHROUD $27.50 

*"80" SHROUD $24.50 

Add $2.50 shipping & handling 
N Y S residents add 7°'c sales lax 

SYRACUSE R&D CENTER^ 

Box 125. Dewitt, NY. 13214 

"Specializing In Electronic Packaging 
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8041 NEWMAN AV^ SUITE 208 
HUNTINGTON BEACH. CA 9264T 



^^^wMB^H Just between yuu and u^. . . 

m\ 1^" ^^ think we've got 

IL J^ THB BEST 

Tffn--*^ TRS-80* MODEL III 
Disk System around! 
WHY? Here's three good reasons. 

1. VERSATILITY 

Ouf own provtn dept'rdjhle drive conlroller board will give 
ytiu Ihf hjrdssare In run dimtnt dny drive conhguralion you can 
imagine: 

• 5'/*' and 8" drives in any combinalion. 

• Internal/eKternal combinations (up to all 4 drives external). 

• Single- and dual-headed drive combinations. 

2. QUALITY 

• \\f 1 hose MP! (trives— (he Jong-ljme leaders ir the field. 

• Wi' construct our own disk drive installation kits of heavy 
gauge sleel— no shielding problems' 

" We designed independently regulated linear power supplies 
^^^f and reliable 

3. PRICE (including installation & 90-day warranty) 

• Drive conlroller board and 'irsl (iri\e . ib^'< 

• Second (inlernal) drive. ■ %27'' 

• Third drive (with cable) $354 

• Fourth drive $324 

If these sound like really good deals but you don't have the Mcxiel III 
yet, we've gut llie answer. 

ATRS-80Modellll,48K,TRSDOS, 2 MPI drives $1899 

— Fully lesled wilh 90-dav warranty — 

ni]tL\r-l'i>r-d(itl.ir. we ih<nk ihis /s ihe BEST TRS-80 iysteTi you can bu\ '' 

We also stixk for immediate shipment: 

MODEL III, 32K $899 

EPSON Printers, accessories & mlertaces at Low. Low Pnces 

CALL OR WRITE TODAY tor an extended price list and slraigtit-talk; 

information about our quality systems and your computer needs. 

■ m^M >1 i Judemtf* at Tjndy iarp y' 408 

PROCESS CONTROL TECHNOLOGY 

P.O. Box 8825 • Stotkton, CA 95208 • (209) 9!;2-6.';76 



IS THERE ANY OTHER SOFTWARE THAT ENABLES YOU TO: t 

Enhance DOS commands lo rename, kill. copy... multiple | 

(lies with common name or extension? I 

Link EDTASM source files via new %INCLUDE command. • 

Assign and use symbolic labels hi DEBUG'' J 

Compile, link and execute FORTRAN program(s) by entering | 

|ust one command tsystem will prompt you lo insert proper ) 

diskette if necessary)? I 

Organize conditional chained execution? J 

Save hours ot typing and have a good lime with your com- J 

puter'' I 

These are but a few examples of what can be done with the • 

I INTERACTIVE CONTROL LANGUAGE j 

ICL is a very fast machine-code program executing pro- j 
cedures written in the high level command language. I 
(Variables and conditionals. &READ &IF &QUEUE &GOTO \ 
&JUMP &RESUME... 18 commands plus special features and f 
number of options.) Under ICL procedures are invoked the 
same w/ay as /CMD files or DOS commands. 

ICL is designed lo work as a 'middleman' between the user 
and operating system and/or application programs. It has 
powerful facilities lor control of program execution and data 
manipulation. ICL introduces virtual i/0 lor keyboard and 
display operations and provides uniform interface between dif 
ferent otherwise incompatible programs. ICL implements con 
Irol interception scheme for interactive co-execution of pro 
grams and procedures, which enables enhancement and 
customization of existing software products in a simple way. 

Superb documentation with detailed "how-to-use" and 
tutorial information, most useful procedures, system informa- 
tion and patches are provided. 

This unique product i3 now available for NEWD0S2.1 or 

NEWDOSfSO — on 5' diskette • documenlation 

at unbelievably low price ot S34.95 icheck or money order) 

XYZT COMPUTER DIMENSIONS INC. ^373 

2 PENN PLAZA, suite 1500. New York. N. Y. 10121. 

J ■ Requires mm 32K 1 Drive Model I i^BK lo' FORTRAN] 

f ' ' specify NEWD0S2 ] oi MEWDOSiSO dist>piie loimal tworks wiiri eilher DOS) 

I "' N.y stale (esjiOerls aOd 5".. sales lai 




While they last . . . 

the complete year of 1980 80 Microcomputing 
(in its own shelf box. . . a $2.00 value — Free) 
for only $25.00.* 

Did you miss the 2,256 pages of useful information published for your TRS-RO' * in 80 Microcomputing last 
year? Now is the perfect time to catch up for onl\' S2o.00.' 

In the first year of SO Microcomputing here were 335 articles on your TRS-8U— 2 V'a times more than any other 
computing magazine. Also in 1980 there were new product reviews, news and columas and best of all hun- 
dreds of dollars worth of useable programs. 

So to unlock the key to your TRS-80 and double its value . . . send in today for the complete year of 1980. %0 
Microcomputing (in its own shelf box) for only $25.00.' 

We have a limited number of these complete sets so send in the card today or call our toll free #800-258-5473 
and charge it tn vf>ur VISA, MC or AE card. 

*f)/ii.s fhijijniin aud fusndliiiti i $(*.(>()) " I HS-tyU is a Iradcmark oj 'J Hri(/i/ 




I 



\{ L^Wg I \\ ant a \ ear of 80 Microcomputinn for $25.00 plus $6.00 
for shippini; and haridliiin. Plus 111 ntvivc a shelf box lo sture 
thi-ni in. 



!J Check enclosed for $_ 

Name 

A(lcires.s 

Citv ^_^ , 



Slal«-. 



Zip 



/'/(■(ivc allow 1 to 6 werLs jiir delivery 

80 Mien Jcoinpiit 111 g • SO Pine Street ■ Peterhornugh, N.H. 034,5S 

Toll frve Drdenng number 800-258-5473 
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DB$(1 , J) by putting a blank in for 
each element. This guarantees 
no previously entered data gets 
put in the wrong place. Line 2030 
similarly clears P(l, J); it reads 
the existing data for the seven 
items of record N (N is the rec- 
ord number currently being en- 
tered or edited) from DA$<N, J) 
and puts it into temporary array 
DB$(1, J). For a new entry, all 
items will be null and this line is 
not needed. However, when edit- 
ing, assume not all items will be 
changed. For those that are not 
changed, the data entry subrou- 
tine would return F0$ as a null 
string to DB$(1 . J). When DBS(1 , 
J) is loaded Into DA$<N, J), all 
null Strings would replace ex- 
isting valid data. Line 2030 
makes sure that unchanged 
items remain intact. Line 2040 
reads the value of PO and PI for 
each of the seven data Items to 
be entered into array P(J, 2). 

Line 2050 starts a For. . Next 
loop terminating at line 2180. 
Lines 2060-2070 start each item 
by setting error flag ER% to zero 
and setting PO and PI to the val- 
ues stored in P(J, 2). The pro- 
gram then jumps to the data en- 
try subroutine at line 60000. 

Line 2090 lets the operator 
skip an item by entering a null 
string {Enter with no charac- 
ters), which is frequently desired 
in both entry and editing. Line 
2100 tests for entry of a Q (which 
becomes a reserved character 
string) so the operator can stop 
entering data at any point and 
escape to the next main pro- 
gram function (typically a 
menu). Llne2110 tests for an up- 
arrow. 

As mentioned before, any 
time an up-arrow is entered as 
thefirst character in the data en- 
try subroutine, data entry is ter- 
minated and F0$ is set equal to 
the up-arrow. This enables the 
operator to go back to a previ- 
ous item, for instance to correct 
a mistake. Each time the up-ar- 
row is depressed, the program 
backs-up one item by decre- 
menting K in line 2200 and going 
back to start the data entry in 
line 2060. Storing the values of 
PO and PI in array P(J, 2) allows 
line 2070 to get the screen dis- 
play in the right place. The 
GOSUB 2220 in lines 2090, 2100 
and 22X clear unwanted under- 

^S**LiMtofAtfifmni»»rtonpsg»41$ 



lines and keep previously en- 
tered data displayed as the op- 
erator corrects errors and enters 
data. Skipping a previously 
entered item, either backward 
with the up-arrow or forward 
with the null entry, will not 
change the Item. Entering one or 
more valid characters deletes 
the previously entered item and 
replaces it with the new data. 

When F0$ is neither null nor Q 
nor up-arrow, it must be tested 
for validity. Line 2120 uses the 
value of the item number, K, to 
branch to the appropriate validi- 
ty check subroutine. The validity 
check returns ER%=0 if there 
is no error, and line 2130 jumps 
to line 2170 where F0$ is tem- 
porarily stored in DB$(1, K). 

If ER% is greater than 0, line 
2130 jumps to a subroutine that 
prints an error message at the 
bottom of the screen without 
disturbing the rest of the display 
(that's why the real cursor is at 
the start of CRT line 15). Line 
2140 resets ER% to zero for the 
next try, and lines 2150-2160 re- 
move the error message from 
the display, leave the cursor at 
the bottom of the screen, and re- 
turn to the data entry subrou- 
tine. Since PO and PI have not 
changed, the subroutine clears 
the erroneous entry and directs 
the operator to the proper space 
for reentering correct data. 

Put It All Together 

Listing 7 is a complete pro- 
gram using all of these subrou- 
tines. Included is a data display 
segment so you can see what 
you have entered. The menu of 
listing 4 and dimensioned array 
DA$(10, 7) are again used to 
store up to 10 records. 

After initialization, the main 
menu is generated. Select the 
data entry (E) option from the 
screen (A% = 1) and then assign 
the record number to be entered. 
In this example, the record num- 
ber N is incremented by one and 
checked to see that it does not 
exceed the maximum record 
size of 10. 

After getting the record num- 
ber from line 1060, the screen is 
generated (lines 1550-1620), the 
cursor Is tucked away (line 1630) 
and the jump is made to the data 
entry section. 

The data entry section is es- I 



sentially as described for Pro- 
gram Listing 6. Line 2160 jumps 
to data verification starting at 
line 8000. The first five items to 
be entered are alphanumeric 
and, in this example, receive no 
verification check, but they 
must go through a dummy jump 
in order to use the ON K 
GOSUB. . . The zip code check 
starts at line 8060 and the phone 
number check starts at line 
8100. Both checks use ASCII val- 
ues to verify numeric entries. If 
ERVo returns greater than zero, 
line 2170 jumps to an error mes- 
sage printout subroutine at line 
8500. with a different message 
for each error determined by the 
value of ERVd returned from the 
verification check. 

Lines 2550-2600 demonstrate 
a menu in a different form. The 
menu is printed horizontally at 
the bottom of the display, so the 
operator can verify his entry be- 
fore proceeding. The operator is 
given a three-option menu selec- 
tion. (N)exl Record implies that 
the data is set for permanent en- 
try and the operator wants to 



enter another record. (Q)uit also 
implies that the data is fine, but 
tfiere are no more records to 
enter. (C)ancel deletes the data 
without permanently storing it. 
Line 2580 jumps to line 3500 if 
the data are to be permanently 
stored in the main data array 
OA$(10, 7), and to line 3570 if 
cancelled. 

Lines 4050-4210 use the same 
kinds of techniques for data en- 
try to display the data stored in 
DA$(N, J), one record at a time, 
in a form that duplicates the da- 
ta entry screen. Lines 4120- 
4130 calculate the byte values 
required for POKEing the cursor 
in the right place by operating 
on PO as the first character posi- 
tion of the item. 

Save It on Disk 

Store each subroutine on disk 
in a highly compressed form, 
since documentation is not nec- 
essary, and then put together 
desired modules with the Ap- 
pend command. Debugging 
time is cut since you know all 
the modules work.l 
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Adventure gaming, that is. Why not author one of your own? 



Writers of a Lost Art 



Victor T. Albino 
18501 194NE 
Woodinvilie. WA 98072 



It you enjoy computer adven- 
turing, sooner or later you will 
want to construct an adventure 
of your own. If you feel tfiere is 
an adventure masterpiece 
locked-up inside you just 
waiting to break out, but you're 
not sure flow to write one, 
follow tfiese steps. 

Many people tfiink ttiey need 
disk drives or an understanding 
of machine language to write 
an adventure. Disks make it 
possible to bring more excite- 
ment into a program tfian could 
ever fit within a 16K RAM. Also, 
those of us who bought the early 
adventures written in Basic 
remember the agonizingly slow 
computer response to each 
entry. 

However, many of you don't 
have disk drives and don't want 
to hassle with machine lan- 
guage. Must you keep that bud- 



ding adventure stifled Inside 
you forever? No! By using de- 
cision branching techniques, 
you can create exciting adven- 
tures in Basic within 16K of 
memory. 

Assignment 45 (see the Pro- 
gram Listing) has all the 
elements of an adventure 
using, not disk drive but im- 
agination coupled with pro- 
gramming technique. 

Creating a Story Idea 

The first and hardest step is 
creating a story idea. If you're a 
natural storyteller, you will 
have no problem. If you have no 
such ability, then start brain- 
storming. Write down the ele- 
ments of a story that sound ap- 
pealing. For example: a distant, 
exotic location; strange crea- 
tures; wild inventions; romantic 
interludes; and dangerous 
super-villains. Let your 
imagination go and don't worry 
about the plot at this point. 
Once you have a page or two of 
ideas, think of ways these char- 
acters, places and events 
might be related. Draw lines be- 
tween the elements that form a 
Story. 

Once you have a plot, you're 
ready for the second step. Con- 



struct an outline of the adven- 
ture showing the story line. 
Then ask a friend what he 
thinks of the plot. Perhaps he 
will enrich your adventure with 
a few ideas of his own. 

After completing your out- 
line, begin flowcharting. Some 
people say flowcharting is not 
necessary in Basic because, for 
the most part, the programs ex- 
ecute sequentially following 
program line numbers. While 
flowcharting may not be 
necessary for many Basic pro- 
grams, it is worth the effort for 
programs containing many 
decision branching state- 
ments. You will save yourself 
time, memory and confusion if 
you organize your story into a 
flowchart before typing it into 
your computer. The flowchart 
need not be elaborate. Just 
show the decisions and results 
of every action an adventurer 
may select. 

After flowcharting, type in 
the program but remember, 
without disks or machine 
language, we must be careful 
about using program memory. 
You have to put in enough ex- 
planation of characters and 
events to make the adventure 
interesting, but too much prose 



will quickly eat up your 16K 
capacity. Don't be afraid of 
rewriting your program to save 
memory. To paraphrase a 
famous author, "There is no 
such thing as a good writer, 
only a good rewriter." 

Since our biggest problem is 
limited memory, we must save 
every byte we can. Your Level II 
manual has some suggestions 
for saving memory space. First, 
unnecessary spaces are out. 
Use multiple-statement pro- 
gram lines. Each line number 
uses up to five bytes. Use sub- 
routines to perform the same 
operation at different places in 
the program. You will notice a 
liberal use of subroutines in As- 
signment 45. If you get desper- 
ate, remember the computer 
reserves 50 bytes on power-up 
for string storage. If you don't 
need it, you can get this space 
back by executing a Clear 0. 

Another memory saving tip is 
to use a little string space for 
phrases repeated often. Notice 
in Assignment 45 two such 
phrases— "What should he 
do?" and Hit/Key became W$ 
and H$. If you're going to be 
using many print @ 448 state- 
ments, why not let p = 448 and 
type only print @p? It Is easier 
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and saves memory. 

After you have the program 
running, let someone else try it 
out before you turn it loose on 
the world. Sometimes those in- 
structions that seemed so clear 
to you won't make sense to 



someone else. 

When you have finished this 
step, send out the program to 
be published so the rest of us 
can enjoy it. After all, the world 
can never have too many 
masterpieces. ■ 



Program Listing 



i CLS 

IB REM «• ASSIGNMENT 45 

BY VICTOR T. ALBINO HABCM 1981 

15 P-*4B:W-158!MS'"WT1AT SHOULD HE DO?" : H-5B2 : HS = 'H1T '/ ' KEY":G 

0TO6B 

20 IFINREYS<>"/"rHE'J2eELSECL£! RETURN 

58 F0ftT»lT015Be:NEXTiRETURN 

68 PRINTg278, "ASSIGNMENT iB'iGOHUBSB 

7B PRl(4Tfl466, "A HARRY FLYNN ADVENTURE" ;G0SUB5B;CI^ 

9B PRIIJTg342,"YEAR: 215*' :GCSUB5B 

IBB PRINTg*60, "PLACE; ABODE OF HARRY A. FLYNN 
SPECIAL AGENT 
UNITED EARTH COHMAKD (UtC)" 

IIB GOSUB5erGOSUB5B 

12B PRINTi726,"TIMEi 5:31 AM" :G0SUB5fl : CLS 

13B F0HB-1T06 

1*B PRINTe*6B,CHHS(23) "PRIORITY MESSAGE" 

15B FOBTi^lT025B; NEXT: CLS !FORC'lT075!NEXT:NEKTiFORY':lTC5BB:NEXT 

16B CLS:PRINTP468,"FOR LOMMANDER FLYNN" : G0SUB5B: CLS 

18B PRINT§522, "PRESS ANY KEY WHEN READY TO RECEIVE COMMUNICATION 

19B 1FINKFYS-"'THEN19BLLSE2BB 

2BB CLS:PRINTS27B,"GOOD HORNING HftRRYl 

THIS IS SECTOR CHIEF CHHONOE." 
2At PHINT!PRINT"TH£RE'S BEEN SOME TROUBLE IN THE SIRAN SYSTEM." 
25B PRINT'ABAR CALLEASE, RULER Of SIR,-;, HAS KEPT PEACE WITH EART 
H 

OVER THE LAST SEVEN YEARS. NOW HIS DAUGHTER, KJRVl CALLEASE, 
AGE 19, HAS BEEN KIDNAPPED," 
26B PRINT"HIE POLITICAL ENEMIES ARE BLAMING EARTH AND DEMAND WAR 

CALLEASE HAS ASKED FOR OUR HELP." 

278 PRINTHH,H.^: 

2B0 GOSUEZe 

29B PRINTER, "YOUR MISSION IS TO FIND THE GIRL AND RETURN HER 3EF 

ORE IT'S 

TOO LATF.. 

MAJOR OHR WILL GIVE YOU THE DETAILS." 

3BB PWINTfiHjHS; 

3ie G0SUl)2B 

A*6 FRINT^46B, "HELLO COMMANDER. THIS IS MAJOR ORB. * sGOSUBSi: CLS 

46B PRINT: PRINT'YPL ' LL BE USING A MAKO JET SLED FOR SURFACE TRAV 

EL. 

IT'S ALREADY BEEN LOADED ABOARD YOUR SHIP." 

4liB PRINT-THE MAKO IS VERY FAST, HAS TWIN LASER CANNON, 

SHIELD GENEfiATOR, AND FORWARD SCANNERS. 

THE ENGINES HAVE liEEN CALIBRATED TO BURN THE AIR ON ZAGAR." 

5efl PRINT'THAT'S WHERE THE PRINCESS IS, OR, MORE PRECISELY, 

WHERE SHE WAS WHFN HER PERSONAL BEACON STOPPED TRANSMITTING," 

'i2lf PRIN". "YCIU'IL ALSO WEAR A MEAD CELL (MATTER ENERGY AMPI.FICATI 

ON DIODE) 

ON YOUR WRIETBAND, 

530 pRiNT'iv iiring:; things into the visible spectrum that normal 

LY 

COULDN'T BE seen — A KIND OF SUPER MICROSCOPE. IT CAN ALSO 

PICK UP YOuR THOUGHT WAVES AND MAY BE DIRECTED INTO A SMALL 

i OP.Ci: BEAM. " 

54r PRI.,T?H,HSi 

550 C0SLB2B 

568 PRINT?464, "THAT'S ALL COHMANDER. GO<M> LUCK, * :GCSUB5a 

57B FORN-:rO*:PRINTi<P,CHRSf23)'PHIORITY TRANSMISSION COMPLETED": 

FORT- 1T025B : NEXT : CLS :F0RC'--1T07 5: NEXT: NEXT ;GOSUB 50! CLS 

LUB PRINT§3S4,"THE TAHE-OFF AND TRANSIT THROUGH THE STAR-GATE WE 

RE ROUTINE, 

BEFORE LONE ;.1GAF APPEAttED ON THE NAV SCREEN." 

59B PRINT-HARRY LANDED AT SOME DISTANCE FROM THE LOCATION 

WHERE THE BEACON WAS LAST DECTECTED. AS HE LEFT THE ship he 

SAW A YEL'J3W, DESERT LANDSCAPE WITH A RED SKY," 

62P PP!NT"THE CAPGO DfKlR OPENED DEPOSITING THE MAKO ON THE SANDY 

GRCl'VD, 
HAPRY COT IN. THE ENGINES WHINED, THEN SCREAMED AS THE SLED 
LIFTED A METER OFF THE LAND AND SHOT FORWARD." 
625 PBIt;TliH,HS; :G0EUB2B 
63B PfilNT^P, "AFTER 3t) SECONDS Tl'.E SCANNER PICKED UP A CLUSTER OF 

HUTS 
. . , AND A POWER FIELD." 

05B PRINT:PR1NT"SEC0NDS LATER THE FIELD WAS CONFIRMED AS AN ELEC 
TRONIC 

BARRIER SURROUNDING THE HUTS." 
655 PRINT9H,HS; ;G0SUB2B 
C7B PBINT^W.WS 

', ?. P?.lHTdi2i.'l) ATTEMPT TO GAIN ACCESS TO THE HUTS 
738 PRlNTiia4. "21 HIDE THE SLED AND HIKE UP TO BARRIER UNNOTICE 
D 

71B t.iINTfP, "3] USING SLED'S SHIELDS BBEA.K THROUGH BARRIER 
720 PRINT?51i,'4) FIRE SLED'S LASEKS INTO FIELD 
73B PRIN-?g576,"5l USE MEAD CELL 
74B PRINri64e,"6) CALL UEC FOR ASSISTANCE 

75B PRINTg7e4, " ;) SCOUT AROUND SOME MORE IN THE SLED BEFORE DOl 
NG ANYTHING 

768 PRINTi986, "[ENTER THE NUMBER OF THE ACTION YOU SELECT) ": INPU 
TN 

765 CLE 

77B IFN<10HN>7THEN76B 

7BB ONNCOT07 9B, 81 B, 1848,1380,1068, 11 3 B,122B 

79B PRINT?P,"SEFJ(S HARRY FORGOT ABOUT THE BARRIER, HE WALKED 
RIGST INTO IT MTO Vt& IMHEDlhTELf STUHUED. " iPRINTeH ,HS! 

Program continues 



GOSUB= 



GOSUB'S MX60/70 FRICTION FEED KIT ONLY $49.95 ppd 

The Gosub MX80/70 Friction Feed Kit tor the Epson MX80 
printer will give you complete paper control. You get easy to 
follow instruclions and all parts necessary to give your Ep- 
son triction teed capabilities. Installs m about 15 minutes 
Money back guarantee it not satistied 
PLUS: 

• USE SINGLE SHEET PAPER 

* USE INEXPENSIVE ROLL PAPER 

• USE YOUR OWN LETTER HEAD 

* DOES NOT AFFECT PINFEED USE 

PRINTERS PRINTERS PRINTERS 

EPSON MX80 $515 ppd EPSON MX100. . . . $825 ppd 

Microtek's BYTEWRITER-1 $299 ppd 

SOFTWARE SOFTWARE SOFTWARE 

Wfl have just about evsrybodys sottwara. 
Call us and tall us what you want. Wa've got it! 

AUTHORIZED DEALERS FOR THE 

GOSUB FRICTION FEED KIT 



ALPINE COMPUTER CENTER 

2526 S Alpine Rd 
Rotkloru IL6i10e 
|815l22SO200 



USA 
OMEQA MICROS 

3ei9WL-sl Michigan 51 
MilftduH*. Wl5tonb,n 53208 
(414,9.116066 



EXATRON 

iai CoFT'iitrciai Si 
Su"r,y»aii> CA 9*066 
lBlX)'^3fte.'>S9.CAi*06|737 Mi1 



AUSTRALIA 



COMPUTER CAMPUS Pty. Ltd. 

' 1 Runo'.e Slreel. Keni Town 

Souin Auslralia. 5067 

Ph 0e«4826Tele. 88156 



CANADA 
MICROWEST Dist. Ltd. 

19JC Larson MO 
Nopin Vanro.i.p' (i C 
Ca"aaa ViM 27H 
i6WI9B6 99* or 966*877 



^,^^'.•^ HI ■> *!)[> i% -All •. 'M 

AIL I'Kk I- Si IIIK I IIU IHS(,I v. I I HDL ■ SI I'll I 
FRf I CAIAIOG tJPOS RIQUIST 



GOSUB Infl, Inc. 
501 E. Pawnee, Suitc430 

Wichita. KS 672 11 
(316)265 9856 



SEND CHECK OR MONET ORDER TO 



GOSUB ^^^* 
P.O. Box 275 

Wichita, KS67201 
(316)265-9992 



ELECTRIC SPREADSHEET 



NEW Considering VlslCalc"? 

ELECTRIC SPREADSHEET does everything you can do 
with a pencil, paper and calculator. Start with a blank 
screen. Move the fast cursor to desired location. Enter line 
or column labels or data Select preprogrammed operators 
tor line, column, or cell calculations. Run. Results appear 
on the screen, formatted for your printer Revise. Run 
again. 

PREPROGRAMMED OPERATORS for mathematics, 
finance, and statistics. Save data on tape or disk. The 
screen is your window/ to a larger spreadsheet. Output 
features scrolling and split-screen Variable formats for 
labels and data. 

UNLIMITED APPLICATIONS. P/L forecast. Personal 
budget. Real estate investment. Net worth forecast 
Invoice. Cash flow estimate Sales analysis Check record. 
Business forms. 

16K version has 50 operators. 32.''48K version has 70 
operators plus histogram plot, remote storage of data, 
global revise spreadsheet layout, alpha entries, and more. 

16K Model I or III Tape $34.95 

32/48K Model I or III Tape S64.95 

48K Model III Disk S67.95 

YOU CAN'T LOSE! Calif, orders add 6'.% tax. 

VisiCalc is a trade mark ot Personal Software Inc 



Dan G. Haney & Associates, Inc. ,^464 
P.O. Box 687. San Mateo. CA 94401 
(415) 493-4094 



• See List qI Advertisers on page 418 
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HOW ACCEL2 WORKS 

TRS-80 Model I/Ill BASIC Compiler 

ACCE12 uses a novel iranslalion lectinique Ihdt keeps code growtti down and insures 
highest compatibility with BASIC source programs while giving huge speedups Only a 
carefully chosen subset of BASIC instructions is translated The non-compilable state- 
ments are teft in the compiled program in Iheir original source tomt and at run- time are ac- 
tually given lo ttte BASIC interpreter to execute. Program How may flip into direct execution 
of the compiled machine instructions and then Hop back to interpretation many times dur- 
ing execution 

Why Compilation improves performance 

'Hirrtt ResDtulior Trm giv«n lolhc process al idenMyirig ine value Ola variatile given ili 
name As a p'ogram tuns. I'M inierprelH buiUs a Otclionafy conssling ol a cfi*n ol rtems 
eacH conlaining a variable name. Oaia type and ou'reni value Evc^ time a variable <s to De 
resolved Ihe mleipceler musi sequenlally search Ihis Oicliorary By conttisl, KCIL7 Ciuilds 
the variable diclionary once a! compile lime and Itiereatler can relei lo the vanaDle riair«s Iiy 
direct address, wiin no ruri-lime search 

"Line Resolulior Trie mlerpreter has to take Itie ImenumOe' following a GQTOor GOSUB. 
converl i! to Dinary. and then searcH the program sequeniialty to find ihe target line Ai 
com D'le- lime ACCEL! generates sing* machine-mstiuctions lor GOTO or GOSUB using the 
actual address ot the larget Ime For the mterpreler both njme resolutton ar>d line resolulior 
get slower as Ihe program gets more complei. whereas tor compiled COOeltiese two operations 
are indeoenOenl ol program sue or numoer of vanabtes 

"Compulational Doera!«ns The inieroreter nxisl parse eacn stalwrwnt every time lind Ihe 
one- Byte codes I'm! cor'esoorW to tne ooerainns Won ahead lo :he nent operator lo esiaWtsh 
the orecetJenct ruies and cnecii to' data tyoe mi5mat[:fi arw ;o-ivers'on Conslan;s must oe 
COnverleO from cturacter sl'ings to ir^ternai tjinary But under ACCEL? constants a'B conveneO 
and emOecOeO ngw rn 'heZSQ insr-uction stream ana ^loe^a^or■s are translated once and to' 
ail at comoile-time into sequences o' calls t3 ROM or trie ^jn time c^imponeni NTEGER ope'a 
tions are actually lurnea inlo directly eiecutmg straight me 23] code' 

The result is a mixture ot BASIC statements and machine language instructions, usually 
not more than lVi-2Vi times Ihe size ot the original but running much faster (can be 
50-100 times as last with some programs) 

ACCEL2 32K TRS-80 Model 1/ III Compiles selected subset mall vanabte types, iocaland 
gloMi compilation options output save to tS/F wafe- Qisli under TRSDOS NFWOOS 
NEWDOS.'BO 

S88.95 + $2.00 Shipping 



Developed in Bntam 
By Souilie'n Software 



TRSSO TRSnOSIm Radio Shack 



ALLEN GELDER SOFTWARE Maslercharge/Visa 

BO" 117?! Mam Posl UHice CA aOd 5% 

San Francisco CA 94101 , 

(41^)387 3131 
• Sl'ingy/f iopc*'meiaironinc NEWDOStmAppaiai 



STOCK MARKET I 
SOFTWARE \ 

By H AH Triding Compiny for Mod I. 11. Si III TRS 80^ | 

i 

STOCK TRACKER™ times trades on individ- \ 
ual stocks and options. Uses a technical volume I 
analysis. Completely objective. Gives buy, sell I 
signals. ! 

MARKET TRACKERS" times tops & bottoms 
on the Dow Industrials; a composite of six tech- j 
nical indicators. Some judgement required. 
Gives buy, sell signals. 
These two programs are accurate. 
Hundreds of satisfied users. 

ASK FOR THF. EVIDENCE ! 

FOR MORE INFORMAnON Oft TO ORDER. CONTACT: 

H * ^ WSPING CQM^NY I 

POST OFFICE BOX 2354* ^223 

PLEASANT HILL. CAUFORMA 94533 
T«l*phon« 4I5/B37-I030 



VISA k MASTERCARD 



iSRagd TM. of Rodio Shock 



Prognm confintM<J 

TS5 1PIMIFTS<>-/'THEK795ELSECLS 

Ml PKIHrlP.'HE HAS SET 0?? U UJUtH. 

MtMOOXZD SEHTBY ROBOTS DItAG HIH AKAT . BE BUS FAILED 

BIS HI58I0HfiPRIHT«lJ,HS; 

■IS IPIinEy$<>*/*THCN8ISELSE154l 

Sll PRIVTtP.'HABRY HIOBS THE SLED BEXIHD SOME R0CS5 AMD BIKES 

TO TSe BAKIUER.*iPRmn>HSi:C0SUB2l 

S2I pmiTTM.ii; 

841 PXIirrf32l,-l| ATTOIPT TO GAIB ACCESS TO HUTS 

SSI PRIHT|]B4,*21 USE MEAD CELL 

■ CI PRIim44l,'3) USB RAND LASER 

871 IHPUilliCLS 

881 iril<I0RM>]THEHS2l 

691 OIIIICOT079I,91I,9II 

911 PRIHTfP.-HARRr DRAWS HIS HAND LASER AND BLASTS THE BARRIER.' 

911 PRIlfT"IT HAS A HECLICIBLE EFFECT BUT SETS OFF Ml ALARJ1 THAT 
BRINGS ARMOURED SENTRY ROBOTS. THE HAND LASER CAKHOT STOP THEH. 
HARRY GETS VAPORIIEDl ' i PRIHTIH ,HS| 
915 IFIHKEYSOVTHEHS15ELSE254I 

921 FRlHTepp'AS HE APPROACHES THE BARRIES HARRY HOLDS UP THE KEA 

D CELL. 

HE STUDIES THE COMPOSITION OF THE FORMERLY INVISIBLE FIELD. IT 

HAY BREAK DOWN UNDER LASER FIRE. ' t PRIHTSH.HSi 

925 IFINKEYS<>"/"THEH925ELSECLS 

931 PRIirriH.WS 

941 FRINT|32l,'l) RETURN TO SLED 

951 FRIHT|3B4,-2) CONTINUE TO ESPLORS 

9fil FRIHTIP,-]] USE HAND LASER 

971 IHPUTWiCLS 

981 IFN<10RN>lTHEN93l 

991 ONHGOTDllll, 1121, 911 

liil PHIHTJP.'HARHY GETS BACK INTO THE SLED. * iPRIIIT»H,HS| iCOSUB] 

llli COT067I 

1121 FRINT|P,-AS HE LOORS AROtIND, HARRT !S PICKED UP OH SECURITY 

SENSORS.*: PRINT 9tl,H$| iGOSUBZi 
1131 COTOSai 

ll4i PRINTIP, "HARRY SETS THE SLED'S SHIELDS AT MAXIHUH INTENSITY 

AND 
CHARGES IKTD THE BARRIER]' 

1151 PRINT -UNFORTUNATELY HE UNDEBESTIMATeO THE STRCHCTH OF THE F 
ORCE 

FIELD. HARRY IS KNOCKED OUT AS THE SLED CRASHES INTO THE 
BARRIER.' :PRIHT«H,H$; 

115 5 IFINKEYSO'/'THEKlBSSELSECLSiGOTOBBI 

1168 PRINTSP, 'HARRY DECIDES TO USE HIS READ CELL TO EXAHIHE THE 
BARRIER, 

BUT HE HAS TO GET CLOSER FOR THAT. " : PRINTfH ,HS( :G0SUB2I 
1B7B PRINTS, MS 

IBSB PBINT?32B,"11 ATTEMPT TO GAIN ACCESS TO THE HUTS 
1B9B PHINTSJB4,'21 HIDE THE SLED AND HIKE UP TO BARRIER UNNOTIC 
ED 

IIBB PRINT?P,"31 USING SLED'S SHIELDS BREAK THROUGH BARRIER 
11 IB INPUlNiCLS:IFN<10RN>3THENie7B 
112B ONHCOT079B.81B,1B4B 

113B PRINTiP, 'HARRY DECIDES TO CALL UEC fOR ASSISTANCE. 
AFTER HEARING THE PROBLEM, UEC SAYS IT WILL PRESENT THE PROBLEM 
TO COMPU-CEN AND GET BACK TO HIM WITHIN THE HOUR.' 
1141 PBIHT:PRINT"AFTER AN HOUR MARRY STILL HAS HOT RECEIVED A RE 
PLY.':PHINT?H,HS; :COSUB2B 
115B PRIHm.HS 

116B PRINT!32f,"l) CONTINUE WAITING 
1171 PRIHT|3B4,*Z) ACT OH BIS OWH 
1181 rHPUiH!CLS!lFN<10RN>2THEN115B 
1191 OHNGOTD12iB,121l 

1211 PHlHTfP, 'WHILE WAITING HARRY DECIDES TO EXPLORE ON POOT.'jP 
RINT8H,H$;:COSUB2l:GOT01B2l 

1211 PRIHTBP, 'HARRY FIGURES THAT HE HAS WAITED LONG ENOUGH FOB T 
HE 

WHIl KIDS AT COMPU-CEN TO COME UP WITH SOKETHING. ' :PRINTtH,HSl 
1215 IFIHKEYS<>'/*THEN1215ELSECLS:GOT06 7i 

1221 FRIHT0P, -HARRY DRIVES ON UNTIL DARKNESS APPROACHES BUT FIND 
S 

NOTH1HG.-:PRINT?H,HS;;GOSUB2I 
1231 PRIHTn<,HS 

1241 PRINTS32B,'ll RETURN TO HUTS 
1251 PRI»T»384,'2) KEEP LOOKING 
12EB INPOn(iCLSiIFH<10RK>2THEH123B 
1271 OHHCOT012BI,129l 

12BI PRINTER, 'HARRY ARRIVES BACK AT THE HUTS . ' !GOT067B 

1291 FRIHT^P, 'HARRY DRIVES ON IN THE DARKNESS. 

SUDDENLY HIS SCANNER DETECTS A NAHNOTH FORM DECENDING FROM THE 

SKY. ATTRACTED BY THE LIGHTS, A GIANT HANTA MOTH SWALLOWS THE 

5LED.'iPRIHTeH,HSi 

1295 IFINKEYS<>'/'THEN129 5ELEECLH:GOT013 7 5 

1311 PRINTgP, "HARRY FIRES THE POWERFUL TWIN LASER CANNONS POINT 

BLANK INTO THE BARRIER. THE BARRIER HAS BEEN WEAKENED 

SUBSTANTIALLY, BUT SENTRY ROBOTS OPEN FIRE ON HIN. ' i PBINTeH.HSl : 

GOSUB 2 1 

121B PRIHTm.W! 

1J2B PRINTB32B,'l) TURN OH SHIELDS 

133B PRINTSJ84,"2) USE LASER CANNONS 

134B PRIHT?P,'31 GET OUT OF THERE 

135t IHPUTNiCLS:irH<10RH>3THEN131B 

136B ONNGOT0138B,137»,]37B 

137B PRINT*P,'THE SKY IS FILLED WITH BED LASER BOLTS. 

THE SLED IS HIT, ' : PHIHTSH ,HS! :G0SUH2fl 

1375 CLS:PBINT#47B,-GOOD BYE HARRY 1 -; PRINT?H,HS; 

1376 lFINKEYS<>'/'THEN1376ELSECLS!G0TO2548 

1381 PRINTpP, -LASER BOLTS FLASH AGAINST THE SLED'S SHIELDS. ": FBI 

NTSH.HSl 

1381 IFIHFEYS<>"/*THEK1381ELSECLS 

139i PRIKTW.WS 

1411 PRINT*32«,-1) GET OUT OF THERE 

1411 PRIKT*384,"2| RAN THE BARRIER 

1428 INPUTN;CLS:1PN<10RH>2THEN139B 

1431 OHNCOT0144B,145a 

1448 PRINTSP, -HARRY ESCAPES Bl'T HAS FAILED HIS MISSION. 

BE IS EXECUTED FOR COWARDICEl - : PBINT^H ,HS) 

14 41 IFINKEiS<>-/-THEH14 41ELSECLS:GOT01375 

1458 PRIHT8P, -WITH FULL POWER TO FRONT SHIELDS, HARRY CHARGES TH 

E 

WEAKENED BABRIEH. " iGOSUBSB : PRINTi PRINT"HE BREAKS THROUGH AND 100 

Program continues 
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LOWERCASE MOD 

KIT 

NO SOFTWARE 
ALL HARDWARE 




FOR TRS— 80 MOD 1 



THIS OFFER 

WILL NOT 
BE REPEATED 




CECDAT, INC. ^K 

P.O. Box 497 
Hayden Lake, ID 83835 

CALL NOW 
(208) 772-9571 

BO DAV WARRANTY 

WITH ALL 

OPTIONS 

($125°° VALUE) 



WHILE STOCK LASTS 



Name. .. 

Street 

City State „ 

Signature ^ 



ORDER INFORMATION TRS-80 is a Trademark of Tandy Corp. 
L Check, Money Order. Bank Draft 
LJ VISA, MASTERCHARGE(add3%} 
Card No. ^_^ 



Zip. 



Expiration Date 



Yoii must check 

■'Mem Size": "Memory Size": "Debounce"U "Block Cursor" 

Price valid through December 31, 1981 



■THEPATCH2 "©89 95 63 
Ship& Hand. @2.50ea. 



Today's Date. 



ID Sales Tax 3% (Id Res). 
TOTAL ORDER 



NOW AVAILABLE 

THE ULTIMATE ARCADE GAME 
/ 




MO DEL I. Ill, 16 h. Level II 

I DEALiB mQUIBEt WELCOME 



S19.9S 



COLOR COMPUTER PROGRAMS 

Ralntow FIIm Dati Buc Us<- 16K Ei 
t*nOM Basic S1I K 

R*lnb*B SMtBll BttiJiwa lyilam ' Ooma Booh 

hMping lormal 16K EilardM Buic S34.tS 

Ralnban Omus Pack I ,' Hangman, Tirgat Shool 
BoggK.Crapi 4K dt.H 



>«nd Chsck ar Manay Ordar / COD'i Wateoma 

OI>iario(na ResiOefils add 2% In 

mg|o)[r@(o](ij]©fig 

P 0. BOX 7M4 I TULSA, OKLAHOMA 74106 
COD'I Call I81B) 747-9646 

^596 




[ncludcs controller 
board, mouniing 
brackeis. cables, 
and power supply 
for 2 iniemal drives Controls up lo 4 dnvcs 
which may be any combinalion ot iniemaJ or 
external This controller has been tested for 
compatibility with TRSDOS'. LOOS', and 
NEWDOS' Using TRSDOS' you may use 
eitfier Tandon or MPI 40 or 80 track dnvcs 
With LDOS- Of NEWIX)S' you may use any 
combination or 5''* ' dnvcs. T^ controller 
supports any mix ol 5'/4" dnvcs irKluding 
single Of double density, smglc or double sided. 
35.40. 77 or 80 tracks 

TERMS: Cashier's Check, VISA. MAS- 
TERCARD, or C O.D. Penonal checks ac- 
cepted, but will require 2-3 weeks to process. 
C.O.D. add3% 

To Order, CaU (505) 265-5072 

OK Hail ordn *Hh paiinnii lo i 




BOSVi San Mateo Blvd., N.E. 
Albuquerque, N.M. 871 08 



TRSDOS IS J Tuk-mait i>l Radm Shaii (.nqturuu 
LDCISis J 1raikiTuirio< l.>^KilS>>iriiis In. 
>L**[Jt)Si-.i Tr»*m4cVi.l APPARAT 




EDUWARE EAST 

P.O. Box 336 

Mayrard, MA.01754 

ei7-56frM41 

^477 




MATHPAK-I: MATH-PAK-2: MATM-PAK-3 

IntaraclhM (bW progrwm whw* )mi wrtar ttM wwwsr* 
dlgH by dIgK. Jual Hka pmpm and pMCH. Wth uaw 
— '»c<»d dmteuHy Invto, cmnyvnn, ndwclng, almpll- 
flcaHon. paimine off, •eaftns, gmmm: and mora. Uaad 
by •choota ayafywhara. Ordar HATH-PAK-1 tor Inta- 
gara. MATH-PAK-2 tor IracttoiM. MATH-PAK-3 tor 
daclmala. (L2-1MC) S14.B5 aa. 

H-aR-K-S 

Low coat, atngta anby ac co Mirtlii B ayalam tar ttM honN 
or onica. WHh M uaar aaalgnad accounl codaa, aula 
atidH trail, March with lelala, 32 o« 4«K, i ta 4 drtvai, 
cradH and daMt awmmartaa with 3 epikma. up lo 9100 
anirlaa. U4.Mfeaaaana tM.tSMIae 

INVENTORY + 

Why Mttia tor )ual an iw»atilary llallno? Oal aging 
raporta wlHi 2 opttona, raordar, total HaHnga arith pur 
chaaa daiaa and amotmia. total coala. Itama aold. pro- 
nutoa* and mora. Uaa as a aland alooa ayatam with 
dally updalaa, dalata. changa. and fita packing 
rautlnaa (32K 1 diac minlmumi S34.H«caaaatla 

S29.9»(]lac. 

CASH REGISTER 80 

l>aa yowr TRS^M as a point ol tola tarmlnal with 
automatic Invantory bokup, prtclng. updata, and mora. 
Prtni aalaa allpa mm uaar adlualad lormala. ar>d of 
day raporta with all caah, charga, and chaek aalaa by 
aalaaparaon. CfWO raquhaa INVENTORY-f. 48K. and 
1 dIac minimum (2 dflvaa racommandad). 

l24.H/caBaatta t39.HUIac. 



Masa raaUanta and S% tax. VISA, M C, AND PHONE 
ORDERS ACCEPTED. Oaalar Inqulrtat Invltad. Onr- 
aaaa ordara add 12.00 for air ahlpmant TRS-80 li a 
tradamait of Tandy Corp. 



■ 5«a List ot AOv^rtisars on page 4 IB 



80 Microcomputing, December 1981 • 293 



Program conlinumti 

«S PAST THE SLOW MOVING ROBOTS." 

1*6» PBINr'HABBY QUITKLY HIDES THE SLED WtO'JHG THE CLUSTER OF HU 

TS,* 

1*71 PRINT'HITH LASER CUN DRAWN, HE CHABGES ItfTO THE NEABEST STB 

[ICTUBE. 

IT TURNS OUT TO BK Mi ELEVATOR TtlAT PLUNGES DOW™ ABD . ' : PHI KT»H . H 

$\ :G0SUB2I 

1*8* PBINT^P.'HE IS IN A HUGE CfWPLEX OF SILVER GLASS PANES. 

EACH PANE IS SCORED IKTO 5 CM SODABES , AND EACH SQUAEE IS 

PERFORATED BY A S«AL[. HOLE .■; PHI NT^H , HSi : G0SUB2I 

1431 >'HINTfW,x; 

mi PH1NTS32I,"1| EXPLORE NOHE 

1511 PRINT*3B4,-2) EXAMINE PANE 

153B IHPUTNiCLS: rFNvlOHN>2THENl* »• 

153B 0N»GOTO154»,161» 

1541 PHINTtP.-HAHBr GOES BACH UP THE ELEVJlTnB. ONCE OUTSIDE HE 

GOES INTO ANOTHER HUT, BUT FINDS MOTH ING .■; PHI MTM , HSj ; GOSUB2I 

1551 PHINTpH,WS 

1561 PBINTSlii.-l) CONTINUE EXPLORING 

157B PEINT*38*,-21 CO BACK TO GLASS PANE COMPLEX 

15BB IHPUTWiCLS: I FN«10RN)2THEH15 5i 

I^IB 0NHGOT1116BB ,lt Bl 

Uai PRINT#P,-HE RUNS FOR ANOTHER HUT, BUT THIS TIME HE HE ETS 

THE ROBOTS INSTEAD. "iPHlHTSH.HSj 

I6B1 IFim[ErS<>VTHEHI6BlELSE1375 

161i PBINTeP,'AS HE TOUCHES THE PAKE, HE IS STUNNED UNCONSCIOUS. 

WHEN HE AWAKENS, HE IS SUHBOUNDED BY A SECURITY TEAB. A NAN 
WITH GOLD TEETH IS SNILING. THE NAN SPE A* S . " : PRI NT»H , HJ I ! GOSUB2 

1(21 PHIWTJP,- 'THE GREAT HARRY PLYTOI. I NEVER TflOOCHT I'D MEET 

YOU IN PERSON. '"iPRKTTfH.HScGOSUBil 

16}| PBINTfP,'(STAjroi(tG UP, HAJtBY RETORTS) 

■TKE IHTAHOOE DR. NON FBCM IRUEL. ■-;P»IKT?H,HS| !GOSOB2I 

I(4B PBINTfP,"YES, XRUEL. KIDKAPPIHC, REVOLT, USURPATION, EXTO 

RTIOH LEAGUE. 

YOU, HB. FLYNN, HAVE INVADED OUR HOSTAGE STORAGE CCHTEB. '": PRINT 

fK,t!Sl :COSUBZ* 

lt5i PHINTJP.'IHAHRY PROBES) 'TELL HE HOBE. ' " i PRIIfTW ,H( j i GOSUB 

IStl PRINT(32l,-'OF COURSE. EACH HOSTAGE IS KEPT FOR FITTURE POL 

ITICAL USE. 

THEY ABE DATA PATTERNED AND LASER STAHPEQ ON TTIOSE SLIDES YOU 

CARELESSLY TOUCHED. INSERT A PELLET LIKE THIS, AMD THEY ARE 

RECONSTRUCTED — UNHARMED.' 

1671 PBINT:PRIirT-'NITHOUT A PELLET, A HASTY SHOCK IS APPLIED. 

YOU NAY HAVE TWIS OME A5 A SOUVENIR.' 

(OR. HON SLIPS A PELLET INTO HARRY'S SHIRT POCKET] ' 

IS7S PRIWT"TOO BAD YOU RUST LEAVE OS NOW, NR . FLYNH 

PCHHAJIENTLY . "iPRINTfH.HS; :GOSUB2l 

ItBI PRINTfP, -HARRY IS TAKEN TO THE SOLAR HIRROR. ONE OP THE GU 

ARDS 

EXPLAINS THAT DR. HON RESERVES THIS PORK OF EXECUTION FOR 

SPECIAL GUESTS." 

1&«B PRIVT'HARRY IB STRAPPED TO THE NIRROR. AT SUNRISE HE WILL 

BE INSTANTLY TOASTED. THE GUARDS LEAVE. ■!PRINT*H,HS|:G0SUH2B 

17BI PRINTfM,H$ 

nil PHINTI32I,"1) BREAIL BONDS 

172B PHINT|38<,"2) ROTATE KIRROR PRON SUN 

173i PRIIfTIP,-3) USE HEAD CELL 

17«t PHlNT(512,"tj PRA* 

I7Ji INPUTNlCLS:IFN^lDRN>4THEN17ll 

17SI 0«HGOT0177B,1B1I, 1851, 1841 

1771 PRINTfP, -THE BONDS LOOSEN BUT DO HOT BREAK. 

SHOULD HARBTi 1) KEEP TRYING 2) TRY SCBETHINC ELSB," 

17BI lHPUiH:CLS:ON)K;OT0179B,lBfl 

17»f PRINTfP, "HARRY CAN'T LOOSEN THEN ENOUGH BEFORE SUNRISE. "iPR 

I NT f H , H S r : COSUB 2 1 : GOTO 1 ] 7 5 

IBBi GOT017iB 

IBlfl PRINTfP, •HIRROR BUDGES A LITTLE AS BONDS STRETCH. 

SHOULD KARRYi 11 KEEP TRYING 2) TRY SOWETHINC ELSE.' 

1S2B INPUi1liCLS!ONHGOTOlB3l.l7ll 

1831 PRINTfP, "THE MIRROR DOESN'T TURN FAR ENOUGH ." j PRINTfH , Hi i : C 

0SUB2<iGOTO1375 

IB4B PRINTfP, "AS HE PRAYS, HE GETS THE IDEA OF USING THE MEAD CE 

LL.":PHINTfH,HSl :GOSUB2liGOTOI7BB 

ia5B PRINTfP, ■HARRY RWENBEBS WHAT ORR SAID ABOUT TKE CELL ANPLI 

FYING 

THOUGHT WAVES. HE CONCENTRATES ON PROVING THE MIRROR'S POSITION 

CONTROL LEVER. ':PRINT 

1861 PHINT'NOTHINC HAPPENS, 

SHOULD HARRY: 1) KEEP TRYING 2) THY SOMETHIHG ELSE.' 

1B71 IHPUiH:CLSiONNCOT0189*,18Ba 

IBS! G0T017il 

1B5B PRINTfP, 'FINALLY THE LEVER P(OVES AND ROTATES THE BIRROH AHA 

Y 

FROM TKE SUN, THIS GIVES HARRY THE TIME HE NEOIS TO BREAK FREE. 

■iPRINTfH,KSi:GOSUBZI 

19IB PRINTfH,W$ 

151B PRINTf32l,"l) SNEAK BACK TO HOSTAGE STORAGE AMD USE PELLET 

192« PRI»Tf3B4,'2) ESCAPE AND HETUBi WITH RElHPOHCBtENTS 

1931 PRINTfP, -31 CAPTURE DR. HON AND USE HIM TO BARGIH FOR THE G 

IRL 

AND FREEDOM 

194B PRINTf57S,"4) FAKE HIS DEATH BY TURNING NIRROR BACK INTO SU 

H 

1951 PRINTf64B,'5) USE HIRROR AS WEAPON 

19&i INPUlHiCLS: IFN(10HN>5THCHlMi 

1971 ONNGOT019Bi,I99R,2lll,2ill,Zi5l 

1981 PRINTfP, "AS HARRY SHEARS HACI HE IS SURPRISED BY A SECURITY 

TEAM,'iPRI(rTfH,H», iGOSUB2»iCOT01]75 
1991 PRINTfP, "HARRY HAKES IT OUT OT THE CONPLEX, BUT NITHOUT 
THE SLED. HE PERISHES IN THE DBSERT. ' i PRIITTfH ,KS| iGOSUB2B iCOT02 
541 

2111 PRINTfP, "FOR THIS PLAN HARRY REEDS A HEAPOH. BE SIEAXS BAC 
K TO 

TKE SLED AND REMOVES A LASER CAHHOH. HE THEN CONFRCWTS DR. HON 
AND A SECURITY TEAM. 

UNFORTUNATELY, HARRY'S LASER PAILS TO OPERATE. ' i PRIlffM ,HS r i COSU 
B21:COTOH75 

2B1» PBINTfP,-NO ONE HILL BE LOOKING FOR HIM NOW. 
SHOULD HE: DCSCAPE 21 THY TO CAPTUNE OR, HON 3)GET THE GIRL 
2I2B INPUi-NiCLS:OHNCOT02i3l,2f4i,lB]l 
2131 PHlNTtP, 'HARRY DItSHES THIOJCH THE auSTCT OT HOTS, BUT STEP 



ON A SONIC ANTI-PEHSONNEL H1N£ . " : PHINT?H , HS j : G0SUB2B ; GOTOl 375 

2t4> COT02BBI 

2lil PRINTFP, 'HAHRY rjBNS THE HIBSOB OH THE INSTALLATION AND DES 

THOYS IT. 

DR. NON, HOWEVEk, ESCAPES IN HIS PERSONAL SHVTTLE. 

SHOULD HARRY: 11 U) AFTER DR. HON 2) GET THE GIRL" : INPUTN ■ CLS : 

0NNGOTO2B6B,2B7B 

2BbB PRINTfP, -WITH HIS HEAD START, DR. NON EASILY ESCAPES PURSL'I 

T. 

HARRY WASTED VALUABLE HOURS. BY THE TIME HE RESCUES THE GIHl, 

WAR HAS BROKEN OCT WITH S 1 RA . HARRY F A I LED . " : PBI NT f H , M S , ; GOSUBI 

B:GOT02 54B 

2171 PRINTfP, -HARaY HAKES HIS WAY TO THE HOSTAGE STORAGE APEA 

BY NOW DB. NON HAS RADIOED FOR HELP. 

KRUEL REINFORCEMENTS ABE ON THEIR WAY,-:PRINTfH,HS- -GOSUBJI 

2fai PRINTS, W$ 

2B9I PBINTfJ2«,"l) STUDY THE STORAGE SYSTEM 

21IB PR:Nrf3a4,-2) free everyone by disabling lock mechanism 

2UB PHI»TfP,-3) EXAHIKE THE FILES 

312B PRINTf512,-41 CALL UEC ON SLED RADIO 

2138 PHIHTf57*,-5) GET MECHANISM TO PRODUCE MORE PELLET KEYS 

2141 INPUlH!CLSiIFN<10RH>5THEN2IBI 

2151 OHNGOT0216B, 2171, 2221, 2231, 2278 

2161 PRI»TIP,-THE SYSTEM HAS 3 PARTS: 

FILES 

PELLET PRODUCER 

LOCKING HECHANISN-iPRIHTfH,HSi:GOSUB2iiGOT02IBI 

2171 PRINTfP, -TAMPERING WITH THE LOCK STARTED A BASE □ESTHUCIION 

SEQUENCE. HARRY HAS 68 SECONDS TO DECIDE WHETHER TO: 

1) ABANDON THE BASE 21 THY TO ABORT SEQUCHCE 

2iai IRPUTH:CLSiIrN<10RJI>2THEN2178 

2191 ONNGOT022ll,2218 

2218 PRIVTfP, -HARRY LIVES, BUT THE HISSION IE LOST. ' : PRINTfH , HS r 

iGO5UB]8iGOT0254l 

2211 PBIWTfP,'HE ALMOST HAD IT, THEN •BOOH I • " ; PRIWTf H ,HSi : G0SUB2 

8iCX>TO1375 

2221 PRINTfP, 'THERE ARE MANY FILES. SINCE THE GIRL WAS JUST TAR 

EH, SHE 

SHOULD BE AMOUHG THE LAST ENTRIES, BUT HARRY HAS ONLY 1 PELLET. 

WHICH FILE IS THE RIGHT ONE?" j PRINTfH , HS I i G0SUB21 :GOT022BB 

2238 PRIMTfP, 'HARRY FINDS THE SLED RADIO BROKEN. 

SHOULD HE! n TRY TO FIX IT 2) CO BACK TO STORAGE AREA 

2241 IHPUTHiCLSiOM»COT02258,32*8 

2258 PRIIfTfP, -HARRY GETS IT TO RECEIVE, BUT HE CAN'T TRANSMIT. "- 

PRINT(H,BS;:GOSUB21:COT028B8 

2261 GOT02IB1 

2278 PRINTfP, 'BY ATTOIPTIIiG TO BYPASS THE PELLET TIMER, HARRY SE 

TS OFF 

A SIGNAL WHICH ERASES ALL TKE FILES] MISSICN IS A FAILURE. ': PRI 

NTfB,HSi :aOSUB2i :GOT0254I 

22B1 PRINTfH, WS 

2291 PRiyTf321,-ll LOAD THE FILES UP A(fD BRI!*G THEM TO UEC 

2381 PRIHT«3ai,-2) DISABLE LOCK MECHANISM 

231i PRIKTfP,']] TAKE A GUESS 

2321 PHIHTf512,-4) GET KECHANISM TO PRODUCE MORE PELLETS 

233f PHINTf576,-5) CUT OFF POKER TO STORAGE COHPUTER 

2348 PBI!fTf«IB,-il CO BACK TO SHIP AHD USE RADIO 

2351 lI(PUTH:CLS!lFH<10BN>STHEN22a8 

2368 0NHGOTO2378, 2178, 23 88, 2271, 2398, 2431 

2378 PRINTfP, 'WHEN HARRY ATTWPTS TO REMOVE A PANE FROK ITS HOLD 

ER, 

THE FILE DISSOLVES, THE GIRL AND ALL OTHER HOSTAGES OH THE 
PANE ARE DESTROYED. MISSION FAI LED. ': PRINTfH , HS, : COSL'B28 iGOTD25 

23 BB PRINTfP, -BAD ODDS 1 HARRY'S PELLET FREES A HUHGRY GORGON HO 

LF MAN.-:PHJNTfH,HSi :COSUB28iCOTon75 

2398 PRINTfP, 'WITH THE POWER OFF THE SYSTEM BECOMES TOTALLY INOP 

ERATIVE. 

SHOULD HARRY: 

11 TURN POWER BACK ON 

21 EXAM SYSTOi WITH POWER OFF 

2488 INPUtN:CLS:O(JNCOT02«18,242I 

2418 GOT022a8 

2428 PRINTfP, "A SECONDARY POWER CIRCUIT SNAPS OH WHILE HARRY IS 

STUDYING 

CONNECTIONS. HE IS ELECTROCUTEDl-iPRINTfH,HS|:GOSUB2t:GOT01375 

2438 PRINTfP, -HARRY DRIVES BACK TO THE SHIP AMD CALLS UEC. 

COMPU-CEN SUGGESTS TAKING MICRO-PHOTOS USING THE HEAD CELL 

AHD AKALYIIHC THEN ON THE SHIP'S COMPUTER.* 

2448 PRINT-IN ADDITION, UEC IS SENDING A TASK FORCE TO SECURE TH 

E BASE,-:PRINTfH,HS[:G0SUB21 

2451 PRINTfP, -HARRY RETURNS TO THE STORAGE AREA, AND FOLLOWING 

COMPU-CEN'S ADVICE IS ABLE TO IDENTIFY THE GIRL'S FILE.- 

24&1 PRIWT'HE SLIPS THE PELLET IN AND A HOLOGRAPHIC IMAGE APPEAR 

S. 

IT IS KUHVI CALLEASE. SHE IS ALMOST MAGICALLY 

BEAUTIFUL. THE IMAGE FILLS AND SHE COMES TO LIFE, BUT 

IMMEDIATELY FAINTS ,': PRINTfH , H(, :C0.SUB21 

2478 PRINTfP, 'HARRY CATCHES HER AND CARRIES HER TO TKE SLED. 

THEY SPEED OVER THE YELLOW SANDS TO HIS SHIP. ABOVE, THE SKY 

FLASHES WITH RED AND BLUE LASER STROBES AS UEC AND KRUEL 

FORCES BATTLE IT OUT.- 

2411 PRINT-THE GIRL AWAKENS. A TEAR IN KEH EYE REFLECTS THE FLA 

SHES 

OVERHEAD.': PHI WTfH,HS J :COSUB:f 

24»t PRINTfP, "WHO ABE Y0U7 " i PRINTfH , H S : i GOSUB21 

259i PRINTfP, "HARRY FLYNN FROM UEC AT YOUR SERVICE, "i PRI WTfH ,H 

SliCOSUB2* 

2511 PRIKTfP,-SHE PRESSED CLOSE TO HIM, HER HEAD OH HIS SHOULDER 

'TAKE ME HONE, PLEASE, HARRY. '■: PRiyTfH ,HS, : GOSUB28 

252i PHIWTfP, "YOU'RE AS GOOD AS THERE. " i PRINTfH ,HS, : GOSUBZi 

253i PRINTf488,CHBSf23) -CONGRATULATIONS, ':PHINTf524, 'MISSION ACC 

0MPLISHE01'iFORT-lTO38if:NEXT:END 

2541 CLSiPHINTf478,-WA>rT TO TRY AGAIN lY/N)-j 

2551 INPUiDSiIFDJ--r'THE>(5BB 

IS«1 IPD$-'H'TBEN25aa 

2578 irDS<>'Y'ORDS<>'H'THENCLSiPRII»Tf464, -ANSWER OHLY MITH A Y 

R N'|iGOT0255i 

2;il CLS:PHIIfT|44a,'YOU BETTER CO BACK TO UEC OFFICER ACACENY FC 

X A REFRESHER COURSC-!FORT-lT03881iHEXT:END 
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NEW PROGRAMS 
FOR THE TRS-80 

incopROP 

Income Property Analysis 
for the TRS-80 

INCOPROP: Basea ucon 5ianaar0.j-«l mptrxxls 
oi prope'ty analysis useQ ihrouanoui lh» 'Pai 
pslaip inOuslry Geip'ales d ?. pace rppc; remain 
i"q a" annual p'Dt*'i< opp'a 
compiehpnsive lO yeai casfi 
laini IRS tai (atiie '<, ij'oi 
sirpiifn anC invrsTOF 5 I P R 

• M»n^l■^^ ut 'i; 1 lo»^^ I ifliFFr 

. MHjniy mlrritlryr iri'm.' Dsimils ^rn,l,.i1, »F>il,v. > 
■ Oi^h '■ r\ r'paltn Im pFrmMneil ^ro'»Qf ri' Udid 
Mir-rniur" 5. Ill'' ■BOui'»"'S'iH in BAM ■ CIF.,1< .nn 

P'lFiFsr Sci fl ftiih T'oFFTiaii*? 7B D»oe use' 5 manual r cs»pr 
nc Baiir jipBtFi o' incoms (v'OMl'lt '"•■SIFnerf X fj. 

Ijl-lB .ill r,c cisiiF'Ti' ■<>■ PiVy iFii'.F,- 

Wijc;* ii Old ii>cLnii.v.eTT(.> in%00 

Wuoei II Vns'or a<a<ia(M» >' we«SIC 

MAINDEX: An cas< to use [ifo^fam Id aiC you m 

irie inOe.iFig ot your ti'es on dish Cant (ir>0 ifiat 
pFogFafn Tt>v *Foff lasf FnoFitfi'' Pui vo**' cOi^iputeF 
:o *oit ■ FiFifl any pFogFaf^ of data 'fib n ytnj' sys 
Tern ir seconds 

- A Mil" IIOli [)' >' >ui.r u'lur ai» 5 OiFWtOI.^ 

- AiphaMTi^F^ lill l>' 'MBi •F^<; gri.*l ,o^ "aTi^S iJ'JiF^^ 






I n»D'*r. 1. 



^f nn 



• ll»ICF.I,■■c-^ 
Q.^fc jF\C calpgofk*^ 

• tii*OeacFbp1don^ r.»n o* SiaFchefl In' fce» *o'fls 

• PunT^ cr>4» IAtl*ll O'tri O'l* nairt* JFia Ir4* r<«itv, 

■ us»i All irie advaPLtH *i^ci cri^vrnFiv ti^i riit m»nipu 

>»tio-x CiCFaCilFl'M Ot ■CMFJl (f<c ■5NCW00SW 

HF^„.i>.>, Lr>e4 11 4S« I i).*k ai.w ana tttWOOSiW o' 
-ii'.i-Fif 'CF aaiv iFans'*- ioo.m tio% 

■■!■ ^5 I" 




DEPT EM. PO BOX HI.MOVATO. CA MMT 



TRS-80™* Models 1 & 3 

SOFTWARE 

SYSTEM DIAGNOSTIC $99 95 

Tests every (cxnponent of youf TRS-80 
lor proper operation: ROM. RAM. Video 
Drspldy. Keyboard. Lirw Pnnter. Cassette 
Recorder. Disk Drives. RS-232 Interlace 
Contir>uous or monitored opetat>on 

SMART TERiMlNAL $69.95 

The ir>telligenl tetecomrnuriKLatKxi pro- 
gram that enables yoor TRS-80 to be 
usedasa ttmeshanngteriTHnal A«ilC¥natk 
fc' M Hwiniow to and Irom another i om- 
puier Control keys, break key. kjwer 
case, cassette and disk tiles compaiihle 
with both tlectrn PerKil"" and Si npiil 
programs. 

MONITOR #3 $39 95 

Disassembler, memorv display, move, 
search, verify, modify, read and write 
machine language cassettes, objetl i ode 
relocalor, hexadecimal anthmelii 
symboiic disassembly ouipui 

MONITOR #4 $49.95 

Sarrye as Monitor fj but adds disk file and set - 
lor inpul/output. RS-J32 ccxrymunnations 

PfNClL PATCH $19 95 

fixes the Ekcirk Pendl' Model 1 ver 
ston so that it runs on the Model 1 (You 
fTiust already own the Model 1 verstiin ) 

GRAPH PRINT $19.95 

C reates tormalted prmt-out on the 
EpKMi MX-M primer Enhanced p.int 
modes print quality lext surrour>ded by 
paphic border Editing, dtsk save/reload 
text entry, error testing 

Send S.A.S.E. ior FREE Catalog. 

HOWE SOFTWARE 

14 Lexington Road, New City. NV 10956 
■TRS-flO IS a registered Itademark ol the 

Radio Sha< k division of Tandy C_i>rp ^ ' C; 



BayQsian 

Investment 

Services 

Send for free catalog 
discussing TRS-80 
programs available for 
evaluating: 

Options & Futures 

Stocks & Bonds 

Convertible 

& Other Hedges 

Portfolio Position 

Tax Positions 

Market Timing 

Write or call: 
Bay«slan ^ise 
Investment 
Services 

Dept. H3 
757 Santa Rosita 
Solana Beach, CA 92075 
(714) 755-6225 



r 



SAVE UP TO $600.00 NOW 
on TRS-80" Computers & Accessories 

With This Coupon* 

Now you can own a great little computer at a great big discount oft itie manufacturer s 
list price. For home or ottice use, the Radio Shack' line ot computers is first m quality, 
perlormance and price 

• FREE SHIPPING in the 48 continental contigious states Model II 

• NO SALES TAX collecled on out of-state orders 

• CONVENIENT ORDERING - Call us TOLL FREE - 1-800/531-7466 

• FREE COMPLETE PRICE LIST available upon request 




Dascription 



Catalog 

Number 

Radio Shack' TRS-8C Model II 

26-4002 64K 1 Disk Model II 

Radio Shack- TRS-80 Model III 

26-1062 Model 111 16K 

26-1065 Model t!t 48K - 1 Disk . , , , 

26-1066 Model Ml 48K — 2 Disk 

Radio Shack' TRS-M Color Computer 

26-3001 4K Color Computer 

26-3002 16K Color Computer 

26-3003 32K Color Computer 

Epson- MX 80 Printer 

Hewlett-Packard' HP-flO Personal Computer 
Magnavox' Odyssey^ Home Video System 
Magnavox' Magnavision* Videodisc Player 



List Price 

3,899.00 

999,00 
1,995.00 
2,495.00 

399.00 
599 00 
749.00 
645 00 
3,250.00 
199 95 
725,00 



Cashier's 
Check 

3,299.00 

859 00 
1,795,50 
2,099,00 

31500 
475 00 
674 00 
499 00 
2,499 00 
164 95 
599 00 



Cash Price 
You Save 

600 00 

140,00 
199,50 
396,00 

84 00 
124 00 

7500 
146 00 
751 00 

35 00 
126 00 



Pan American Electronics 



>' 64 



CALL TOLL FREE 800/531-7466 • (Operator 33) • Texas & Principal Number 512/581-2766 • Telex 767339 

Dept, 33 • 1117 Conway Avenue • Mission, Texas 78572 

NEW BRANCH 

2912 N. Main, Fort Worth, Texas 76106 • Phone Number 817/625-6333 • Telex 794836 



TRS-M It • Trad*mar« ot Tandy Corp 



■With ThIa Coupon Onty I - Odoraiptrai 111 W82 



Prlcat Bub^l 10 changa witltoul nottca — SllgMly ntflhsr lor Crvdtt Canl Omara 



•Sam Ltat pi AOvwrtiswrs onpag»418 
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Aerocomp's 
Proven 
Best-By Test! 
The 



II 



• I 




Double Density Controller 

-k Technical Superiority 




At last' A aouDte aensttv controller *o^ Mooei i wttti higher probability of data recovery than with any other 
DOJBLE DENSITY CONTROLLER ON THE MARKET TODAY! Tue DOC from AerocomD NO need to worry aoout tne pro- 
blems that keep cropoing up on extMino prooucts aerocomps new analog design phase lock loop data separator 
has a wtder capture window than the dnital tvpes currenrly or the market Tnis allows high resolution data center- 
ing. The finest resolutton availat>ie with digital circuitry is 125 ns (nano seconds*. The DDC analog circuit allows In- 
finateiy vartaoie tuning Attack and settling times are optimum for 5-1 'fl inch diskettes. 
The units presently on tne market use a write orecompensation circuit that is very • sioooy Board to txard 
tolerance is extremely wioe • in the order of * 100 ns The " doc ' is accurate to within i 20 ns, 
ThetX)ttomline is state of tne art reitaDiilty! 

• Test Proven 

Tests were conducted on aerocoMPS OOC Percom's " Doubler A " and " Doubier 11 '• and lnws ■ iNDoubier* • using 
a Radio ShacK trsso* • • Model 1, Level 2 aS K with trsso Expansion interface and a Percom TFD1M ' disk drive 
(Siemens Model 82) Diskette was wemorex jaoi The test diskette chosen was a well used piece of media to deter- 
mine performance under adverse conditions. The various douoie densitv adapters were installed seouentialiy In the 
expansion interface. 

Tne test consisted of formatting ao tracks on the diskette and writing a 6DB6 data pattern on an tracks Tne 6DB6 
pattern was chosen because it is recommended as a 'worst case test oy manufacturers of drives and diskettes An 
attempt was then made to read each sector on the disk once - no retry? Operating system was Newdos'80, version 
1.0. with Double zap version 2.0 Unreadaoie sectors were totalled and recorded The test was njn ten tinoes with 
each double density controller and the data averaged. Test results are snown in tne table 



• Features 

TR580 Model I owners wno are ready for reliable douoie 
density operation will get tii 80% more storage per 
diskette, t2) single and double density data separation 
wiOi far fewer disk I'O errors, (3) single density com- 
pattMityand [41 simple plug-m installation. Compatible 
with all existing oouoie density software. 

ic value 

$149.95 for the BEST double density 
controller on the market. 

$198.95 for DOC complete with DOSPLUS S.3D 
$239.95 for DDC complete with LDOS 



♦ TEST RESULTS ♦ 



MFR & PRODUa 


SECTORS LOCKED OUT "Ave 


AERCXrOMP DDC' 





PERCOM • DOUBLER 11 


18 


PERCOM DOUBLER A* 


250 


LNW LNDOUBLER 


202 



'Wore t«st results awaiUme upon Afitttr rvQuett AH (HtsconakKteo prior to8-3S-4t 

Aerocomo't it oav rroiev cuck smramce aooiies to narswa^t ortv 

SptCttK will M t>^orac«o smpcNng $20) In Com us. $m cvposK* (»Bt for dtofll. 



Data Separators 

The advances that make tne DOC' great are incorporated m the new aerocomp Single Density Data Separator i sos » 
and DouDle Density Data separator r DOS » 



• Has your original manufac- 
turer left YOU holding the bag? 

H vou i'fMffv o*tn a Pwcctn OoUD>«r A OOJOWr H or INW 
LMDouH>r tr* Anocowi* DCK w«i man K rignt Look n iw tru 
nmitR: 



MFR. & PRODUCT 


SECTORS LOCKED OUT | 


WITHOUT DDS 


WITH DOS ■ 


PERCOM DOUBLER II 


18 


1 


PERCOM ' DOUBLER A ' 


250 





LNW LNDOUBLER' 


202 






• "DOS" S49.95 

lUMim crip rrom yourooco'v 
cn*r> xiLKJfa .579.95 

• Disk controller 

chip $34.95 

fV«)()i>ig SI 00 Cortt us - 1M OpDOtn* 

aagafon 



Not* samt tSK proccaird pi OOC . 
■ Tradimarti of ranom 0M» ce 
** Tndemart C7f LNW 
• ' ' TradwnBrk of Tvidy Cornoratton 



Plugs directly Into your existing 
Double Density Controller. 



Do you need a 
single Density Data 
Separator? 

Tne InWrat ana wcarator in the 
WOiTM CMC ttii ixoanskm intf rfac« 
Is WIT ncorcrrmnOta Dv wo lor 
reiiWif oxa crsrvrtr 00 vou rwvt vy 
of tr«t proDMrrK lok aatt men 
lockM out CRC *mn t»* rMiy vOU 
NEED ONT 

• "SDS" $29.95 

(For Uoa. I; Mpt>^ $2,001 



See opposite 
page^iim 
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TRS80* 



DISK DRIVES 

40 & 80 TRACK 



as \o\A/ as 



$299.95 



NEW LOW PRtCES 



Thanks lo you our iwes vo*ume fvs 
allowed us to cut costs and we re pass- 
ing the savings along We offer the best 
disk drive vame m ihe martcrt p<ace. 
fDHiatiiiKy, features and cost tcxigh to 
beat. We defcver ana we stand De^lnd 
OL*r products AEROCO^f is the only 
marufacturer to offcf FREE TRtALi Buy 
Aerocomp dnves today, you deserve t^e 
beit 

BEST FEATURES 

* f^ast b rm tr^t<-(fack access time 

* Operates sngle or douWe density 

* FLIPPY' feature for lower mecha cos 
I40-I &80-II 

* Head toad soleno«3. 

* Disk ejector 

* f.ny t-ntry cJoor 

* NEW EXTERNAL DRIVE CABLE 
CONNECTION •«- ■^■■^r "•« » -t-o** •» 



EPSON 

MX80 

PRINTERS 

$479^ 

TRS80CaWe(l&IIIJ,.,...,S29/^'> 
APPLE C*ibie & Interface. S96 00 

RS232 Interface S69 95 

Ribtwn Cartridge, Black . S 13 95 
Add S600 sMpf"r>g fCort u S-J do« noi 
rKiudecaUf 

MX80 F/T 

Ar I'v 'f 3!ur*" of yxBO plus frtaton 
Feed Shipping & Ubtn a above 

$ 599.00 



ORDER TODAYI 

* 40- Track Dfivr $299,95 

* 80 Track Drive 542995 

* 40Track FUPPY" Drive 5329 95 

* BOTrack FUPPY Drve S449<;5 

* 4(>Track Dual Head Drive 5449.95 

* aO-Track DuahHead Dnve 5579.95 

* 40 Track Bare Dnvc. . 5269 95 

* 80 Track Bare Drive. . 5399 95 

* 40Track FUPPY' Bare DnveS299 95 

* SOTMck' Flippy BafrD'>.fS4i9 95 

ir SPECIAL PACKAGES* 

STARTER A SJJ9 95 

40-Tfack Drrve. 2-dnve caWe TRSDOS 
2 3 Dtsk & Manual. Fre^ht & Ins 

5RARTER B 536995 

40-Track "FLPPY ' Drive.caDie. TRSDOS 
2 3 Disk & Wanuat. Freight & ins 

COWBO C . . 5465.00 

40Track 'FLIPPY' Dris«, 2-dnvc cable. 
LOOS Freight & ins 

COMBO O S585 00 

80-Track FLIPPY Dnve, 2-drtvr caWe. 
LOOS freight & Ins 

COMBO E 5709 00 

Two 40-Track FLFPY ' Drives. 4-Dfive 
caWe, TRSDOS 2.3 Dsk & Manrual 
Freight & tns. 

COMBO F 5999.00 

Two 80 Track TLJ'PY ' Drves. 4-dnve 
LOOS Frei^t& ins 

COMBO G 5909,00 

Two 40Track Dual-Head Dnves. cable 
TRSDOS 23 Disk & Mar>ual. Freight & 
ins 

COMBOH 5I2990C 

Two aO-Track Ouai-Head Drives caWe. 
LOOS Frei^t & INS 

DOyiUS 3,3 or NfWDOS f 60.2 
avaiiaDle with any package 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use It wi(h yoix system for up to 14 
days If you are not sattsfted for ANY 
REASON (ewepi misuse or mproper 

nandlir^gi return it packed in the 
ongTiai shipping container, for a full re- 

furXl. |^«.'iJ«>.«X-'Will»rDrO*»lJI Wp ^WVP 

complete confidence m our products anc 
<A.f iciow you w* be satisfied' ORDER 
TODAYII 



WARRANTY 

Wi- .rt-i vou a 120 diay uncordmonat 
warrar«y on parts ard labor against any 
defea r materials and workmanship In 
tf>c event servkre foi any reason. 
Deccjmes nescess*y. our service depart- 
merit » fast- friendly arKi cooperative 

100% TESTED 

AEROCOMP Disk Drrves are compieieiy 
assembled at the factory and ready to 
plug in when you recrtve them Each 
drive IS t00%'berch tested pnor to ship- 
ment We even enctose a copy of ttie 
test Checklist, signed t>y the test techni- 
cian. With every dnve AEROCOMP 
MEANS RELIABUTYII 

ORDER NOWn 

T: . (.:c I V mail, specify Model 
NumberiSj o( Dnve. cable etc labovef, 
enclose check, nxxiey order VISA or 
f\^STERCHARG£ card number and en- 
pifation date or request COD shp 
ment Texas residents add 5% sales lax. 
Add 5 5 00 per dnve for shipping & handl- 
ing (Com. USJ Please allow 2 weeks for 
personal checks to clear our bar*. No 
personal checks vwii be accepted or 
COD shipments<ash. money orders or 
cenlted checks only You vwii receive a 
card showing the exact COD arrxxint 
before your shipnient amves Be sure to 
nckjdeyour name and shipping address 
You wi be rKNified of ttie scheduled 
shipping date Your bank credit cart will 
rsOT oe cnarged until the day ^ue ship n 

omvecABLc 

2-DRfVr 524 95 

A-pOvL 534 95 

WRITE AEROCOMP TODAY 
FOR MORE VALUES Ml 



CAU TOLL FREi FOR FAST SERVICE 
(800) a24-7Ua, OPfRATOR 24 

torn VISA.'MAITIVCHAROI 'C.O.D OBOin 

Coli'ocia dial laoo; U7 7777 Opvrolor 34 Aiotiio 
(K>d Ha**a<- d>a> MO VI* 7919 Opcrolor }4 

Tou rni uNfs wtu accwi oaom ohiti 

fo' ApplKO'lOrt ond T«<hni(Ol ■nf^tfO'tOr- colt 

314 yp 4346 or d'Of) iM a cord 



0*«l«'« <rtqtriM tf>v.t«<f 



Redbird Airport. BIdg. 8 
P.O. Box 24829 
Dollos. TX 75224 



^m' 



' £•• 1, 1r or AAwn 'M/9 on «fl9« "J 
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GAME 



Focus your attention on this winning Color Computer version. 



Color Concentration 



Charles T. Wrye 

600 Toftrees Ave.. Apt 352 

State College, PA 16801 



Among the many strong 
aoints of the TRS-80 Color 
Computer are the color graphics 
and sound capabilities. Color 
Squares, my version of Concen- 
tration, shows off these fea- 
tures and is tun to play. It makes 
extensive use of the color graph- 
ics capabilities, but due to the 



limits of the 4K memory, only 
limited use of sound. 



How to Play 

In the game, two players com- 
pete to see who can match the 
pairs of figures hidden behind 
the 16 squares. To begin, enter 
RUN. After a short delay to ran- 
domly distribute the patterns 
on the screen. 16 yellow squares 
will appear. They will be num- 
bered 01 through 16 (Fig. 1). 





Program Listing 


1 DIM A(16) ,L(16) 


3 CLS: PRINT§234, "INITIALIZING" 


5 FOR A=1T016 


7 N=RND(B) 


9 T=T+1 


10 


IF T=N THEN C(T)=C(T)-^l 


12 


IF C{T)>2 THEN C (T) =2 :T=0 -.GOTO 7 


14 


IF T<8 THEN 9 


16 


T=0:LCA) =N 


18 


NEXT A 


20 


CLS:Y=0:P=2:FOR A=1T016 


22 


READ L,T 


24 


GOSUB 310 


26 


NEXT A 


28 


RESTORE 


30 


N=1:F0R B=1T04:F0R A=lT04 


32 


T=(A*8)-6:L=(B*128)-32 


34 


PRINT@(T+L) ,Nf •.N=N+1 


36 


NEXT A,B:SOUND 120,6 


38 


Q=3 


40 


SET(30,15,Q) :SET(31,15,Q) 


42 


SET(30,14,Q) :SET{31,14,Q) 


44 


D(2)=0:FOR C=lT02 


46 


B$="' 




Program confinues 



Then a small colored block will 
appear in the middle of the 
screen. This square will be 
either blue or orange, blue for 

player one and orange for player 
two. 

The player enters his choice, 
01 through 16. A high tone is 
emitted for a valid guess and a 
low tone for an Illegal guess. 
On a valid guess, that block is 
cleared and the pattern as- 
signed to that square Is dis- 
played. The player then picks a 
second square. If they match, 
the two blocks are colored over 
with that player's color, blue or 
orange. That player then gets 
another pair of guesses. How- 
ever, If the two blocks do not 
match they are restored to yel- 



low, a tone sounds, and the 
player indicator changes col- 
ors. This continues until all 16 
squares have been guessed. To 
start a new game, Break and 
enter RUN. 

How the Program Works 

After the machine is initialized 
by lines 1 and 3. the machine 
lines 5-26 randomly store eight 
pairs of numbers, one through 
eight, in array L(1) through L(16). 
Array Ctl) through C{8) keeps 
track of how many times each 
number is used (Fig. 2). When a 
random number between one 
and eight is generated, lines 9 
through 14 check to see how 
many times that number has 
been used. If it is less than 
twice, that number is stored in 




PLAYER COLOR 
BLOCK 



Fig. 1. CRT Display at Beginning of Game. 
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You've Cot 



TOTAL ACCESS 



ispeclalMng In TVS80 'i 



Rose 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



Tlie complete line of fiaOio shack oroOiicts is 
av,iil,if)le ;nrough ta witl standard ps hnitea 
warrant/ Call me for once and deiiverv Ju^t 
cause vou don t see it don t mean we am r got it 

ROSE 



Iv'e got 

* DISK DRIVES 

TA400 140-T) S289 

TA800 (80-T) S419 

TAdOO Fhppv S319 

TA800 Flippv S139 

TAdOO-2 Dual Head $459 

TASOO-2 Dual Heaa S549 

* CABLES 

2-Drive 523.95 

a-Dnve 533.95 

Extender Cable 514.95 

* BARE DRIVES 

TA400B 5259 

TA800B 5589 

TA400B Flippy 5289 

TA800B Flippy .5409 

* EPSON PRINTERS 

MX80 5475.00 

MX80 FT 5589.00 

MX100 5799 00 

Parallel Cables 529.95 

■ Deiiuerv slow on some models 

* OPERATING SYSTEMS 

Tf?SD0S2 5 DiSk&M.inual. . . .517,95 

LDOS 5129,95 

NEWD0580 5129 95 

D0SPLU5 3 3 3 3D 589 95 

* IRON 

Disk Drive Power Supply, 

Single S37 

Disk Dri\/e Case (silver) 

and Base $19 

Mernorex Diskettes ibx of 10) 
525 



90 dav warranty on DRIVES. Add S5 00 frpignt oer 
drive in Cont J s UPS COO charge Si SO There is also 
,1 1S day FREE TRIAL On TA Cirques If nor compierelv 
satisfied ill refund your money I'ess shiopmgi Ml 
take exception to imoroDer use or mtsnandimq 



* RADIO SHACK COMPUTERS 

26-1061 Mill, LI, 4K 5595 

26-1052 Mill, Lll, 16K 5850 

26-1065 Mill, 48K, 1 Drive, .. .51695 
26-1066 Mill, 48K-2Dr-RS232., 52150 

26-4002 Mil, 64K, 1 drive 53299 

26-3501 Pocket computer. . , . 5185 

* PERIPHERALS - MOdel I, II, III 

26-1140 OK Exp. interface 5255 

26-1140 With 16K Mem, tested5305 
26-1140 With 32K Mem, testeOS355 
26-1145 Ml RS232w/cable, . , 585 

26-1148 Mill R5232w/cable 595 

26-1172 D,C. Modem 1 5155 

26-1173 D,C- Modem ii. AutoAns, 

5169 

26-1206 CTR-80 Recorder , , ,551 
26-41 50 Mil 8,4M Hard Disk, , , 53820 

26-41 51 MM Hard Disk -2 52970 

16K Memory, 200nsec, Guar. lyr. , . 
S29 



OTHER PRINTERS & ACCESSORIES 

26-1158 Daisy Wheel ii 51694 

26-1455 Acoustic Cover , , 5339 
26-1447 Tractor Assy , ,5249 

26-1448 Sheet Feeder, , , , S1275 

26-1165 Line Printer V S1581 

26-1166 Line Printer VI 5986 

26-1167 Line Printer VII, , 5359 
26-1168 Line Printer VIII 5679 

26-1191 Flat Bed Plotter, , , 51695 

26-1195 Digitizer 5379 

ANADEXDP-9500,9501 51295 

NEC 7750 Spinwnter, SScps. . 52484 
Daisy Wheel Printer, 45cps. . 51779 

Tractor for above 5237 

Sheet Feeder for above S1250 

26-1308 Printer stand S88 

26-4502 Printer stand 5129 

26-1401 or 4401 printer cable. ,532 

NEC COMPUTERS 

PC-8001A Keyboard & Processor. . . 

51099 

PC8Q11A Expansion Unit 5699 

PC-8031A Dual Disk Drive Unit5i099 
PC-8041A Green Phospher Monitor 

5225 

PC-8043A HighRes color Monitor 

5925 

13 color Monitor 5381 



ROSE'S 
SPECIAL 
OF THE 
MONTH 

• AEROCOMP'S • 

ALL NEW 

DOUBLE DENSITY 

CONTROLLER 

■DDC" $149.95 

Heres a Double Density controller for 
Mod. 1 that does away with all those aata 
separation proDlems that seem to keep 
cropping up' Rose wouldn t fun ya now, 
would sne? Dont be scared of Double 
Density anymore aerocomp has design- 
ed some advanced circuitry that even i 
don t understand - but i do know it 
works Better order now, Quanities are 
going to be a bit short. 

$189.95 complete 

with Dosplus 3.3D. 

HOW many do you 

want? 12? 



YEAR END 

COLOR COMPUTER 

SPECIALS 

26-3001 4K color Computer . 5323 
26-3002 16K Ext BASIC C C. . . 5485 
26-3003 32K Ext BASIC C C. 5566 

26-3010 15' color Video 5525 

26-3022 Disk Drive -0, complete, , , , 

5485 

26-5025 Disk Drive -1, complete, , , , 

5523 

26-3008 Joysticks, pair 521 



* RADIO SHACK SOFTWARE 

I have most all R. S software instock 
and It can be yours at isv off tne 
R S retail price. Call me for the 
latest availibility 

DOUBLE DENSITY 
DATA SEPARATOR 
FROM AEROCOMP 
$49.95 

If voii own a P6PC0M DOUBieR A ■ DOUeLEC 
II "or LMDOLinie'- ■ ■ uocjnae it with rhe DDS 
Plugs nqni 'm \3 rnnre locK-out' vol. de'^P'-ue 
onF nf these- 

ORDER NOW! 
TOLL FREE 
800-527-3582 

Write or call ROSE TOLL FREE at 
1-800-527-3582, Texas residents call 
214-234-1770, Please use the toll 
free lines for orders and literature 
requests only Technical help or ser- 
vice use the Texas line. You pay by 
VISA or MASTERCARD, you C3n send 
check or money order iailow a cou- 
ple of weeks for personal checks to 
clear) or order COD iwe ship C0D5 
cash, certified check or money 
order only), 25^n deposit required 
on all COD orders. Rose will take 
Amencanmoney in just about any 
form. Add freight (UPS where possi- 
ble) on all orders under 51000 If you 
buy 51000 or more Rose eats the 
freight! Texas residents cough up 
5^1 sales tax. Allow 2-4 weeks for 
delivery. Order today - I need the 
iTioney' 

TOTAL ACCESS 

P.O. BOX 3002 
RICHARDSON, TX 75080 

214-234-1770 -e 



' Tradenurk of PERCOM data CO ' "TrademarX of LNW ■ trsso & PaOio SMjck jre trnOemarks of TanOv Com Copynglt 19S' TOTA^ ACCESS 



p' See UsI of Advertisers on page 4 18 
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the next location in array L. The 
position is array C correspond- 
ing to the number chosen is in- 
cremented by one. This contin- 
ues until all 16 positions in array 
L are filled. 

For example, when A equals 
1, line 7 generates a random 
number, 3. Line 10 checks to 
see if T equals 3- Since T is 1 
there is no match. Line 12 ex- 
amines the contents of the first 
position in array C, that is, C(1) 
to see if it is over 2. Since C(1) 
equals we go to line 14. T is 1 
so we branch back to line 9. 

When T equals 3 we have a 
match in line 10. Now C{3) is in- 
cremented to 1. Line 12 now 
checks to see if C(3) Is greater 
than 2. Since it isn't, we go to 
line 14 and back to 9. This con- 
tinues until T equals 8. When 
this happens, U1) is set to 3 and 
line 18 sends us back to 5 to In- 
crement A to 2 and start this 
process again. The third time 
the random number Is 3, line 10 
sets C(3) to 3. Line 12 then sets 
C(3} back to 2 and branch to line 
7 for a new random number. 

Lines 20-36 draw and 
number the grid of tour-by-four 
yellow squares. Lines 38-42 set 
Q which is the color {3 or 8) for 
the two players. It is used to 
color the player indicator block, 
and in line 92 to color the 
squares after a correct guess. 

A two-digit number is input In 
lines 46 through 54. The number 
is checked to be certain that it 
is between 01 and 16, that it has 



not been guessed previously 
and that guess one is not the 
same as guess two. Lines 
66-82 display the pattern as- 
signed to that number by array 
L in that block (Fig. 3). The pro- 
cess is repeated for the second 
guess. 

If the two blocks match, the 
array L blocks for these two 
numbers are set to zero and the 
blocks are colored Q by lines 
84, 90 and 92. If there is no 
match, then Q is changed to the 
other player in line 66, and the 
whole guess input procedure is 
repeated starting in line 88. 

If there is a match, lines 96 
through 100 check to see it all 
blocks in array L are zero. If 
they are not, the program 
returns to line 40 to begin the 



Array C 



Array 


L 


A^^) 


3 


A(2) 


7 


A(3) 


2 


A(4) 


1 


A(5) 


4 


A(6) 


2 


A(7) 


3 


A(8) 


5 


A(9) 
A(10) 


- 


A(11i 
A(12) 


- 


A(13} 


A(14) 




A(15) 




A(16) 





qi) 


1 


q2) 


2 


qa) 


2 


q4) 


1 


C(5) 


1 


C(6) 





Q7} 


1 


C<8) 






Fig. 2. Contents of Arrays Half 
Way through Loading. 




GttM 






BUFF RED euFF MAGENTA HAStMTA 



\ BED 



Fig. 3 Patterns tor the Eight Number Pairs. 
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guessing again. If all blocks 
have been guessed. Game 
Over! ! is indicated on the screen 
and a tone sounds. 

Line 150 is the tone for an in- 
correct guess. Subroutine 200 
returns the two blocks back to 
yellow. Subroutine 300 colors 
or clears the blocks required. 
Data lines 400 through 430 
store the starting locations for 
the sixteen blocks. The rest of 
the data stores the patterns for 
the eight different blocks. 



This program uses up the 
memory available (less than 
2.4K). There may be 50 bytes 
left if you are very careful not to 
waste any when loading Color 
Squares. There was just no 
space for remark statements, 
so you'll have to refer to this ar- 
ticle to find out what the pro- 
gram is doing. 

So there it is. a colorful game 
for two players that will run on a 
TRS-80 Color Computer with 
only 4K of RAM. ■ 



Prog 'am conlinueO 
48 A$=INKEYS 
50 B$=B$+A$ 

52 IF LEN(B$) <>2 THEN 48 
54 A=VAL(BS) 

56 IF A<1 OR A>16 THEN 150 
58 IF L(A)=0 THEN 150 
60 Y=1:D{C)=A:E(C)=L(A) 
62 IF D(1)=D(2) THEN 150 
64 SOUND 120,6 
66 GOSUB 300 

68 RESTORE:FOR Z=lTOA:READ L,T:NEXT Z 
70 RESTORE:FOR Z=lT032:READ M:NEXT 2 
72 FOR Z=1T0( (L(A)*15)-15) :READ M:NEXT Z 
7 4 FOR V-T TO T-^5 STEP 2 
76 FOR H=L TO L-t-9 STEP 2 
78 READ M:SET(H,V,M) :SET{H+1,V,M) 

80 SET(H+1,V+1,M) :SET{H,V+1,H) 

82 NEXT H,V:RESTORE:NEXT C 

84 IF E{1)<>E{2) THEN GOSUB 200 ELSE 90 

86 IF Q»3 THEN Q=8 ELSE Q=3 

88 SOUND 180,6:GOTO 40 

90 FOR C=1T02 

92 A=D(C) :Y=0:P-Q:GOSUB 300 

94 NEXT C:L(D{1) )=0:L(D(2)}=0 

96 FOR A=1T016 

98 IF L(A) <>0 THEN 40 

100 NEXT A 

102 PRINT§234,'GA«E OVERll"; 

104 FOR C=1TO10:SOUND 80,2 

106 SOUND 120,2:NEXT C 

108 GOTO 108 

150 SOUND 1,5:G0T0 46 

200 FOR Z=1T02 

205 Y=0:P=2:A=D(Z) :GOSUB 300 

210 NEXT Z:RETURN 

300 RESTORE:FOR X=1T0A:READ L,T:NEXT X 

310 FOR H=L TO L-t-9: FOR V=T TO T-t-5 

315 IF Y=l THEN RESET(H,V) ELSE SET{H,V,P) 

320 NEXT V,H:RETURN 

400 DATA 2,0,18,0,34,0,50,0 

410 DATA 2,8,18,8,34,8,50,8 

420 DATA 2,16,18,16,34,16,50,16 

430 DATA 2,24,18,24,34,24,50,24 

440 DATA 0,2,2,5,2,2,2,5,2,5 

450 DATA 2,2,2,5,2 

460 DATA 2,6,2,6,2,2,2,6,2,2 

470 DATA 2,6,2,6,2 

480 DATA 5,7,7,7,5,5,7,5,7,5 

490 DATA 5,7,7,7,5 

500 DATA 5,5,4,5,5,4,4,4,4,4 

510 DATA 5,5,4,5,5 

520 DATA 7,5,5,5,7,7,7,7,7,7 

530 DATA 7,5,5,5,7 

540 DATA 2,2,6,2,2,2,6,7,6,2 

550 DATA 6,2,2,2,6 

560 DATA 7,2,7,2,2,2,7,2,7,2 

570 DATA 2,2,7,2,7 

580 DATA 4,5,5,5,4,5,4,5,4,5 

590 DATA 5,5,4,5,5 



"V 





INTKUMJCINU tlU. MtHOKV BOX 
MIHUHV THAT NtVLR MUJ1& MturecilON 

Him* JlrMilif Inn thr Cn < cr M|tB«Mo» Mwriar*. 

10t4 bytt* a4 rMR ia wi wiuMrf an* on Hi* mvfiM>(\ mna 

OMo-nn Htm. 

p>iryt4ni« and wNlly Mqip*rt millnM. 

ProiTMna tt*v hi ihr ii>#w»»t» kn* *vt« ivhm ilM CPU Ift 



1 1 Mariri 1 Uvfl n mii*« IHIS fv*ii 
PiV* t49.M 



>(«. l*.a2.4tKl 



Alt 

T Miinia«t-A powviful nActilw Unfuag* nMintlor 1«%flll- 
•*>lr M • k*TtiT«h« ulrtidVI dMurfclnf ■>«!» pnwaiNk) 
Prt«» I19.W 

I ll3lkO«-Autil»tv«»cl«dlMgMMvn(l««vlF»«inpn||i>i«i 
•dtuiMblr Ii(v4n«rrf dvhoiMK't, arrvfii print drtvrt PAflv 
niMiWrtnf. anMit lin«tor>atn«il(in,«n4(n*r«|alaiMlatil« 
«t a liayMnilw) 

Prti* «U.9i 

M|>m tol uH»r c*«iH«» Mch^« |6* f S 



DISPLAYED VIDEO IS DRIVING 
DOWN PRICES ON DISKS 

DISPLAYED VIDEO It nowt. oH<>Ting TRS-80' MODEL III v.Hh dUk driv». one of ih. 
mott ri>llah1« dl«k drivr sy^'^'^^ <>n ilir niaikvi. for Iricirdlbly Unk prirps'! 

MODEL III with 48K ram. dual 80 irark double-drntlty dt»k drives, rompldc. 

PtlfO IT IS AND GO $2,275 

MODEL III tilth 48K ram. dual 40 track doubl«-df nslty dkik drives, complete. 

PlUG IT IN AND GO SI .87S 

Disk Drives: Includes rase and power supply 

40 track dUk drive t289 

80 track dUk drive |39S 

80/80 (rack disk drive $520 

Disk Drives: Not including case and power supply 

40 track (bare) disk drive $250 

80 track (bare) disk drive $M5 

80 80 track (bare) disk drive $450 

Drive Cases and Power Supplies: 

$Vi inch single drive unit artd poKrr supply S 60 

SVt inch dual dnw unit and pnnrr supply SllO 

8 inch similf drivt- unit and pou'er supply $ 1 40 

I6K RAM Memory Chip (2O0 NS| $1 .95 each 

TKS-80* MODEL III 16K $839 

MODEL III Internal Drive Kit: Includes controller bnard. dual drive mounting hrnrkft. 
diiiil (Miuei vupply. all hardmare. cable* and connectors $410 




THE f K HtDEAWAV CPIOH BOARD 

^c<-*i><a 171<i mwiiMilU* aHHiMV cMp* |nM tnduirA- 

Ifll WltM lla IMM poM •Upyly Mkd CONflKtM 

Inoall • pt^ptoyiwii ipron sr uaa • mm thlp in 

IK HUmmv ' M« «S 

THt EPHOM PflOGIUHEa 
AitBctir* in fma^tt InwdiKv <m Hai*i I ni III 
nofmiNf I *«)! IK IK. 4*d 4K (fitntnt 
lMl>dc« 4rfb«t pta^mm. inMnidlafi*. c«bl*. mmi ptmrr 
tMpvh- 
Pn>rMiniM U* M 



V V. tmnmt rTa««rLMHa 
Lprwm Ctilp 



IMMEDIATE DELIVERY 

90 Days Paris and Labor Warranty 

Dealer inquiries invited 





Oispljived Video 

7538 Jackson Road 

Ann Arbor, Michif(an 48103 

(in) 42r»-iOBb 



•'X 



To Order Call (313) 426-5086 nr (313) 482-4424 or write I>ISPIAYU> VIDEO. 
7538 Jackson Road. Ann Arbor. Mtthiyan 48103 

TNS-in t« H iraapftMtk at tkr TaaJb CatPHatlia PKi-r* tiihfwi ta rlMBgr vHlinwl nntir 



[MSPIAYFDVIDFO'M hKI IMMI DATACa&»Ertl& 

HaA' <A lof) simIi Is^ ^■i'ty,i\-\iti by AfllA^*v»rri of 

(awk at* irf Makailo giMk kv^vcrvH cvnalniclla* 
<jMM*nt«wl IOIVT iTi'W-tm' ar vomi wimmv badi- 

lliwrli «• RUM 

H pMk .St T8 N 

Nofdco Btvl* hard eltatlc MMMt* n*M tl am 

Sfr. ■«! (jiln itiSf ^wv ardw of 14 cbm«iim 
• P>k.i H,.jr.r PdM p«a w« b. tncfcidvd. 

DHllFTTES [VOX Of !■) 

VfTtuiMM r«f1ltb>d ilafcrltrs 
Gtmanri 100% rrrar-trrr n* v>«' fiwim kaA- 

ss WfKMn'ijsoi 

IM»Mk ilSW 

l^al1SI .itO fir «liipfilM ft lwn«iM laO>d«.!wi>iaiM& 
.arrw»f<fvr.n1nwnr4StS)«tl»^Martai.^l4ltS-4111 



fi** t~ii c Ae<f9rt%9n 9r pmgm4iS 
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CONSTRUCTION 



Give 16 karats to all your contacts. 



A Gold-Plated 80 



George W. Martin 

Box 433 

Hatch, NM 87937 



My TRS-80 is over two years 
old and the tarnishing of 
the contacts on the Interface 
unit has always been a problem. 
Often a program goes into a tail- 
spin, or It locks up. Cleaning the 
contacts on the interface unit 
usually clears the trouble for a 
short while. 

These solder-coated con- 
tacts tarnish over a period of 
time and form a bad contact. 
The contact surfaces on the 
plugs are gold plated, so why 
not gold plate the contacts on 
the printed circuit board? 

The usual method of plating 
is to immerse the article in a 
plating solution and pass an 
electric current from the gold 
anode, but the printed circuit 
board the size of the one in the 
interface is a little large to get 
302 " 80 Microcomputing, December 1981 



into a tank that is usually 
available for gold plating. 

On the market there is a 
brush-on gold or silver-plating 
device, which a number of 
jewelers have. It can be pur- 
chased for approximately $80, 
or you could find a Jeweler who 
has one and will do the Job for 
you for a great deal less. 

Making Your Own 

The other alternative is to 
make your own plater, and that 
can be accomplished as fol- 
lows. Purchase a small artist's 
brush with a nice round body ;^ 
to Vincfies in diameter. Go to 
your local jeweler and purchase 
a small piece of pure gold about 
3/16 by 1/32 by 1/2 inch. Sol- 
der a connecting wire to this 
small piece of gold and bury it 
in the bristle of the brush so it is 
completely covered. At the 
same time you purchase this 
gold, get about an ounce of 
24kt gold-plating solution. (Use 



caution, this is deadly poison. 
Wash your hands thoroughly 
after using this solution.) 

The other items you will need 
are: a six-volt battery and two 
pieces of #18 stranded in- 
sulated wire at>out 24 inches 
long. Attach a wire from the 
positive terminal of the battery 
to the wire previously soldered 
to the gold. Remove the insula- 
tion from another wire at both 
ends for about a half inch and 
solder one end to the negative 
terminal of the battery; the 
other end of this wire goes to 
each contact on the printed cir- 
cuit board that you are going to 
plate. 

Thoroughly clean the con- 
tacts on the P.C. board until 
they are bright by using a pencil 
eraser. Now hold the wire from 
the negative terminal of the bat- 
tery to the P.C. board contact 
and dip the brush in the plating 
solution. Start brushing the 
contact. You will see that It will 



gradually twcome plated with 
pure gold. Be careful not to let 
the anode buried in the brush 
touch the contact you are work- 
ing on. The cyanide in the 
plating solution will also have 
a tendency to clean the P.C. 
board contacts as you plate, so 
if the terminals are bright and 
clean when you get through rut>- 
bing with the eraser, no prob- 
lems should develop. 

I have found it necessary to 
remove the P.C. board from the 
interface unit In order to do this 
Job properly, and you will be 
breaking the warranty if your 
unit is still under the 90-day 
period. 

The result of this is a machine 
that has its dependability in- 
creased 100 percent— no more 
crashing programs when they 
have tieen left in the machine for 
two or three days. 

If you have trouble finding the 
24kt. gold or solution I can put 
you in touch with suppiiers.B 
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GENERAL 



Tape users, take 150 bytes out of your reserved RAM. 



The Freebie 



John C. Adams. Jr. 
208 Kaywood Avenue 
Tultahoma, TN 37388 

All non-dlsK Level II Basic 
owners, take heed: 150 
bytes of unused RAM in the re- 
served portion ot memory can 
be "freebte" storage locations, 
freely PEEKed and POKEd from 
Level II Basic programs. These 
memory locations are only used 
by the Disk Operating System 
and Disk Basic for the real time 
clock. Debug, Interrupt process- 
ing, and jump vector commands. 
If you own a Level II Basic 
TRS-80 running cassette tape 
for program storage, we have 
good news for you. 

Background 

The free RAM is at memory 

locations 403EH-407FH (a total 
of 66 bytes) and 4152H-41A5H 



(a total of 84 bytes), a combined 
total of 150 available bytes of 
storage. Level II Basic assumes 
that locations 403EH-407FH 
store Disk Operating System in- 
formation concerning the real 
time clock, interrupt processing, 
and Debug while locations 
4152H-41A5H contain a total of 
28 command (ju^P) vectors for 
Disk Basic. In a disk-based sys- 
tem these command vectors are 
filled with jumps to Disk Basic, 
but in a diskless system the lo- 
cations are filled with jumps to 
012DH. causing L3 ERROR on 
the video screen. The Reset but- 
ton at the left rear of the 
keyboard has no effect on infor- 
mation stored in these loca- 
tions. 

When a major wipe-out re- 
sults in the Memory Size? 
prompt all information in loca- 
tions 403EH-405CH and 4152H- 



"If you own a Level II Basic 

TRS-60 running cassette tape 

for program storage, we have 

good news for you." 



41A5H will be lost upon press- 
ing the Enter key. However, any 
information stored in locations 
405DH-407FH is preserved; 
these 35 bytes are permanently 
protected 1 

Examplas 

Program Listing 1 shows a 
Level II Basic program POKEing 
the Z80 machine language rou- 
tine Simple DetMunce (Septem- 
ber 1980, 80 Microcomputing, 
Page 13) into permanently pro- 
tected memory locations 4061 H- 



IB CLS : DEFINT I-M : PRINT 'LOADING SIMPLE DEBOUNCE ( BB-MICROCO 

MPUTING, SEPT. 198fl, P. 13)" : PRINT "INTO RESERVED RAM AT MEMOR 

y LOCATIONS 4fl61H - 407FH" 

20 FOR ML = 16481 TO 16511 : READ I : POKE ML, I : K = K + I : NE 

XT ML 

30 DATA 33,106,64,34,22,64,195,114,0,17,126,56,33,53,64,203,3,24 

8,44,26,17 4,40,246,6,5,2 5,96,0,195,227,3 

40 PRINT : IF K <> 2706 THEN PRINT "ERROR IN READING SIMPLE DEBO 

UNCE INPUT DATA -=> BUG": STOP ELSE PRINT "SIMPLE DEBOUNCE 

LOADED "> ENTER / AFTER •? TO ACTIVATE" 

50 POKE 16607,97 i POKE 16608,64 : SYSTEM 

Program Listing 1. 



407FH. The System command 
(see line 50) activates the pro- 
gram starting at location 4061H; 
the program patches its starting 
address (406AH) into memory 
location 4016H and jumps to 
Level II Basic ready. Press Reset 
or enter System followed by /O to 
destroy the program; then PEEK 
merrrory locations 4061 H-407FH. 
The program is permanently 
protected. However, the pro- 
gram starting address (406AH) 
must be repatched into memory 
locations 4016H-4017H as 
these locations are reset to 
03E3H during system initializa- 
tion. Simply reenter line 50 using 
the Command mode, i.e.: 

POKE 16607.97;POKE 16608. 

64:SYSTEM 
and enter / after *? to re-activate 
the program. 

Freebie memory in conjunction 
with machine language program- 
ming is ittustrated in Program 
Listing 2. Here the KBEEPFIX 
Z80 machine language program 
(February 1980. 80 Micro- 
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4152 

4152 
4155 
4158 
415B 
415E 
4161 
4163 
4164 
4165 

4166 

416B 
4169 
416A 
416B 
416D 
416E 
4170 
4172 
4173 

4175 
4176 
4177 
4179 
417B 
417D 
417E 
4181 
4182 
4183 

4185 
41BB 
4189 
418C 
418& 
4199 
4191 
4194 
4195 
4196 

4197 
419A 
419D 
419E 
419F 
41AB 
41A1 



Mill 
lllll 
§1121 
II13I 
II14I 
II15I 
II16I 
11171 
M180 
11191 



215B41 

221640 

C372IB 

213640 

010138 

1600 

0A 

5F 

A3 

201A 

77 

14 

2C 

CB01 

79 

D680 

20F1 

00 

0607 

2D 

86 

10FC 

FE00 

3E00 

CZ 

321A40 

C9 

A6 

2810 

3A1A40 

3C 

321A40 

FEFF 

20D9 

3D 

321A40 

7B 

73 

C5 

010002 

006000 

CI 

0A 

A3 

C8 

C33E4B 



RESERVED 



RAN 



KBEEPPIX 



403E 
403E C5 

403F E5 
4B40 F5 
4041 0640 
4043 3A3D4B 
4046 E6FD 

4048 67 

4049 F602 
404B 6F 
404C 7D 
404D D3FF 

404F 7C 

4050 D3FF 

4052 C5 

4053 0640 
4055 10FE 

4057 CI 

4058 10F2 
405A Fl 
405B El 
405C CI 
4D5D C3FB33 
4152 



* REFERENCE: "KBEEPPIX" BY DENNIS KITS! 

* 80-HICROCOHPDTING, FEBRUARY 19BI, 

* PAGES 14 THROUGH 15, WITH 

* CORRECTION IN B0-HICROCOHPDTING, 

* APRIL 1981, PAGE 9. 



00200 

00210 KBEEPF 

0B22B 

01230 

00240 

00250 

00260 

00270 

00280 

00290 



JUMPl 



00300 

00310 

00320 JUHP2 

00330 

00340 

00350 

00360 

00370 

00380 

00390 

00400 JUHP3 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 JUHP4 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00560 

00570 

00560 JUHP5 

00590 

00600 

00610 

00620 

00630 

00640 

00650 

00660 

00670 ; 

00680 

00690 CONT 

00700 

00710 

00720 

00730 

00740 

00750 

00760 

00770 

00780 JUHP6 

007 90 

00800 

00S10 

00820 

00830 

00840 JUM?7 

00850 

00860 

00870 

008B0 

00890 

00900 

00910 



ORG 

LD 

LD 

JP 

LD 

LD 

LD 

LD 

LD 

AND 

JR 
LD 

INC 

INC 

HLC 

LD 

SUB 

JR 

NOP 

LD 

DEC 

ADD 

DJNZ 

CP 

LD 

RET 

LD 

RET 

AND 

JR 

LD 

INC 

LD 

CP 

JR 

DEC 

LD 

LD 

LD 

PUSH 

LD 

CALL 

POP 

LD 

AND 

RET 

JP 

ORG 
PUSH 

PUSH 
PUSH 

LD 
LD 
AND 

LD 
OR 
LD 
LD 
OUT 

LD 

OUT 

PUSH 

LD 

DJNZ 

POP 

DJNZ 

POP 

POP 

POP 

JP 

END 



4152H 

RL,415BH 

(4B16H} ,BL 

0072H 

HL,4036H 

BC,3BB1H 

D,00H 

A,(BC) 

E,A 

E 

NZ,JUHP4 

{HL],A 

D 

L 

C 

A,C 

80H 

NZ,JUMP1 

B,07H 

L 

A,{HL) 

JUHP3 

00H 

A,00H 

NZ 

(401AH] ,A 

(HL) 

Z, JUMPS 

A, (401AH] 
A 

(401AH) ,A 
0FFH 

NZ,JUMP2 
A 

(401AH} ,A 
A,E 
(HL) ,E 
BC 

BC,0200H 
0060H 
BC 
A,(BC) 

E 
Z 
CONT 

403EH 
BC 

HL 

AF 

B,40H 

A, (403DH) 

0FDH 

H,A 

02H 

L,A 

A,L 

(0FFH) ,A 

A,H 

(0FFH) ,A 

BC 

B,40H 

JUMP7 

PC 

JUMP6 

AF 

HL 

BC 

03FBH 

KBEEPF 



Program Listing 2. 



computing, pages 14 and 15, 
and April 1980, 80 Microcom- 
puting, page 9) is assembled in- 
to memory locations 4152H- 
41A3H and 403EH-405FH. The 
jump command beginning at 
memory location 41A1H jumps 
to 403EH and patches the two 
portions of memory together. 

Store machine language utili- 
ty routines in these 150 free 
bytes, and save reserved memo- 
ry for other uses. 

Homeworli 

Convert the machine language 
version of KBEEPPIX given in 
Program Listing 2 to a Level II 
Basic program which POKEs 
the KBEEPPIX routine into pro- 
tected memory locations 16722- 
16803 and 16446-16479. (See 
Page 15 of 80 Microcomputing, 
February 1980), tor an example. 
Note that 16722 = 4152H, 
16a03-41A3H, 16446 = 403EH, 
and 16479= 405FH. Brush upon 
your hexadecimal to decimal 
conversions or use Appendix G 
of the Level II Basic Reference 
Manual, Second Edition. ■ 




ZIP UP YOUR 
MODEL I 



SPEED-UP UNIT - an easy to Install electronic device that enables programs 
to run Z to 3 times taster. It's the fastest and finest quality speed-up unit 
on the market. 

• guaranteed to double processing speed- no additional 
purchases required. 

• programs will run up to 3 times taster (5,3 mhz) by adding 
a Z80B microprocessor and delay line - not supplied. 

• returns aulomalically to normal speed during disk and 
cassette operation - no software patches required 

• keyboard power-on light cfianges color to indicate operating 
speed. 

$45.00 



VIDEO I. Reverses the video display to provide black characters and 
graphics on an all white screen for a much easier to read presentation. 
Software controlled. Cures pulling and distortion problems commonly ex- 
perienced with TRS-80 monitors. For use with TRS-SO monitors only 
Assembled. 

S24.00 



"SATISFACTION GUARANTEED" 



Add SZ.OO postage & handling - California residents add 6% sales tax 
-Foreign orders add 15S. 



ARCHBOLD ELECTRONICS 

10708 Segovia Way Rancho Cordova, CA 95670 

(916) 635-5408 

Dealar Inquiries invited 



y-Seo List ol Advmrtisers on page 418 
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GENERAL 



One user analyzes if Apparatus latest evolution is worth the money. 



NEWDOS/80 



Ken Jackman 

West Chester State College 

Westchester. PA 19380 



NEW DOS/BO retainsall of the 
functions of NEWDOS + , 
so users who have become ac- 
customed to the latter can cer- 
tainly use the new system. 
Some of the programs have 
been revised, and severai new 
programs or functions have 
been added. However, the major 
changes lie in new sophisti- 
cated file formats and methods. 
One other aspect of the program 
appears to be for the sophisti- 
cated programmer: the price! 
One hundred and fifty dollars 
does require some justification. 
Briefly, for those not familiar 
vi/ith NEWDOS or NEWDOS + , 
these systems cleaned up a lot 
of the bugs in Tandy's DOS. In 
addition, they provided utility 
programs that worked! You 
could junk Radio Shack's Tape- 
Disk, because LMOFFSET did 
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the same job. but did it right! A 
directory check program was 
included which could warn the 
unwary TRSDOS user of im- 
pending crashes due to direc- 
tory overwrites— the first really 
good preventive diagnostic 
routine I've seen. A disassem- 
bler and editor/assembler were 
included tor the Assembly lan- 
guage programmer, and for the 
Level I user, two programs per- 
mitted the use of Level I terms 
in Disk Basic, and storage on 
the disk. Superzap. the Basic 
language disk editor was really 
the first disk editor. Finally, 
Basic was enhanced with its 
own renumbering utility and a 
utility to list references to line 
numbers and to variables used 
in the program. 

DOS Commands 

NEWDOS/80 includes all of 
the functions of NEWDOS and 
NEWDOS + though some of 
them have been changed some- 
what. Let me list the additional 
functions in the DOS: 



• Break permits enabling or 
disabling the Break key from 
the keyboard. 

• Chain, like Randy Cook's 
VTOS command, permits 
building a file of commands 
which can be executed by call- 
ing the tile from DOS. 

• HIMEM sets memory size 
from DOS. 

• fVlDBORT. MDCOPY. MDRET 
are commands which can be ex- 
ecuted from f^ilinidos, 
MDBORT returns the user from 
Minidos to DOS. 

MDCOPY permits a restricted 
file copy function. 
MDRET returns the user from 
minidos to the main program. 
Program execution picks up 
where it left off. 

• PDRIVE lets the user specify 
the characteristics of each disk 
drive. This command permits 
the programmer to mix 50 and 
77 track drives and to mix five- 
inch disks with eight-inch 
disks. It even permits the use of 
the OMIKRON interface with 
eight-inch drives. Plans to pro- 



vide for utilizing the LOBO in- 
terface have evidently been 
dropped. Although provision is 
made for several different drive 
types, only a few have actually 
been implemented. Space is re- 
served for the additional 
entries, 

• System doesn't load machine 
language tapes! It does a mini 
SYSGEN. similar to those done 
on much larger systems. Pass- 
words may be enabled or disa- 
bled; the system can be set to run 
only; and the screen-print option 
Debug, and entry to the Mini- 
dos can be enabled or disabled. 
This function can tell DOS if 
lowercase mods have been in- 
stalled, enable or disable the 
Clear key, and perform a host of 
other useful but not so mind- 
boggling functions. 

• Purge, as in VTOS, permits a 
review of the entire disk con- 
tents, file by file, during which 
any of the files may t>e killed. 

Enhanced Commands 

How about enhancements to 



existing commands? Many of 
the commands which were im- 
proved from TRSDOS get addi- 
tional improvement in NEW- 
DOS/80. 

Careful use of the System 
command can enable or dis- 
able many of the following 
commands. 

MInidos 

First, we should look at the 
Minidos. It can be called by 
pressing D, F and G simultane- 
ously. In Minidos you can ex- 
ecute all of the DOS commands 
except Append, Chain, Copy, 
Format, and the commands. 
System and PDrive. Only DOS 
commands can be executed. 
Fc instance, you cannot load a 
new program from Minidos. 

Minidos has the advantage 
of permitting the operator to ex- 
ecute most DOS commands in 
the middle of a program, and 
then return to the program in 
progress. In other words, vari- 
ables, string space, and so forth 
are not cleared when a program 
is interrupted. Minidos lets the 
operator decide whether to 
return to DOS (MDBORT) or to 
resume execution of the pro- 
gram (MDRET). 

The Copy command was fair- 
ly complex in NEWDOS + . It 
permitted copying files from 
alien systems like TRSDOS. 
The more elaborate Copy com- 
mands in NEWDOS/80 permit 
copying by file, using the entire 
memory as a copy buffer, speci- 
fying the number of tracks to be 
used, and bypassing the For- 
mat function. It also offers 
several other options which are 
useful in recovering lost files. 

Format has some of the 
same options as Copy. One can 
still specify the number of 
tracks, whether to overwrite old 
data, and which dates, names, 
and passwords to use. Since no 
file copying is done, the param- 
eters controlling file copying do 
not make sense in the Format 
command. 

Debug can be started in the 
usual ways. It can also be 
started by pressing the numbers 
—1, 2, and 3 simultaneously. 

List now permits line num- 
bers to be specified. This has 
always been available In Basic, 
but now it Is available in the 



DOS command as well. 

Enhancements to Basic are a 
bit more nebulous. The tile de- 
velopment system receives 
special treatment in an ap- 
pendix in the NEWDOS/BO 
manual. An operator can no 
longer delete a line by simply 
typing the line number followed 
by a carriage return. Deletion of 
a line requires the use of the 
Delete command. (Delete. Edit, 
List, and Auto can still be ini- 
tiated using only the first letter.) 
Scrolling commands appear to 
be unchanged from NEWDOS ■+ . 
Period, down-arrow, up-arrow, 
semicolon, slash and comma 
still serve scrolling/editing func- 
tions. The Delete commands 
have been increased. In addition 
to the ability to delete a line, it is 
possible to move a line to a new 
location (Dl) or to make a copy of 
the line at a new location (DU). 

Of course, renumbering and 
referencing capabilities are re- 
tained. REF can be used to list 
all references to a given 
number or variable. The listing 
can be shown on the video or 
listed on a line printer. The 
renumbering function permits 
renumbering lines of Basic 
within the program and chang- 
ing the starting line number 
and the increment for line 
numbers. Careful use of this 
capability permits moving 
blocks of program from one 
place to another. 

CMD Command 

The CMDcommand has been 
modified. NEWDOS has always 
permitted the execution of DOS 
commands through the CMD 
command. In NEWDOS/80, the 
return is to Basic after a CMD 
call unless the call was one of 
the one-letter calls in TRSDOS. 
or 'S = — ' or 'F = — ' is 
specified. In the case of the 'S' 
command, return is to DOS. The 
F' command can ciear the in- 
dices of For... Next loops, either 
selectively or all at once. 
Returns from GOSUBs can also 
be cleared. This variation on 
the CMD command is clearly 
one for advanced program- 
mers, enabling them to get out 
of loops and complex portions 
of the program without leaving 
confusing Nexts or Returns on 
the stacks. 



A Sophisticated System 

How does the operating 
system look so far? The com- 
puter novice [someone who can 
use TRSDOS) could use the 
system. Some of the enhance- 
ments probably would not get 
used. There are enough "bells 
and whistles" in the system 
that even an advanced pro- 
grammer will not use all of 
them regularly. Some of the 
commands look lil<e they are 
Imitations of VTOS. The Chain 
command is a good example of 
an aspect of VTOS that is worth 
imitating. Other desirable as- 
pects are missing. The ability to 
redirect output from one device 
to another, or to a file would be 
handy. Autorepeat on the 
keyboard shouldn't be too hard 
to implement either, I suppose 
that a creative systems pro- 
grammer (or some hobby buff 
with time on his hands) could 
use Superzap to install facilities 
for these functions. Maybe Ap- 
parat will provide zaps for them. 
At any rate, they are desirable 
functions not included in this 
DOS. 

The Sysgen functions (Sys- 
tem and PDrive) are a major 
step toward a truly sophisti- 
cated operating system. The 
absence of a sophisticated 
operating system is one of the 
reasons why the home micros 
are still regarded as Imprac- 
tical toys by many computer 
professionals. In short, at this 
point, the DOS is a major im- 
provement on the older sys- 
tems, but there is still room for 
growth. 

Utilities 

Any major DOS provides a 

set of utilities for manipulating 
files, cleaning them up, testing 
the system, etc. What does 
NEWDOS/80 have? 

NEWDOS -(- and NEWDOS/ 
80 both have the DirCheck pro- 
gram that t mentioned earlier. 
DirCheck analyzes problems in 
locked out granules, granules 
which are allocated to more 
than one file, errors in file entry 
tables and GAT tables. Dir- 
Check should be run after any 
and every intensive use of a 
disk. If there are reasons to 
suspect a disk has been zapped 
magnetically orelectrlcaily, the 



diagnostic should be run. This 
program does not repair the 
damage— it simply lets you 
know where it is! 

The new version of SUPERZAP 
has more commands, and Is writ- 
ten in machine language so it 
runs faster. It can read or write 
to any unprotected sector of 
the disk. Any program with that 
kind of power is also potentially 
dangerous, so the novice should 
practice with disks he can af- 
ford to clobber before under- 
taking major modifications. 

Other utilities present in both 
versions, as indicated before, 
are LMOFFSET to permit load- 
ing of machine language tapes 
to disk; the debugger, of course; 
the disassembler which per- 
mits disassembly of either 
main memory or a file on disk; 
and the Editor/Assembler. It is 
worth noting that older ver- 
sions of NEWDOS required the 
user to have a copy of TRSDOS 
and Radio Shack's Editor/ 
Assembler package. This is no 
longer the case for the DOS but 
remains the case for the Editor/ 
Assembler, 

Other utilities on both sys- 
tems permit running Level I pro- 
grams and loading or saving 
them on disk. Level I data tiles 
are not accessible from these 
programs. 

Extras 

In addition to the utilities and 
files on NEWDOS + , NEWDOS/ 
80 has a couple of extras. 
ASPOOL. according to Apparat, 
was added at the last minute 
"as a free program to NEWDOS/ 
80 owners." The program was 
written by H, S. Gentry, ac- 
cording to Apparat, but no refer- 
ences are given to where (or if) it 
was published. This spooler is 
not a very elegant system, but it 
does work. It will let the key- 
board take precedence over the 
printer in user-defined inter- 
vals, provided the keyboard is 
active. That is, if the keyboard 
is inactive for a user defined 
period of time, the spooler will 
print a line. As long as the 
keyboard is not active, the 
spooler will continue printing. 
As nearly as I can tell, the main 
program does not run while the 
spooler is printing. Rather, the 
spooler "times out" after each 



80 Microcomputing. December 1981 • 307 




RS204 
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keytxiard input, and during the 
tirT>eK}ut, the main program can 
run. 

If the keyboard Is continually 
active, the spooler is effectively 
locked out and does not print. If 
the spooler uses the interrupt 
(an option), it operates when- 
ever the keyboard is not active, 
i.e. betvi/een key strokes. If it 
starts to print, key entry must 
wait until the end of the line. 
The spooler does permit a 
number of options, including 
serial or parallel printers, a way 
to inject an interrupt routine for 
the spooler, and a circular buf- 
fer. I used it in writing this arti- 
cle, but that certainly does not 
constitute a thorough test. 
Perhaps it works better than it 
appears. 

The other new utility program 
is the lowercase conversion 
program. Written by Tom Price, 
this is another program without 
references. It is a machine- 
code program that relocates 
itself into high memory, and 
permits shift to set or reset 
lowercase. It provides the soft- 
ware to accommodate lower- 
case hardware mods. 

Other programs included are 
tutorial in nature. SAMPLE01 is 
a mixed tutorial/program on the 
new filetypes. It is designed to 
be listed as well as run. The 
REM statements provide an ex- 
planation of what Is going on 
while the program is running. It 
is designed to be listed on a line 
printer, though I suppose the 
screen would work in a pinch. It 
is a novel approach, but It 
didn't work all that well for me. 
The second program in this 
set is set up the same way, ex- 
cept that the program is run 
after you have studied the REM 
statements. Chaintst explains 
the chaining command and 
demonstrates its capabilities. 
The demo Is impressive, though 
the explanation In the REM 
statements is not all that clear. 
The technique Is slightly more 
complex than that used in 
VTOS. This version can specify 
section IDs and execution for 
only one section of the chain 
file. It is possible for one chain 
file to call another, or for one 
section of the file to call 
another section, so that very 
complex chaining sequences 
are possible. 



Rlalypu 

V\^hat are these new file types 
that threaten to revolutionize 
microcomputing? Apparat has 
added five new file types! The 
old sequential and random flies 
still work, so NEWDO5/80 can 
use seven different file types! 
All of these new file types have 
variable record lengths. There 
are basically two new types: 
marked-Item files with three 
subtypes, and fixed-Item files 
with two subtypes. The major 
difference twtween them is that 
the marked-item files use the 
first bytes of each item to 
describe It while fixed-Item 
files have no such marker. Also, 
marked-item files of variable 
record lengths use the first byte 
of the record to mark the start 
of the record. 

All of the marked-file types 
enable you to keep track of 
where you are In the file and in 
the record. This is done by re- 
quiring extra variables in the 
OPEN, PUT or GET statements. 
Unfortunately, they have had to 
use the same symbols used for 
definition of variable types (!, #, 
S, and %). This adds something 
to the confusion. However, us- 
ing the LOG command, it is 
possible to determine exactly 
where you are within a file. Use 
of the file location symbols in 
PUT or GET statements permit 
reprocessing the same record 
or same byte within a record, as 
well as moving to another 
record (or another byte) at will. 
Building an index file using the 
file location capabilities pro- 
vides for true "Indexed sequen- 
tial" access, as well as other In- 
dexed file methods. 

The fixed-item type files are 
probably the easiest to de- 
scribe, although the manual 
describes them as the hardest 
to use. One type is apparently 
the same as the random files in 
TRSDOS. It has a fixed record 
length, defined in the OPEN 
statement, and division into 
subrecords is essentially the 
programmer's problem. The 
other has no record segmenta- 
tion and is treated as a string of 
items. Again, the programmer 
must keep track ol subdivisions 
or item lengths. 

In addition to the documen- 
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tation in the manual proper, 
Apparat has included a large 
appendix to the manual that 
provides an expanded illustra- 
tion of the file types and how 
they work. This appendix is 
probably the clearest part of 
the manual as far as file 
manipulation is concerned. Ap- 
parat says it was written by one 
of their Denver customers, but 
the author's name is not men- 
tioned. Whoever it was certain- 
ly deserves credit. The appen- 
dix requires building some files 
and examining them with 
Superzap. It would be easier to 
follow had they included the 
output from Superzap in the 
appendix. Altogether, the man- 
ual, the appendix, and the 
SAMPLE01 program provide a 
reasonable introduction to the 
file types, but I wish they had in- 
cluded a brief discussion of the 
purposes for which each type 
could be used. 

Documantation 

Apparat assumes that you 
have the TRSDOS manual and 
other appropriate documenta- 
tion (i.e., the Editor/Assembler 
manual and software). The 
style of writing is not quite so 
terse as it was in the NEW- 
DOS -f manual, although it still 
assumes considerable sophis- 
tication on the part of the user. 
It definitely is not on the same 
level as the Level I manual! The 
introductory section describes 
the process of duplicating the 
disk, but warns against trying 
to use the system before study- 
ing the manual. It is advice thai 
should be taken seriously! The 
values used in the SYSTEM and 
PDRIVE commands can set up 
ways to overwrite the system 
disk! 

The section on the DOS com- 
mands includes all of the 
library commands, rather than 
just the new or modified com- 
mands, as was the case in the 
old manual. Most of the manual 
is what you would expect it to 
be: discussion of special 
features, enhancements, and 
minimum system configura- 
tion. They have included a 
glossary and a section on hovi; 
to apply patches (zaps) to files 
on the disk. A significant part of 
setting up and running involves 



application of the patches, 
which are listed and explained. 
They include patches to some 
non-NEWDOS files, such as 
Scripsit and APL/80, for those 
users who have them. Most of 
the patches on my disk had 
already been installed before I 
got It, but you still have to 
check it the first time. The 
patching process takes about 
half an hour the first time you 
doit. 

Basic 

NEWDOS/80 is a program- 
mer's DOS, as opposed to a 
simple file-handler like Tandy's 
DOS. For the Basic program- 
mer, the REF function and re- 
numbering capabilities are 
nearly indispensable. The abil- 
ity to shuffle lines atiout or 
to duplicate them (Dl and OU 
commands) is a significant im- 
provement in the programmer's 
toolkit. These functions are, I 
think, the most obviously 
useful functions to a Basic 
programmer. There are other, 
less obvious, functions that are 
also extremely valuable. For in- 
stance, I can best analyze a 
program when I can get my 
hands on it. The JKL function 
lists the video screen so I 
can get at it. If I'm in the pro- 
cess of debugging a program, 
and I need to know whether my 
files in the program match the 
files on the disk, I press DFG to 
get into MINIDOS, and list the 
Directory. If the files don't 
match, I can Rename the one in 
the Directory (not a good prac- 
tice if you've already opened 
the file in your Basic program). 
MDRET will return me to the 
point at which I left off debug- 
ging. The more I use the sys- 
tem, the more I appreciate the 
MINIDOS. 

Another benefit is the CMD 
"F = — " command. Consider 
the following program seg- 
ment: 

100 GOSUB 500 



500 FOR I = 1 100 



550 IF I = 50 GO TO 600 
560 NEXT I 

570 RETURN 



600 PROGRAM RESUMES HERE 
This demonstrates the CMD 



"F = — " function. When the 
program resumes at 600, the 
first NEXT I statement encoun- 
tered should send it backto line 
500. If not, some error message 
will be given because there is 
stfli the equivalent of 50 I's on 
the Basic index stack. CMD 
"F=POPS" cleans up the in- 
dex stack. The next RETURN 
statement will send the pro- 
gram back to 100 (or if there is 
another GOSUB, it will treat 
them as nested subroutines). 
CMD "F = POPR" clears both 
the index stack and the sub- 
routine stack. 

While CMD "F= — " should 
not be necessary in a well writ- 
ten program, it can be very 
useful during the debugging 
phase of program develop- 
ment. Attaching the name of 
the indexing variable clears the 
index for that variable only, so 
that in debugging nested loops, 
you can selectively clear index 
stacks. 

The new file types are an ob- 
vious change from the usual 
Basic file system. They appear 
to be most useful in business 
applications such as data base 
management. They certainly 
make understanding the file 
easier when using Superzap. 
MU files are especially useful 
during program development, 
because the pointers tell you 
the type of data (character, in- 
teger, single or double preci- 
sion) and the length of the data. 
It does take some getting used 
to, but it's worth it. 

Assembly 

Language Programming 

NEWDOS/80 includes a mod- 
ified version of Tandy's Editor/ 
Assembler, Only Apparat's 
modifications are documented, 
but an assembly language pro- 
grammer will find all he needs 
in NEWDOS/80. In addition to 
the Editor/Assembler, there is 
the debugger, LMOFFSET for 
relocating code, and the dis- 
assembler. Superzap is, of 
course, the valuable disk editor 
for both the assembly and 
Basic languages. Further, most 
ot the DOS entry points are in- 
cluded in a separate section of 
the manual, so that for func- 



the disk, the programmer has a 
guide to follow. Overall, every- 
thing required for intelligent 
programming in assembly lan- 
guage is present on the disk. 

Conclusion 

What are the pros and cons 
of the system? Is it really for the 
more sophisticated user? Who 
can use it and for what? First, 
the system is a major improve- 
ment on existing operating 
systems. It is a big step closer 
to a "real" operating system. It 
can be used by anyone who 
uses Radio Shack's TRSDOS, 
but it is probably too expensive 
to justify use in a "load and go" 
situation, where the user buys 
programs, loads and runs 
them. Anyone who does their 
own programming, particularly 
where they are writing pro- 
grams for manipulating files, 
will find this DOS useful. The 
"serious" hobbyist who is in- 
terested in increasing his 
knowledge and mastery of 
computer science will find this 
system useful. There is still 
room for improvement. It is not 
a full fledged DOS— yet! For 
the sophisticated user, there 
are some desirable commands 
not implemented. The interrupt 
handling still leaves a great 
deal to be desired, and certain 
file handling techniques have 
yet to be implemented. (I'm not 
saying what they are! Look at 
the OS for a DEC or other large 
minicomputer system to find 
them!) 

The small business user 
could use this system to great 
advantage. I think it will greatly 
reduce run-time for programs 
that do a lot of file accessing. It 
does require some reprogram- 
ming to implement the new file 
types. 

Is it worth the cost? If you 
feel that your investment in 
your computer, interface and 
disk drive has been worthwhile, 
then the price of NEWDOS/80 is 
reasonable because of the ad- 
ditional capabilities It offers. 
The only user to whom I would 
not recommend this system is 
one who uses the computer 
only for game playing. He 
should spend his bucks on 
Scott Adams' next crea1ion!B 
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APPLICATION 



On the whole, this author would rather be in Brattleboro. 



City Accessibility Calculator 



James M. Todd 
RD 3 Box 79 
Brattleboro, VT 05301 



I'm tfred of meeting people in 
Burlington! 

I'm a member of a number of 
Vermont organizations that op- 
erate on a state level. Each 
group is continually debating 
ttie ctioice of a meeting place. 
Ttie argument usually revolves 
around tfie distance each mem- 
tier has to travel. 

Burlington, located in the 
north of Vermont, is the most 
populous city In the state. And. 
tiecause there are so many of 
them, the Burlington crowd usu- 
ally wins these arguments. 

Unfortunately, I live 150 miles 
from Burlington and have to 
drive six hours there and back. 

Since I live so far from Bur- 
lington, I wrote a program to 
determine which city Is the most 
accessible in any given area for 
any given group. 

A ButlfWBt ProQram Too 

Not Just for meeting places, 
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the program can help you to lo- 
cate a business. Suppose your 
business involves transporting 
people or things, or selling 
things in a number of cities In 
one general area. Where's the 
optimal place for you to live? 

In my City Accessibility pro- 
gram, simply punch in the dis- 
tances and the data for each 
city. The program then calcu- 
lates the distance from one city 
to every other. By entering the 
number of customers in each 
city, the program adjusts the fig- 
ures in terms of total travel or 
"stops" and displays the results 
or prints them out. 

It's simple to choose the city 
that involves the least travel for 
you. 

You can express this distance 
as any convenient unit— such 
as miles or kilometers— but for 
many people it could also be ex- 
pressed as time. 

(This might be important if, 
for instance, some persons have 
to drive 50 miles over dirt roads 
wt>ereas another group drives 60 
miles on the interstate highway. 
For similar reasons, you may 
want to express the distances in 
dollar costs.) 

Typing the original distance 
data Is tedious, but the city data 
Is limited and does not take long 
to enter. Forthls reason, the pro- 
gram allows you to save and cor- 
rect the distance data but not 



the city data. 

The results are normally dis- 
played for thirteen cities at a 
time (all the screen will hold), 
but the program displays a sum- 
mary of the results to facilitate 
comparisons. If you own a line 
printer, you can print the com- 
plete results. 

TTw Program Worlcs 

To make the program easier 
to understand, consider a set of 
four cities. A, B, C and D as In 
Fig. 1. 

In Fig. 1, the distances to city 
A are labeled w, u and z. Similar- 
ly, for city B, the distances are 
those labeled w, v and x. The 
program performs this addition 
for all the cities on the list. 

In order to allow for different 
numbers of persons from each 
city, each distance is multiplied 
by the number of persons travel- 
ing from that city. Thus, if we 
have four persons from city B, 
two from city C and five from 
city 0, the modified distance for 
city A are as follows: 

fw • ■*) ♦ (u ■ 2) + [z • 5) 

Though the program runs in 
Level II, originally I wrote it in 
Level I Basic without the city 
names, using numbers to desig- 
nate them. I stored the dis- 
tances and city numbers In one 
one-dimensional array, all that 
Level I allows. 




(5 people) D-^ y ^-C '2 people) 

Fig. 1. Cities Example 



The program stores the num- 
t)er of the first city in the first 
digit (the tens) of the array label 
and the second city in the sec- 
ond digit (the ones). The pro- 
gram stores the actual distance 
data in the labeled segment of 
the array. 

I arbitrarily limited the num- 
t>er of cities to 50. so the pro- 
gram could handle the dis- 
tances between all the state 
capitals. The program uses the 
arrays labeled (1000) and up to 
store the city data. 

Punch Lines 

I worked all of this out and now 
can't entirely understand it my- 
self—but it works, so I kept it. 

The punch line is that the pro- 
gram hasn't helped me travel 
less, because, if more than five 
or six people from Burlington at- 
tend the meeting the travel 
totals are less If the meeting is 
held there. My own Invention 
may have defeated me, but I 
haven't told the other members 
yetIB 



Program Listing 4 



111 Clem liiii dihmiiidi diiuksi) 

111 RW --- CITY ACCESSIBILITY PHOGRAH 
121 REM (CI COPYHIGIIT DEC 19BI 

JAMES M, TODD, RD3 , BOX 79 

BRATTLEBORO, VT B53B1 
131 CLS: PR1KTTAB(7) *• ** CITY ACCESSIBILIT 
Y ■ • ■ 

■iTAB(H) "(OiSai, JAMCS M. TODD, BRATTLEBORO, VEWOKT" 
141 PRINTtPRINT'USE ANY DISTANCE OR TIKE UNITS YOU HISB - KIUME 
TERS, HOURS,' 

151 PRIHT'MII.ES OR PACES - JUST BE COHSISTEMT J (ALL DISTANCES 
OWE-WAY) * 

15» RSI ••• INITIALIZATION - FOR SPEED 

161 rOR J-1 TO 2tt§: klJ)'»: NEXTJ : A-l : B-fe :C-I: D-l: E-«:r-fiG-l : 
H-l:I-a 

171 PRIHT:PRIIIT'EKTER THE NUMBER OF THE OPERATION YOU WISH TO PE 
RFORM ;-■ 

179 REH ■•■ MENU 

HI OS""SCR"iPRIKT-l) NEW AREA/DISTANCE INPUT 2) DIST. CORRN, 

3) CITY DATA INPUT 

4) SHOW RESULTS 5) SUMM.'J;Y 6) PRINTOUT 7) SAVE DIST. DATA "; 
191 INPUTJ: IF (J<1) + (J>7) THEN 191 

2BI ON J GOTO 211 ,591 ,398 ,441 ,98B ,9911 ,731 

211 INPUT "INPUT VIA 1] KEYBOARD 2) DISK '.-J: IF (J<11 + (J>21 THE 

H 21i 

221 OM J GOTO 231 ,831 

229 REB ••■ INPUT NEW AREA/DISTANCE DATA 

231 CLS: INPUT-ENTER TITLE (8 CHARACTERS KAXIHUH] ■;AS:IF AS-"' 

THEN 231 

241 INPUT"ENTEJi THE UNIT OF HEASURDtENT YOU WILL BE USING "iBS 

251 IF BS-'* THEN 241 ELSE CLS: FBIHTe2l , A$i * - 'jBS 

261 INPUT'ENTEH NUMBER OF CITIES (SI KAX] 'jA: IF (A<2}+(A>5I) T 

KEN 2(l 

271 FOR K-1 TO A 

201 PKINT-HANE OF CITY l*:F;: INPUT KSID: JF KS|K)-"" THEN 2B 

291 NEXT K 

319 FOR C-1 TO A-J : FOR D-C-H TD A 

310 G-C'IB+D 

32B PRINT-FROM ';C;") 'iK$(C);' TO 'jD;') 'jUSIDJi* IS 'n IHP 

UT A(G1 : 

IF A(C) <a THEN 329 

331 NEXT D: NEXT C 

341 IHPUT'DO YOU WISH TO CORRECT ANY DISTANCES 7 I'YES 2) NO 'i 

J 

351 IF (J>21HJ<1) THEN 341 

3fil ON J GOT059* ,381 

371 INPUT'SAVE AREA/DISTANCE DATA OH DISK ? {I'TBS 2HK3) 'jj: IF 

(J<1)>(J>2) GOTO 371 

]Bi ON J GOTO 721 ,391 

389 RSI *•• TKPUT DATA FOR EACH CITY 

391 CLS: PRINTS 21, AS 

410 FOR H-1 TO A 

410 PRINT "NO. OF PEOi'LE FROM (OR OUTLETS IN) ' ; H; ' ) 'KS (H) ; : 1 

HPUT Adeea+H} 

420 NEXT H 

429 REf" ••• CALCULATE AND DISPLAY RESULTS 

430 

REN •+++ DISTANCE FROM CITY E TO CITY F-A[X1 »♦+♦ 
441 GOSUB 940 
«SI IF OS''aLH" CLS: 

PRINT"(1ST • - CITY) 2ND t = TOTAL DISTAIICE / 3RD I • TOTAL THAV 
EL' 

470 FDR E-1 TO A: B-l: I-l: FOX F-1 TO A 
481 V-E-ll+F: Wll*F-»E 
491 IF W>V THEN X'V 

511 IF W-V THEN X-l 

B10 IF V>W THEN X-W 



S2I B-BtA(XI : I-I*(A(X)*A(F*1III}1 

531 NEXT F 

539 REN ■•• PRINTING ROUTINES 

541 IF OS-'SUM' PRINT E; *) " ;fl, "/' , 1 ; ' "; 

5Se IF 0S-'LIN"LPRINT"FOR ";KS(E)j" AS CENTER')TAB( 40) jB:TAB( 51 

) iI|TAB|62) ;A(iei0-fE) 

5«0 IF 05-'SCR" PRINT 'FOR "iKS(E);" AS CENTER" ( TAB(45) | BjTABl 

55), 1 

570 IF OS-'SCH" AND (E-13) +( E-26) +(E«39) GOSUB930 

581 NEXT E: IF QS-"SUK" PRINT* ": GOTO 180 ELSE GOTO 180 

589 REM ••• CORRECTING DISTANCES BETVED) CITIES 

590 PRINT "PLEASE KEEP THE CITIES IN THEIR ORIGINAL LIST ORDER V 
HEN * 

6li PRINT "INSCRTTNG CORRECTIONS, I.E. CITY MITH SMALLER NUMBER 

FIRST." 

til PRINT TAB(5) "DISTANCE FROM WNICB CITT 7 (CITY NUMBER) "i: IN 

PUT C 

621 PBIKT'CITY f;Ci"lS •jKS(C) 

631 IF OA THEN PHIWT'THAT CITY WASN'T OH THE LIST": GOTO 610 

640 PRINTTAflll6) "TO WHICH CITY ? (CITY NUMBER) "j: INPUTD 

650 PRINT'CITY t"iD;"IS "|KS(D) 

660 IF D>A THEN PRIKT'THAT CITY WASN'T ON THE LIST': GOTO 6*3 

678 IF C>=D THEN GOTOBSB 

fiSI G-C*1B+D: PRINT"THE DISTANCE RECORDED WAS"lA(G) 

691 INPUT 'ENTER CORRECT DISTANCE 'jA(G)! IF A(G)<B THEN 691 

711 INPUT 'ANY BORE CORRECTIONS 1}YES 2)N0 'iJ: IF (J<1).(J>2) T 

HEN 710 

711 OH J GOTO 611 ,181 

719 Rm ••• SAVE AREA/DISTANCE DATA TO DISK 

721 PRIMT'FILENAME FOR DISK DATA FILE IS TITLE - ';AS 

730 INPUT'PRESS -ENTER- WHEN PFAPv TO SAVE TO DISK':J5 

741 OPDi"0*,l,AS 

751 PRI((Tll,ASl',')aSj',';A 

76f FOR K-1 TO A; PRIWTtl ,KS (Kl : NEXT I 

771 FOR C-1 TO A-1: FOR D-C+1 TO A 

780 C-C*ll+D 

791 PRI»T»1,AIG) 

811 NEXT D: NEXT C 

811 CLOSE 

821 PRINT' RECORDING COMPLETE ':G0T018B 

B29 REM •" INPUT AREA/DISTANCE DATA FRCW DISK 

831 INPUT"EHTER FILENAME OF DISK DATA FILE ( TITLE ) ";AS: IF AS 

-'■ THEN 830 

841 0PEH"I*,1,AS 

B50 INPUT<1,AS,B$,A 

8(1 FOR K-1 TO A: INPUTll ,KS(K! : NEXT I 

871 FOR C-1 TO A-1: FOR D-C*l TO A 

881 G-C*10tD 

89I 1NPUTI1,A[C1 

900 NEXT D: NEXT C 

910 CLOSE 

920 PRIWTAS,-" --- DISTANCE DATA ENTERED': GOTO 18i 

929 ROi ••* TITLES FOR PAGE DISPLAY 

930 INPUT'PRESS -ENTER- TO CONTINUE'jJS 

948 CLS: IF QS-'LIN' LPRINT ASi'lOHE-WAY DISTANCES) - 'fBS;: 

ELSE PRINT ASi'(ONE-WAy DISTANCES) - ';BSl 

950 IF QS="LIN' LPRINT TAB( 48) 'TOTAL' ; TAB(51) I 'TOTAL' )TAB(62) 'NU 

MBER': 

ELSE PRINTTAB(45) "TOTAL";TAB(561 'TOTAL' 

960 IF OS = "LIN" LPRINT TAB( 401 "DISTANCE" ; TAB! 51 1 "TRAVEL"! TAa(fi2) 

"PEOPLE"; 

ELSE PRIWTTAB(45) 'DISTANCE" ;TAB( 56) "TRAVEL" 

971 RETURN 

979 REM •" SET FLAG FOR SOHHAKX OR LINEPRIVt 

980 OS-"SL-H": GOTO 451 

990 PHIHT"WHEN PRINTER IS CONNECTED (AND SWITCHED ON) ENTER P 
(IF YOU'VE CHANGED YOUR MIND, ENTER R) " 

llll INPUT JS: IF JS»"R" GOTO 180 ELSE IF JS-"P" THEN OS-"LIN"; 
GOTO 441: ELSE GOTO IIBI 



GANTT-PACK 



EASY PROJECT PLANNING 

• Dynamic Scratchpad Entry 



UNIQUE PROGRAM FEATURES 



• Simple Editing/Updating 

• Automatic Organization • Rapid Screen Review 

• Graphics for Communications • Printer of Your Choice 

• Charts and Data to Screen and Printer 




POWERFUL. FLEXIBLE, SYSTEM DESIGNED BY EXPERIENCED PROFESSIONALS 

• Now available for TRS-80* f^odel I, 48 K, 2 disks 

• TRS-80* Models II and III Versions by December, 1981 



LIBRA LABORATORIES, INC. 
495 Main Street 
Metuchen, NJ 08840 



^57 



Tel. (201) 494-2224 

Gantt-Pack © Libra Laboratories, 1981 

PRICE $149.50 

■TRS-80 Trademark o( Tandy Corp. 



'Sw List of Aitv^tliMn on page 4tt 
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CONSTRUCTION 



This one fits inside your Model I. 



Another Noise Maker 



Gary Erb 

10840 Hunter Ave. 

Whittier. CA 90601 



Software-generated tones 
add interesting effects o 
flag for keyboard input verifica 
tion. but Radio Stiack left hard 
ware for ttie amplification of syn 
Itiesized sound off the TRS80 
An inexpensive amplifier which 
wjII give adequate volume and 
quality can be built or purchased. 
Because this is yet another pe- 
ripheral with dangling wires and 
battery replacements, I decided 
to build in an amplifier with its 
own power supply and speaker. 

Getting Started 

Because Radio Shack used a 



standard TV case for the Model I 
there is plenty of room inside for 
the installation of extra equip- 
ment. The front-mounted bright- 
ness and contrast controls are 
standard, but the volume con- 
trol was replaced by the video 
signal cable. This cable is in an 
ideal spot for the on/ott volume 
control of the amplifying system. 

You can use the Radio Shack 
amplifier ($9.95) or build one 
from spare parts. I found an old 
AM transistor radio; after dis- 
mantling the circuit board from 
Its case, I removed the volume 
control, variable frequency ca- 
pacitor and speaker, preserving 
only the amplifying portion of 
the radio. 

A lOK potentiometer (volume 
control) replaces the pancake 
type removed from the radio/ 
amplifier. A microphone jack 
on the front of the video dis- 
play takes the audio signal from 
the cassette output via the aux- 
iliary jack. The only other hard- 



ware required is a nine-volt bat- 
tery eliminator. 

Installation 

After removing the back from 
the display unit (with power off 
and unplugged) unsolder the 
three video cable wires from the 
circuit board. Pull the cable 
through the front of the unit and 
reinstall it after pushing it 
through any one of the holes In 
the back. 1 used a plastic tie 
wrap to hold the cable to the cir- 
cuit board, eliminating undue 
stress on the solder joints. In- 
stall the switched potentiome- 
ter (V«-inch diameter shaft) on 
the chassis in place of the video 
cable and attach the volume and 
power leads. Remove the speak- 
er from the original board and 
place it just inside the front 
cooling grill, giving maximum 
volume. For improved sound 
quality place the speaker inside 
its own enclosure. 

Drill a small hole in the plastic 



cabinet to accommodate the mi- 
crophone jack beside your new 
volume control. Connect the two 
leads from the jack to the input 
of the amplifier. 

Screw the circuit board and 
1 10V plug, into which the battery 
eliminator goes, into the lugs 
originally used to hold the TV 
tuner. Solder one lead from the 
plug to the power switch of the 
video display and the other to 
chassis ground. Check all your 
connections and assemble the 
unit. 

Operation 

Plug in the audio cable from 
the keyboard, power up the dis- 
play (which will now activate the 
amplifier), turn the switch and lis- 
ten for a buzz from the speaker. 

I spent less than $10 to add 
another noise-maker to my den. 
Now that I do not have to bother 
with the external amplifier I can 
put more sound effects in my 
programs.* 



MOVING? 

Let us know 8 weeks in advance so that you won't miss a sin- 
gle issue ot -^ '■ Mi':n.lJ"T-i1!' 

Attach old label where indicated and print new address 
in space provided. Also include your mailing label 
whenever you write corKerning your subscription. It 
helps us serve you promptly. 



. - Address change only 
f 1 Extend subscription 
LJ Enter new subscription 
I 1 year $25.00 



n Payment enclosed 

(1 extra BONUS issue] 
a Bill me later 



// you have no label handy, print OLD address here 



a; Name. 



'" Address 
tcity 



Name, 



Address. 



Cit> 



80 MICROCOMPUTING 



.Call, 



State. 



Zip. 



print NEW address here: 

an 



Stale. 



Zit 



() \U,\ MHl • !,irrTiini;(i.ilc N't 
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A Combined General Ledger, Accounts Payable, Accounts Receivable, and Payroll, All on One Diskette • Complete 
Easy-to-follow Manual and Instructions • Demonstration Disk Available • Available now for the TRS-80 MOD II ' 

Simplify Your Bookkeeping With 
A Completely Interactive System. 



WO»r 




MiinjiiLi WHKToar 



PAYABLES 

AND 

RECEIVABLES 

Euy invaic*«ninr AulomaVictftv 

poal-ng M pnom a*n*>ai tMow 

•cccunt SapwaUa nin tvL. 

Hnncs CMWV** ''*HI'<1- 

Aacovnii ate 

Ulu OiKOunll bf Ou* Mil 

user opiiont 10 on all »*rH]oii 

or itfaclvt] vumior* 

M<*C1MI in>oK*« 01 

MimaMt Cuaioni*' Imii<'-« t 
ihrougr^ dii* ui«r (]***»«« 
ifilwait or **fvic* cnarg* tiMo^ i* uh' aawcU 
U>«' optioft of atat^rnvni format fofnt ■«ariab4« 



PWfcl" NAyMta lll>lhwfcllll M »rl » 



r ■■cinmji laiM hp 







CUHD 



RECEIVABLES 



■'■nbi** Aid n*c*^>Bt>>*i 

■kHirfVl 
Own n«H< sr DBU'C* lo'ikirfl kcco<jnia 



■ 


•■■■I 




klMUMUt 


r 


■kcai 


■■ STATlMaBt 






f«M4 


MUlflM 




: - .' 


1 


. -' - 








-, 




- . 






Wt ■ 


: " 


i 


— 


^ 



EXPAHDABLI 

Lipand trip nyir^rn nnyUme 
you wiBh MTith ruM> 



SERVICE 

Sotws'f sarvice and 
operationat aaaiilanci 
available und«' two 
ditfar«ni aarvice 
a9'»at>arit« 



THE 

BOOKKEEPER 

SYSTEM" 

For Microcomputers 

The system is a combined General Ledger, 
Accounts Payable, Accounts Receivable. Payroll 
and Budget Forecasting program that follows 
double entry accounting principles with only a 
single entry. 

Wntten in COBOL with on-screen instruc- 
tions, your bookkeeper uses simple, one key 
responses to the computer s questions With 
three 8" floppy data diskettes, Trte Bookkeeper 
can handle up to 3.500 customers, vendors 
and employees on account with 10.000 trans- 
actions per month. 

Add a hard disk and your microcomputer 
has almost unlimited storage 

Contact us today to find out how you can 
own this supenor product. 



We're Writing Programs For People 




UMN^RSN. 

sorrw^Re 

STUDIOS 



UNIVERSAL SOFTWARE STUDIOS. INC. 

179 WEST SMITH ST ." GALLATIN, TN 37066 

TELEPHONE (615) 452-1027 

• TRADE MARK OF THE TANDY COfiP 




■ SMLiilotAav9rti»0(aonpag9 4ie 
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BUSINESS 



•) 



LOAD 80 



If you're overstocked in size 13 wing tips, read on. 



Analytic Inventory Management 



John Harper 
R #f, Sox 252 
Lawrenceburg, IN 47025 



ventory Management by H. weeks, your season is four 



Anyone with the responsibiii- 
ty of Inventory management 
knows the frustration of trying 
to decide tietween profit or in- 
vesting in merchandise. As re- 
taiiers, it is important to provide 
your customers with what they 
want when they want it. As 
businessmen we try to do this 
with as littie inventory as possi- 
bie. Each item ot merchandise 
we carry on our sheives takes 
money from other areas. We are 
constantiy being forced to de- 
cide between alternative uses of 
our available funds. 

This program is a simplified 
version of a concept known as 
Analytical inventory Manage- 
nfient (AIM). The program Is 
designed to calculate eco- 
nomic order quantities, taking 
into consideration a spending 
limit (financial control limit) 
placed on total inventory and 
estimated item demand. 

For a complete explanation 
of this procedure, consult the 
book which was the source for 
many of the formulas used in 

this program— Analytical In- 1 
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Raymond Swenson. 

Program Exscullon 

The first step of the program 
is calculating current inventory 
status, inventory status is 
evaluated in accordance to the 
season. A season is simply 
your ordering period. If you 
place one order every four 



weeks long. 

Each time you place an 
order, you place a Financial 
Control Limit on total inven- 
tory. This program calculates 
the value for each possible 
Financial Control Limit (FCL). 
This particular value in this pro- 
gram is called the Inventory 
Allocation Rate (lAR). For each 



Enter Season as Fraction of Y«»r; .25 
(.25 used during sampla run supplied— you may enter any 
fraction of a yaar.) 
Entw Initial FCL: 700 
(700 dollars u»*d in sample run.) 
Enter Increrrwnt to FCL : 100 
{100 dollars usad with sampla run.) 
Enter Terminal FCL ; 1000 
(1.000 dollars used with sample run.) 
Enter Fixed Costa Per Ofder: 10 
(.10 (10%) used with sample run.) 
Enter Interest Rate : .15 

(.I5(15%)used with sample run at this point, ttte computer 
createa the simulation table.) 
Enter lAfl From Example in TeKt : .1537 
( 1537 used with first sampte run At this point tt>e com- 
puter calculates ecorwmic order quantities and prints 
results.) 

Do You Wish to Run Program With a Different lAR? (Y/N):Y 
(Y (Yea) used with sample run.) 

Enter lAR From Previous Exampte to be AnalYsed 0963 
1.0983 used with second sample run. Al this point the com. 
puter re-calculates economic order quantities using new 
lAR) 

Do You Wish to Run Program With a Difrerant lAR (Y/N):N 
{N (no) used with sample run. At this point the computer 
prints a list of tarma us«d In the tables.) 

Table 1. Sample Program Execution 



dollar limit placed on inventory 
there is a corresponding inven- 
tory allocation rate. 

After the present inventory 
status has been evaluated, the 
simulation portion of the 
analysis begins. As stated 
earlier, each time you prepare 
an order you place a financial 
control limit on inventory. By 
looking at the present inventory 
status calculated above you can 
see what the FCL was for your 
last season. You now get to see 
the probable results of selecting 
alternative financial control 
limits. 

To begin our simulation we 
establish a range of possible in- 
ventory levels. When the com- 
puter instructs you to Enter ini- 
tial FCL you enter the lowest 
dollar value you wish to have 
evaluated. For example, if the 
current FCL equals $5,000. you 
might wish to evaluate inven- 
tory limits from $2,000 to 
$10,000. To do this simply enter 
$2,000 as the initial FCL. 

Next, the computer will ask 
you to Enter Increments to FCL. 
In the $2,000 to $10,000 ex- 
ample, suppose you wish your 
analysis broken down into 
steps of $50 each. To do this 
you enter $50 as the increment 
to FCL. You are now creating a 




Doesyour CP/WorTRS-80* Word Processor need help? 
Aspen Software has the finest document proofreading ttwis available. 



QRAMMATik" 

Beyond Spelling Checking 

Spelling checkers are useful, but Ihey are not enoughl 
Grammatilt can find many errors that a spelling checker can't. 
It detecis many errors cnmmoniy found in text entered on 
computers, such as doubled words ('the the'), inconsistent 
capitalization ("STicky shift key"), incorrect punctuation, and 
others. That's not all! Grammatik also checks your document 
for good writing style using a dictionary of over 500 misused 
phrases as defined in many writer's stvle manuals. It marks 
and cla-vsifics the problems it finds in the document file for 
easy correction with your word processor, and provides sug- 
gestions for correcting the problems. The phrase dictionary 
can be easily extended to include checking for esoteric jargon 
or your own pet peeves. Grammatik also collects other stylistic 
information that can be used to revise the document to im- 
prove its readability such as average sentence and word 
length, h can produce a profile with the number of times each 
unique word in the document was used, helpful for identifying 
overworked vocabulary. Grammatik is not only a valuable 
proofreading (txil, it is also a useful learning tool. You will 
notice significant improvements in your own writing style after 
using Grammatik for only a shon time. Grammatik is fast. 
easy to use. and works with ail popular TRS-80 and CP' M 
word processors. Model 1111 version requires a minimum 
32K. I drive system. Model 11 TRSDOS* version requires 
b4K and 1 drive. CP''M version requires CP/M release 
2,2and48K. 



The Aspen Software Company Spelling Checker. 

Don'l buy a spelling checker until you've considered Proof- 
reader. Recently, several ads for other spelling checkers have 
compared themselves to "others'. They weren't comparing 
themselves to Proofreader! Prix>freader has all the features 
you need for checking your documents for spelling errors and 
typos. Proofreader looks up every word in its 38.000 word 
dictionary, and does not increase its "vocabulary" by using 
less accurate root word analysis like some others do. You 
won't need lo spend as much lime adding new words as you 
would with a smaller dictionary. Pro<.>freader is easy to use -- 
you can start checking your documents immediately. Proof- 
reader is fast -- it can check even your largest document (20 
pages or more) in less than 5 minutes! Unknown words are 
listed on the screen, and can be saved in a file for later 
manipulation. The Proof-Edit feature (optional on the Model 
1 !II version, included with Model 11 and CP'M) allows you to 
interactively correct the unknown words in context. New 
words can easily be added to ihe dictionary, and expansion is 
limited only by disk capacity. Proofreader works with all 
TRS-80 operating systems and word processors, so if you 
change svslems, vou won't need a new spelling checker. On 
the TRS-SO Model 1 111. only 32K RAM and 1 disk drive are 
needed. Pnxjfreader also works with all popular CP- M word 
prtx:essors. Add up the facts and the low price, and you will 
conclude thai Proofreader is Ihe best value available in 
spelling checkers. 



■\spfn Software programs are professional quality, reliable software 
iiiols developed for Ihe TRS-80 and CP M by a Ph.D. in Compuler 
Science Ail software i& protected by Aspen Softwares low cost 
upgrade privilege for new versions. Olher tools include: 

— SOFT-SCRKtN'". a powerful, state of the an full screen leit 
editor. Over a vear in development. Soft-Screen is compatible *ii)i 
all TRS-80 programming languages, including BASIC, FORTRAN, 
MACRO. Ratfor, and COBOL, Commands are easy lo learn, yei 
vervatile and complete to salisfv the most experienced user. Soft- 
Screen is also available for P&T Model II CP/M, 

— SOFT-TEXT'". Aspen Software's text formafler When used 
*irh Soft-.Scrccn, provides a powerful word processing system. Full 
fi-jturcd. mcludmg auiomaik paginaium, even and odd page 
headmgs. underlining, index generation, footnotes, suppon for 



advanced primer capabilities, and much more. Model |/HI version 
supports serial printers at full speed. Soft-Teit offers a real alter- 
native for Model II TRSDOS users. Please write or call for 
more details 

— RAfFOR, a structured language preprocessor fur Fortran de- 
veloped at Bell Labs, Aspen Software Ratfor is one of the best 
versions available, and the only one with a preliy printer option. 
Totally compatible with Microsoft F80, Includes several extensions, 
includini^ 'ca\c", "string", and conditional :;ompilalion. User's 
manual contains all informalion needed lo learn and write Ratfor 
programs. Requires FORTRAN, 

— PP-RATFOR. a pretty pnnter. Auiomatically formats and 
indents Aspen Software Ratfor source programs. An essential 
program development tool. 





Model 1 


Model II 
(64k, Id) 


Model III 


CP/M 

(2.2.48k) 


MmiiuI only 


Proofreader 
Proof- Edit 
Grammatik 


S54.00t32kld) 

$30.00 

S59.00(32kld) 


$119.00 

incl. 

$99.00 


$64.00(32kld) 

$30.00 

$S9.00(32kld) 


$129.00 

tDcl. 

$149.00 


$8.00 

ind. 

S8.00 


Soft- Screen 
Soft -Text 
both 


S4t9.00(48kld| 
$69.00(48kld) 
$129.00 


$99.00 

$99.00 
$179.00 


$75.00(4«kld) 
S7S.00(48kld) 
$139.00 


$99.00(P&T) 
$99.00 
$179.00 


SI5.00 

$15.00 
$25.00 


Ratfor 
PP-Ratfor 
both 


S49.00(48k2d) 
$30.00(48k2d) 
$74.00|48k2d) 


$99.00 

$49.00 

$139.00 


$S9.00(48kld) 

$34.00 

$84.00 


$99.00 

$49.00 

$139.00 


$15.00 



IMPORTANT i Specify compoter model, opentlng §>§teDi, memory size, and number of drive* when ordering! For CP/M, 
eorrently only 8 single density CP/M versionH available. Please inqolre about other CP/M diak formaU. AU TRS-80 ver- 
sions available. Manual only orders can be applied to final pnrchnae. CP/M prices are intioductory. 

Orders sent postpaid by first class mail. Terma: Cash, check, money order, VISA, or Maater Card, NM realdcoU add 4% tai. 

Proofreader, Grammatik, Soft-Screen, and Soft-Text are tiadenuuks of Aspen Software. 

**trademark of Digital Research *trademark of Tandy Corp. 

^^ P.O. Box 339 -M Tljeras, NM 87059 (505) 281-1634 ""^ 



'See List of Advenisefs on page 418 
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simulation table starting at 
$2,000 and increasing in steps 
of $50. 

Next, the computer will ask 
you to Enter terminal FCL. This 
is simply the highest FCL you 
wish to evaluate. In the above 
example this would be $10,000. 
Thus you begin at $2,000, in- 
crease by steps of $50, and end 
at $10,000. This gives you a 
wide range of alternative inven- 
tory levels to choose from. 

There are two final pieces of 
information you must supply 
the computer before you begin 
your simulation. These are 
"fixed costs per order" and "in- 
terest rate". Fixed costs per 
order are costs such as freight 
which must be paid each time 
you order merchandise. This 
value must be entered as a per- 
cent of the total order. If your 
order is for $100 and the fixed 
costs are $10 then you enter .10 
{1 per cent) as your fixed costs 
per order. 

The final entry, interest rate, 
is simply the rate you pay on 
the money used for merchan- 



dise, if you are paying 15 per- 
cent interest, then you enter .15 
as your interest rate. 

The computer now simulates 
the results of selecting the 
various FCLs within the range 
you selected alxive. To do this 
the computer calculates the 
following values for each FCL; 

• Inventory Allocation Rate 
(lAR) 

• Turnover Rate (TN) 

• Ordering Cost (OC) 

• Carrying Cost (CC) 

• Total Cost (TC) 

• Average Inventory (AVE) 
Ideally you wish to minimize 

total cost. To do this you must 
select the FCL associated with 
the lowest total cost calculated 
in your simulation table. If this 
results in an FCL which is too 
high to fit your budget, you will 
have to picit an FCL you can af- 
ford. Whatever the motivation 
behind your choice, you must 
select an FCL from the simula- 
tion table before you can con- 
tinue on to the next step. After 
you select the FCL, read the In- 
ventory Allocation Rate (lAR) 



Convert your TRS-80 Model I orlll into a 

DEVELOPMENT SYSTEM 

Nov. you can oeveloo Z-BO Das*0 siAnd a.une c)evK.es ^^>c^ as gafT>*s roDols 
irisl'ume"isandpetiprierjicoiiir()iieri bvusff>g>«j' T<4S-e&asade.eiai)n>enisysieo^ 
Tit DEVfcLQPMATt pl;.qs mlo ine p.parsw" co"'ibcIo' ot your THS ftO antl aaos 
pnOM raOOfUMMNO ana IN^mCUrr-IINfLATIOH c^dD.I<[.«s 10 your 
system nvimo'txiiriouleKpansiofiinleflacei 

Compiew mstructons mti umpta tcTwrnaOcs aie ■nOodeO lo he*) you Oesign yow 
own sanple stvtf-akxie mKTOcomputer syswma. THESE SYSTEMS CAN BE AS 
SIMPLE AS FOUR Cs jrt TTL arcuit tor dock and ruM a 2-80. an EPPOM anti 
one petipneial miertace cnip 

When The in-Ci'cuit-Emuiaiion caDte « plugged 
inio [he Z-BO socHei ot you' stand-alone sysler" 
ihe sysiem becomes a pan 0* yoo' TRS er ■ . 
can use Itie lull poiwa' ol you< edilof ' assei ' 
debug and trace ptograms to checKooi tj-ju 
narowara ana irv so'iware Siffvim ini ^oop^ 
can De used Id check out Vie haf Avata. IMn the 
system piogiam can Oe mn to debuQ the logK ol 
, 3u' stand alone device 

Since the piogfaii 'S kept m TRS-80 RAM 
cnanges can tie made qu'Ckiy and easily When 
y<xii standalone device wortu as desired you 
use ine Deveiopmaie & PROM PFtOGRAMMER 
10 copy the pfogram mlo a PROM Wrth Ihis 
PRiDM and a Z 80 m place ot the emulation 
cable . your stand alone device iMiii «ro(> by itseit 

The DEVELOPMATE is e'tfemeiy compaci Both tne PROM programmof and Ihe 
ln-C«cuilEmulalo« *e m one smal plastic boa orUy 3 2-54 A Ime-piug mounted 
power supply <s mciuded The PROM orogrammar has a personality rnoduW which 
defines Ihe voltages and co"n*ct«n» ot the PHOM so that lutiae devices can be 
accommodated Mowever ilio system comes w** a unrversal persof\ality nxxlute 
which handles 27Se.2508i8Ki. 2716 25161 t6K).2532(32*( I as weH as the ne* eiec 
tncaliy alteraCle 2816 and 480161 16K EEPPOMsi 

The COMPLETE DEVELOPMATE Bt *ilh software, po«e' supply emulation 
cab* TflSflTi-aOie jnd jnivetsai oersonaiily ■noOu"? isONLVt329' 

please indicate model 1 or mode! 3 version 
ORION INSTRUMENTS 

1 7? OHi Avenue DepI M. WooOS-Oe CA9406? 

i4t5.a5t ;'72 

Master enlarge and Visa pnooe order; accepted 

Calitornia resKlents please add 6*« sales ta> 
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which is in the same row of the 
table as the FCL. This lAR is the 
implied cost of money asso- 
ciated with your chosen FCL. 

The computer will now in- 
struct you to Enter I AR selected 
from the above table. After you 
enter the lAR, the computerwill 
calculate the unit ordering 
quantities (Economic Ordering 
Quantity) for each item, as well 
as the cost and turnover 
associated with each one. 
These results are designed to 
represent a compromise be- 
tween unit demand and avail- 
able funds. Neither demand nor 
money has the upper hand in 
determining order quantities- 
Depending upon the lAR you 
select, the computer may ad- 
vise you to order less units than 



you might expect to sell or it 
may advise you to spend more 
money than you had hoped to. 
When this step is completed 
you have the option of redoing 
this step using a different lAR. 
The computer will ask: "Do you 
wish to run program with a dif- 
ferent lAR (Y/N)?" If you wish to 
repeat this step the computer 
will instruct you to enter a dif- 
ferent lAR from the simulation 
table. The computer will in turn 
re-calculate the economic 
order quantities. Remember 
when you select an !AR you 
must also select the corres- 
ponding FCL. 

AIM Notes 

To use AIM, you must supply 
your own inventory data. Data 



Program Listing 



CA CONTAINS CATAUW NUMBERS 

C CONTAINS UNIT COST 

Q CONTAINS PRESENT 'ON HAND' QUANTITY 

I CONTAINS 'ON HAND' LAST INVENTORY 

R CONTAINS RETAIL PRICE 

O CONTAINS UNITE RECEIVED THIS SEASON 

PRESENT INVENTORY STATLS ' 



IB CLS 

21 REH • HEAD DATA FROM DISK * 

39 DIM 0(5BB) ,CA15flBl ,C(5«B1 ,015B8) ,II5Bei ,R{5BB) 

*t INPUT "PLACE DISK CONTAINING DATA (INV) IN DKIVf:--PRESS ENTER 

■iA5 

5B OPEN •1",1,"INV" 

£B X-I 

7B INPUTtl, CAUl,ClX),0(>;),I()t),H()(),0(Xl 

BB IF CA[X)=B GOTO IBB 

9t X'X-*1:G0T0 7B 

IBB CLOSE 

IIB X'X-1 

121 REM 

13B REM 

H9 RQi 

ISB HEM 

ISB RQt 

17B RQ4 

IBB REX 

190 CLS 

IBB VAR-B:CGE'e:AVI-B:VR'B 

2ie FOR A=l TO X 

22B 0C=0(A)'C(A1 ♦OC 

23B VAR<'(Q(A|/2)'t (A1-*VAR 

24B CGS=((I(A1+0(A) i-OlAl) 'C(A)*CGS 

25B AVI-C|A)'[01Al/2j-'AVI 

266 VR=(C(A) -OlA) } [2 * VK 

27B NEXT 

280 TV-=CGS/AVI 

29B VR-(1/12) 'VR 

3Be STD=S0R(VR1 

3ie FCL-AVI*11,64*STD) 

320 CLSilT-VAR 

33B LPRI\"T TAB(lb); "STATISTICAL SUHHAKY OF PRESENT INVENTORY ST 

ATUS" 

3 40 LPRINT TAD(15) ,■••■••■•••••"••••■•'•••••••'••••••••••••••*• 

35B fOHJK-1 TO SsLPRINT CHRSIIB);' "iNEXT 

36B LPRIKT''T0TAL PRESENT INVENTORY VALUE" i TAB( 40) ; TT 

370 LPR1NT"D0LLAR AMOUNT ORDERED LAST SEASON" ; TAB[ 40] j OC 

3BB LPRINT "TURNOVER RATE" ; TAB ( 4B ] ; TV 

39B LPHINT"VAPIAHCE";TAD(4D1 ;VW 

4BB LPRINT'STANDARD DEVI ATION" ; TAB ( 4B ); STD 

41B LPBINT-FINANCIAL CONTROL LIMIT ( 95%) " ;TABl 40) ; FCL 

42B REM • GENERATION OF SIMULATION TABLE BY VARYING FCL • 

43B INPUT'ENTEK SEASOti AS FRACTION OF YEAR (1/4 YEAH -.25)";SE 

44B CLS 

450 INPUT'ENTER INITIAL FCL "iFl 

460 INPUT"ENTER INCREMENT TO FCL " ; IM 

470 INPUT-ENTER TERMINAL FtL";F2 

4B0 INPUT"ENTER FIXED COST PER ORDER (ORDERING COST, FREIGHT, ETC 

.1 AS A PERCENT OF TOTAL CNIT COST)";F 

49B INPUT'ENTER INTEREST RATE AS A I OF TOTAL INVENTORY' ; IE 

50B FOR XI -=1 TO 1B:LPRINT CHRE(131;" "iNEXT 

510 LPRINT TAB[15) ["FINANCIAL CONTROL LIMIT SIMULATION TABLE" 

52B LPRINT TAB( 151 ;""••**••*•••**•«••«••• '••«••••■••■•••••*■ 

530 FOR XI-1 TO 4:LPRINT CHBSI131;" ";NEXT 

540 CLS 

558 LPRINT TAB( 2) j "I AR " ; TAB ( 111 ; "TK" ;TAB( 2B) j "OC" .-TABC 28) ; "CC" jT 

AB(38) ;'TC';TAB[491 ;"AVE";TAB(5B) "FCL" 

S6B LPRINT CHRSCSl ;" " 

57B J'fliK-B 

560 FOR A-1 TO X 

5 9B K-1C(A1 *HI[A)*0(A| )-0(A) 1 -f(F*C(A) 1/SE) -*K 

6BB J'SOR(C(A)*( |I(A)-fO(Al 1 -Q( A) ) * (P'C (A) )/SE) *J 

61B NEXT 

620 K-SORU) 

63B FOR A-Fl TO F2 STEP IH 

64B V^A 

656 I-|l/(V|I)l*l||.7B71*J)-fl|1.64V2.449)*f;) j 121 

Program conlmuts 



Is read from disk in lines 

4O-100. Unes 120-170 explain 

what each array contains. Unit 
demand is calculated by the 
number of units sold last 
season. If you have a more ad- 
vanced method of estimating 
unit demand you can calculate 
demand any way you like and 
store this data in array I. If you 
do this you will have to set array 
O equal to array Q. In other 
words, arrays O and Q will both 
(x>ntain your present quantities 
and array I will have your cal- 
culated demand quantities. 
You should also delete lines 
220 and 370 as these values will 
now be meaningless. 

Rnanclal Control UmH (FCL) 

The FCL Is not an absolute 



limit. It represents a 95 percent 
probability limit used in con- 
junction with unit demand, 
ordering cost and carrying cost 
to arrive at a compromise order 
quantity. The actual dollar 
amount of the order will exceed 
the FCL 

This program is not intended 
as an absolute ordering policy. 
It Is an aid to be used In 
evaluating your present order- 
ing policy or as a means of 
evaluating alternative ordering 
practices. Do not accept the 
recommended ordering quan- 
tities as fact. Remember, they 
are based on the lAR you select 
and on the estimated demand 
for the upcoming season. 
These two Items are by nature 
extremely variable. ■ 



Program continual 

661 U-[S0RI21/(2"SQ»(I))1«J 

67 i T-CGS/C 

681 0C-l:TC'ri:CC-t:(W=i:01-t 

691 FOR B°l TO X 

711 D-I[B)+OIB1-OIBI 

711 00-SQR((l2»0*[r*C|Bm/|CIB)»l«SBHl 

721 TC-l(D*lF*C(B))l/0O)tTC 

731 CC-{(Q0*C(B)*IE*SE1/21*CC 

74B Ql-Ol+QU 

75fl NEXT B 

76i QU-Ql 

779 TT-TC+CC 

7aB AS-'*t.llll' 

791 B$--|ttl.ltlt-iCS^'t(ll.ll*iD$-*llllll*.t|-ie$°*tllllll.lf 

eti FS-*lt 11(11. ■|-:GS°-tllll(.tf 

«1§ LPRIm' USIMC ASiIriLPRIWT USIBC Bf iT| iLPRItTT USING CSlTCjiLP 

BIKT USIKC DSjCCnLPBIHT USING ES)TTj t LPRIIIT USIMC FS;Us i LPRIirro 

SIMG CfiA 

B2I OU-l:TC-aiCC-a 

B3I NEXT h 

S4e AS--tlltltlCiBS^'tt*t**iC$=:-lttlCiD$--|t4*tltt.tfiE$--tlt 

»tl.(t':FS='t#tMttl.tt-:CS-'l»tt.tlll' 

Bb9 FOR JK-1 TO lesLPRINT CHBS(13)i" " : (JEXT 

860 IllPUT-ENTER lAH FROM PREVIOUS TABLE TO BE ANALYSED" | I 

fl7B LPBIKT TAB(ll) ;"ORDEBI(«; POLICY KITH SELECTED IHVEHTORY ALLO 

CATION RATE" 

SBB LPRIHT TABim (■••■•»••••*"••••••**••■••■••••••••••••••**** 

891 FOR X1=I TO 2iLPRIIfT CIIRS(13)i" 'iMEXT 

910 I.PRIKTCBRSII7] ;CHR$(14| )'IAR - "jl 

911 POR X1=I TO 2iLPRIIfT CHRSI13};* 'iKEXT 

92f LPRINT* CAT.-;TABI121;-D-,TAB(1«) j-EOQ"lTA8l27)("OC-jTAB{ 

35),"CC-,TAB(46J i -TC-iTABt 55) , "TN" 

939 LPRIHT CHBSdS) j" " 

940 CLS 
95B CLS 

96H SOC-I:SCC>l:STC''S:E0-ff 

971 FOR A-1 TO X 

9B1 D-I(A)-K)(A)-<}IA] 

99« EO0-50R{[I*D*(F"C{A|)l/<C{A|*I*Sen 

l>ei ND-Q(A1*C{A1 

llli OC-lD'(F*C(A) ))/EO0 

li2l CC-(E0Q»CIA>*IE'SE)/2 

1I3I TC-OC»CC 

lB4f SOC-OC+SOCiSCC=CC+SCCiSTC=TCtSTC 

1959 E0-EOQ*C(A)*E0 

1069 TN-D/(E0Q/2) 

1070 LPRINT USING AS;CA(A) | t LPRINT USING B5;a!iLPRINT USING C?;E 
OQ;iLPRINT USING DS jOC j :LPRINT USING ES;CC; : LPRINT USING FSjTC;: 
LPRINT USING CSlTH 

IVHi NEXT 

H9t LPRIKT TAB(23)- ■|TAB(33r ■;TAB143I- " 

111! LPBIMT aiRS{271 jCHRJ{14),-SUI|-,Cai«S(27);CHIlS1151,TAB(33)jSO 

CiTAB(J3l (SCC:TAS(43) jSTC 

llli LPRIMT'TOTAL DOLLAI) AHOUHT Of OKDER = *,tO 

1121 INPUT "DO YOU WISH TO RUM PROGRAM HITH A DIFPERQtT lAR (Y/H 

1 7- IBS 

1130 CLS 

1140 IF MS-"¥" GOTO 84B 

1150 FOR JK=1 TO 10:LPRINT CHHS(13)i" "iNEXT 

1160 LPBIHT CHRS(27);CHRS(14) |TAB(191-L1ST OF TERMS* 

1170 FOR JX=1 TO 2iLPHIlFr CHRS{13)|' "iNEXT 

lies LPRItlT*IAR — IHVEHTORY ALLOCATION BATE" 

1191 LPRIWT'TM TORHOVER- 

12Bi LPRIHT'OC — OaDERING COST" 

1210 LPRIHT'CC CARRTIMC COST" 

1220 LPRIMT'TC TOTAL COST" 

1230 LPRINT'AVE — - AVERAGE INVENTORY" 

1240 LPRIKT"FCL -— FINANCIAL CONTROL LIHIT" 

1250 LPRIKT"CAT -— CATALOG NUMBER" 

1260 LPRINT-D — DEMAND" 

1270 LPBIKT-EOQ — ECONOMIC ORDER QUANTITY" 

12fl0 FOB JX-1 TO IBiLPBINT CHfiSUJll" "iNEXT 



DEALER 



Lim_ited_ UbALbJl Noi'ce 

Join the FASTest growing list of 
distributors to offer the BEST software 
available for the RADIO SHACK Model I, 
Model HI, and color computers. 







STURDY RETAIL PACKAGING 
QUANTITY DISCOUNTS 

THE BERG WORKS 

Box 742H, Janesvllle, Wi. 53545 
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FEATURES: 



1) Radtc Shack compatibility 

2) Error Iree variable )engtti records 

3) Full lowei case detection and support 

4) Repeabng keyboard with ^0 keybounce EVER 

5) Shift [0; typewriter keyboartJ option 

6) Execute only protection feature tor 8ASIC programs 

7) Automatic track support for 36 througri 80 track drives (mixed) 

8) Device I/O handling with FORCE command 

9) Supports high speed clock modification (up to 4.0mlizi 

10) Supports mixed mode ismgle & double density! aulomalically 

11) Allows disable-enable of break key 

12) Allows user to define step rate per drive and re-configure system disk 

13) Allows tot efficient use of double-headed drives 

14) Built in screen printer ishift (CLEARj, with [BREAK] key abort 

15) Multiple command chaining with DO * 

16) Built in memory test wrth CLEAR command 

17) New printer driver which allows complete forms control and paging 

18) Automatic senai printer driver with optional auto linefeed 

19) Execute any DOS command from BASIC and return to BASIC 

20) Free space map of diskette with optional output to printer 
2t) Copy with variable length files 

22) Complete RS232 control trom keyboard with status check 

23) Create and pre-allocale files from DOS 

24) Display current dale and lime trom DOS 

25) More information from Directory with optional printer output 

26) Enter DEBUG with shift [BREAK] lo allow use of [BREAK] from BASIC 

27) New DISKDUMP'CMD sector display /modify program iworks with liiespecs) 

28) New DISK2AP'CI»fD singie/double density disk editor 

29) New BACKUP imore reliable, no more pack ID check] 

30) New FORMAT (more reliable, no need to bulk erase disk firsti 
31| New MAP uiility (maps out disK, stiowing where files are located) 

New DOSPLUS Z80 Extended Disk BASIC 

1) Faster loads and saves 

2) BASIC Reference utility (Imes variables, keywords, printer option) 

3) BASIC Renumber utility (fenumber section ol text, block text move) 

4) Shorthand features for almost ANY direct command (LOAD SAVE, etc ) 

5) Shorthand leatures tor editing ilislmg and editing with single keyi 

6) CMD M instantly displays currently set variables 

7) Global search and replace in BASIC text 
B) Line printer TAB to 255 

9) OPEN E' lo end of sequential file ifor output) 

10) Dl (delete and insert text line) 

11) DU iduplicale text imei 

12) R' & .V options after LOAD and HUN ifiles open & save variables) 

13) OPEN D allowed iModel II compatiblei equal to OPEN R" 

14) DOS commands trom BASIC 

15) Automatic error-free variable length records 

16) Single step execution with IRON (tabulous for debugging) 

17) CRUNCH (BASIC program compressor) 

18) New IBASIC itiny BASIC) offers full BASIC commands 

19) TBASIC and DOSPLUS logelher only useSK of RAM |40K left in 48K TRS-80) 



7 MORE UTILITIES 

1) Single drive copy 

2) Restore (dead files) 

3) Purge (unwanted tiles) 

4) Clearfile (destroys data by writing zeros to hle| 

5) Transfer i moves all user hies from one disk to anottier) 

6) Spooler lallows printing of text while treeing up the CPU) 

7) Cruncti (Basic program compressor) 



ALSO 



DOSPLUS gives you more of what you buy an opera- 
ting system for. Speed and reliability without sacrificing 
simplicity and power. If you need extra power without 
extra wait, then you need DOSPLUS! 

Single or double density systems available for Model I. 
Model III DOSPLUS ready for immediate delivery. 

Perhaps the best investment you can make for your 
TRS-80! Listen to what others have had to say about 
DOSPLUS. 

"Overall, DOSPLUS is the fastest operating system 
I have seen..." 

Pete Carr in 80- US Journal. 

"DOSPLUS. ..the better mousetrap." 

Stewart Fason in 80- Microcomputing 

"On a scale of 1 to 10, 1 give DOSPLUS a solid 9." 

Reese Fowler in 80-Microcomputing 
(Model III DOSP LUS review) 

For the BASIC programmer, our features are un- 
matched. For the average businessman, our speed and 
simplicity cannot be beat. 

So, pin the satisfied users who have joined DOSPLUS. 
Experience excellence! Experience DOSPLUS! 

DOSPLUS comes complete with full utilities, PLUS 
a FREE patch to enable Model I Scripsit/ Super 
Script to run on Model ill, UNLIMITED Backups! 



Model I DOSPLUS — '99'' 

Model III DOSPLUS — '99'' 

Model I double density upgrade — M75" 

Master Directory 1.2 (double density) — *29' 



New I/O package 30% faster 

No BREAK key death from DOS 

No closing killed files and ruining diskettes 



STEP ON THOSE 

DOS BUGS!! 
ORDER TODAY!! 





Specializing in the Tandy Line 
(305) 983-3390 




5846 Funston Street 
Hollywood. FL 33023 



CALL TOLL FREE FOR FAST SERVICE 

<800)824-78Be, OPERATOR 193 

FOR VISA/MASTERCHARGE/C O D. ORDERS 

California dial (800) 852-7777 Opefatoc 193 
Alaska aru] Hawaii dial 1800} S24'791 9 Operalor 193 
TOLL FREE LINES WILL ACCEPT ORDERS ONLV1 

Fo' Appticaiions arw Technical intormairon call 
(305) 983-3390 o( dfop us a card 



Dealers ir>guirtes mvited 




Dosplus 3.4 upgrades will be available for all registered and/or legitimate 
owner's of Dosplus 3.3 or 3.38 starting January 1 st, 1 982 

Those owner's who have sent in registration cards will receive a letter telling them of the upgrade. 
Those owner's who did not receive a registration card must use the following procedure if they do not receive 

an upgrade letter by January the 1 5th. 

1. Send in proof of purchase. 

and 
Your master Dosplus diskette. 

2. Send in the upgrade fee. 
Registered owner's will only be required to send in the upgrade fee. 

The upgrade fee will be $25., and will include a new diskette, AND the new expanded manual. The Dosplus 3.4 
manual also includes a new technical section that has complete I/O calls and DCB organizations. 



M-ZAL Disk Assembler 

THE FINEST MACHINE LANGUAGE DEVELOPMENT PACKAGE MONEY CAN BUY. 

A complete development package for the machine language programmer. 
Novice and experienced programmer alike will recognize the superior features of this excellent package. 

The heart of the system is CAU's M-ZAL disk assembler. 
This includes: 

1 . A full screen text editor. 

2. A super fast assembler with optical relocatable code. 

3. A linking loader for use with this relocatable code. 

Retail price on the M-ZAL package is $149.00, and is available Model I (single or double density) and Model III. 



More programming power than you will find 

ANYWHERE ELSE IN THE WORLD 
Demand will be high so order yours today! 




specializing in the Tarxfy Line 
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(305)983-3390 



5846 Funston Street 
Hollywood. FL 33023 



CALL TOLL FREE FOR FAST SERVK:e 

(800) 824-7888, OPERATOR 193 

FOR VtSA/HASTERCHARGE/C.O.D. ORDERS 

Cahfomia dial (800) 352 7777. Operator 1 93 
Alaska arMl Hawaii dial (800) 824-7919, Operator 193 
TOLL free LINES WILL ACCEPT ORDERS ONLY! 

For Applications and Technical information, caH 
(305) 983-3390 or drop liS a card 
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Dealers inouines invited 



HARDWARE 



An auto-adjusting speed-up mod for shifty '80 owners. 



Cruise Control 



Ken Walljen 
2311 Lincoln Blvd. 
Tracy, CA 95376 

Dan Placldo 

26286 Peterman Ave. 

Hayward. CA 94545 



Clock modification kits and 
circuits are now common 
place items to most TRS-80 own- 
ers. Some are hardware con- 
trolled by a switch and some are 
software controlled. In both 
cases the operator must inter- 
vene to set the clock rate. 

The circuit in this article pro- 
duces a hardware controlled 
clock that needs no operator in- 
tervention except to set the 
speed' 

Why is it necessary to have a 
form of control? With a very 
simple change, your TRS-80 
can be running at 2.66 MHz in- 
stead of the standard 1.77MHz. 

This modification will give 
your TRS-80 an automatic 
transmission! If the disk is in 



use or the cassette is In use, 
shift to low speed. There may 
be a gate that can do your job. 

The schematic in Fig. 1 is the 
complete automatic transmis- 
sion modification. One of two 
clock signals is routed through 
IC2 to the clock input of the 
Z-60 central processing unit 
(CPU). The signal called SC 
(slow clock) is the normal 1.77 
MHz clock of the TRS-80. FC is 
the raw clock divided by four to 
produce 2.66 MHz. or a 50 per 
cent increase in speed. ICtb is 
the control flip-flop that deter- 
mines whether the SC or FC 
signal Is the one in use. This 
selection is based on the data 
input to IC1 b. If the disk motor 
is running or the cassette latch 
is closed, pin 1 of IC2a will go 
low. At clock time IC1b will go 
to the reset state enabling the 
SC signal. The rest of the time 
IC1b is set and FC is enabled. 

Because of the frequency 
and phase differences of FC 
and SC, switching must be ac- 
complished at the right time. 
IC1a divides the SC signal by 
two and. on Its positive phase 
edge, signals a valid switching 
time. For most machines this 
proves adequate. 



Take a look at the timing 
diagram In Fig. 2. As drawn 
(look at point A) IC1b-Q be- 
comes positive in just the right 
place. Switching here causes 
an instantaneous speed of 3.55 
MHz when changing from slow 
to fast. All ZaOs in my expe 
rience can sustain this rate 
for one system clock. However, 
the phase of IC1 is determined 
by power-up conditions. If the 
phase of ICla were shifted 
(only 180 degrees is possible) 
the switching time would be 
wrong. The phase of IC1a in re- 
lationship to SC and FC de- 
termines the correct switch 
time. In most cases this phase 
control or sync is not a problem. 

The cure for this malady is 
another flip-flop that can 
detect and correct the out-of- 
sync condition. The sync flop 
(1C3) is enabled only during the 
positive half cycle of SC. If FC 
goes true during this period, 
ICla should be in the reset 
state. The Q-not output of IC3 
goes true (low) during this time 
and resets ICla if it is in the 
wrong state. Again, IC3 is not 
necessat7 in most cases: it is 
just insurance and a good 
design practice. 



The circuitry can be imple- 
mented in almost any fashion 
but, remember, you are dealing 
with high frequency signalsl 
Wires should be kept as short as 
possible to eliminate inter- 
ference and stray capacitance. 
The resulting circuit should be 
mounted as close to the low- 
er right corner of the CPU board 
as possible (near IC43). The sig- 
nal from Z25-5 in the expan- 
sion interface should be car- 
ried by a twisted pair (one and a 
half twists per inch), with an ac- 
companying ground. The 
RG-1 74 shielded cable also 
works very nicely and includes a 
large selection of connectors to 
make separation of the CPU and 
expansion interface simple. For 
installations where there is no 
expansion interface, pin 2 of IC 
2a should be grounded. Alter- 
nately, a switch can be con- 
nected to ground and IC2a-2 for 
a manual override. 

Installation time for this mod- 
ification (including etching a 
circuit board) is about four 
hours. The signal FC originates 
at Z56-12. This is an unused flip- 
flop in the divide by six or 
twelve counter Z56. Clocky2 
from Z43-2 is connected to 
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TRS-80® SOFTWARE TRS-80® 



MODEL III SOFTWARE 

26-1563 Scrtpsit I & III $79.00 

26-1566 Visicalc I. $83.00 

26-1567 Visicalc III $83.00 

26-1552 General Ledger $90.00 

26-1553 Inventory Ctl $90.00 

26-1556 Payroll $180.00 

26-1555 Accts. Receivable $135.00 

26-1554 Accts. Payable $135.00 

26-1558 Bus. Mail List $90.00 

26-2201 Fortron I $90.00 

26-1562 Profile $72.00 

Plus many more 

COLOR SOFTWARE 

26-3050 Chess $36.00 

26-3051 Quaser $36.00 

26-3052 Pinboll $27.00 

26-3053 Football $36.00 

26-3055 Checkers $27.00 

26-3057 Dino Wars $36.00 

26-3059 Backgammon $27.00 

26-3152 Typing Tutor $27.00 








II 

■■■ 




■ 




iz 1 ■ ^ 




I ' I 




iiii 



.V.V.'- VCC.v.it .. 



MODEL II SOFTWARE 

26-4530 Scnpsil II $265.00 

26-451 1 Visicolc 11 $265.00 

26-4512 Profile II $162.00 

26-4501 Generoi Ledger $180.00 

26-4502 Inventory Mgmt $180.00 

26-4503 Payroll $360.00 

26 4504 Accts Receivable $270.00 

26-4505 Accts Poyoble $270.00 

26-4507 Moil List II $108.00 

26-4701 Fortran $270.00 

26-4703 Cobol $270.00 

Plus many more 

POCKET SOFTWARE 

26-3510 Real Estate $22.50 

26-3511 Civil Eng $22.50 

26-3513 Aviation $22.50 

26-3516 Bus. Statistics $18.00 

26-3517 Bus. Financial $18.00 

26-3518 Per. Financial $18.00 

26-3514 Math Drill $13.50 

26-3515 Gomes $13.50 



ORDER TOLL FREE 1-800-84 1-0860 

CALL US - SAVE MONEY 

We carry the full line of TRS-80 Computers. All TRS-80 software, 
furniture, and accessories sold at discount. We stock most items to 
assure you fast delivery and save you money. 

WRITE FOR FREE CATALOG 



iiliCHQ iriflWflEEHIEI^T BVSTEMS, JftlC. 



No Taxes on Out Of 
State Shipments 



Immediate Shipment 
From Stock on Most Items 



DOWNTOWN PLAZA SHOPPING CENTER 

DEPT. * 4A 
115 C. SECOND AVE. S.W. 

CAIRO. GEORGIA 31728 ''"^ 
(912) 377-7120 Ga. Phone No. 

T«S-M ti r*(i*t*ra4 traJa— rt of Itw Tandy Carp. 



Thousands of 
Satisfied Customers 



VISA And 
Mastercharge Welcomed 



^S»e List of Adyartistrs on page 418 
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Z56-14 to provide the clock/4 the output of the automatic connection to Z29-5 In the ex- expansion interface, opening 

needed by FC. The trace run- transmission Is connected to panslon interface is the disk this circuit will force the clock 

ning from Z56-8 to Z72-12 must Z72-12. The signal cassette motor on signal. If a connector to the slow speed. This may be 

be cut. Z56-fl provides SC, and latch is made to Z59-10. The is used In the connection to the helpful for testing. ■ 



DISK MOTOR ON. 
E/I Z29-5 
V 



CASS. 
LATCH. 
Z59-I0> 



13 CLK. OUT 
,2,ZZd>>->T0 

Z72-I2 




ZI.3 =74LS74, LOW-POWER. DUAL D FLIPFLOP 
Z2=74LS02. LOW-POWER QUAD 2-INPUT NOR GATES 
ALL IC's.= Vcc TO PIN 14, GND TO PIN 7 



Fig. 1. 



SYS. CLK 



CLK-2 __[ 



CPU CLK 
(SO 



(F.c.) _r 



23 Q 
SYNC 



CHANGE _ 

Zl Q CLK 



CLK OUT_J 
Z2(l-i3 



T__r~L_r 



3.55 



FAST TO SLOW 



SLOW TO FAST 



Ffg. 2. 
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NEED A PRINTER? 

UPT0 25°o DISCOUNTS! — SAME day shipment! 



CENTRONICS 739 

With Graphtcs and 

Word Procesamg Print Quahty 

* 18 s s dot fnathx; tmtabtt 'or wore 
proc«M4»0 * Undedmlng • p<opofi>on«i 
•pacing • figM ntargm juttifiorKin • Mfif 
WD«<«C« • 8CV too CPS ' B^ ' Pin 
t-eM'FrictiOr f*M • fWvtTM ^t*n « 
a(yi32 colunwi • Top ot form 

CCNTRONtCSras-iiPirAitcO [Usi $955 1725 

CeNTnOM»CS73»-3<S«rial) . (Li*l«10A9t ISIft 

GRAPPLCR^^ Applti()(iE '-•csmlarfaea ti66 



ANADEX 





ANADEX »M)1 



QRAPPLER'^"*rrIeQfiP'^'Ct'riaf*«ce 



Dot Qraphics. Wide Carriage 



• 11 K 9 act rnatf's. lower caw (tatcarv 
(>w« • Dot raaoiutior graphtcs • Bt^ 
duacitonal. loQ'C aaaMng • Up to 300 
CPS • R8 232 S«(>al i Paralial • Forma 
control • X-ON^XOFF • up lo ft pan 
copy. 

(LnltiMO) fCall 

% tB5 



C. ITOH STARWRITER 

Daisy Whaat Letter Quality 



• 2* CPS tOpliOfvai 45 CPS) " T)fp»*f.ief 
Qualify • Cer>iron>cs paniilai • RS 232 
SattaJ tOpiicrni • Proportional spaoro • 
Bidlrccdorai • PrograTmabla VFU • Sail 
laai • Diablo coripaiUXa • Friction 'ead 
tOtKtoful Iracloral • i3e prtnnbl* column 

• Manutaciurad by TEC 




CrrOH STARWRITER 



iU»t$i895i 11525 





IDS PAPER TIGERS 

Dot Hesoiutton Graphics. 
quality print, speea 

S wira printraad 
t460| wtth towar caaa deacendara • Ovar 
ISO CPS • t)i<lirerl>orul. logic aaahirtg 
■ 6 character st/as. 00-132 cotufr^ns 
■ Ad|u9Ubl« tracton • High-'asoiutKK) doi 
graphics • Proportional waong & leil 
|u9l'<K:«tior 

tOS 4S0Q 9 «>re pnntMaa. grap^tc■ <Lt»l $1004} tCail 

IDS saOGwidacarrlao*. graphics lLI»t$i304} tCall 

aRAPPlEH"'*AD.'>i<'{)f»plcMriedaoa . , * 'W 

CALL FOR INFORMATION & CATALOG 

(800) 854-8275 

CA,AK, HI (714) 630-3322 

RETAIL PRINTER STORES: 

Stora#i 31ME LaPaima, •!, AnaWm. CA (7i4)6M-362S 
Slor»«? 13604 VerlurdBl Shermar OaKS, CA [2t3}S0134W 
Store Hours MFia6Sat lO-4 




EPSON MX80/MX70/MX100 



Low-Pricad 

Professional Pnnt Quality 

• 9 x9(tot matrix • Lowar caaa daacanoara 
b> 'SO Cn ■ Bidirectional. Logic ataklng • 
40 66. BO, 1 39 cotumns par (ma 'M special 
graphic ctiaractart: TRS-60 Connpatibia • 
Forms handling • Multl pass printing • Ad- 
JuataMa tracton 

At aJso caffY u in'i '<ne 
of Fpcon Acrasiron^s 

EPSONMX»QiS,MXB0FT> (ListS645) SCaM 

EPSON MX70Dolgrwhloa,5x7malrii (List S450I (Call 

EPSON MX100 (ildacarftaoa . graohics (UatSMSI tCaM 

CRAPPLER'^AppleGraphicaiMerfaca « 166 

ORAFTRAXaO-MXtODotarapMcft S 96 

MX80/70 FRICTION FEED KIT 

Uaar installable l»t lor sangia sneeis 

Easv 30iT'M]'p iri«,ta'l4lion , , , 5 ?5 



t4e^|:NEC 8023 DOT MATRIX 

Ool graphtcs - tOO CPS • BMtiracttonal logic-see*ing • 
Tractors I friction tead ■ 6-Aiphabel lonts • a charactar tizeft 
• Proporiionol spacing 
KFC «n?n nAT MATRIX ■! ibI i?'^-.t 5 Cj»|I 



NEC SPINWRITER 

High ipeea Leiier Uuudiy 
• 55 CPS • Typa«rriei queiiiv • Bidiracitonal • Ptolitng ■ aro- 
po'tionai spactiii] 

mORO.&enal . (LM$306S) 935T& 

T?V>RO f»ii'»'i»( (tlatiMSS «J57R 




TELEVIDEO CRT'S 

AT DISCOUNT PRICES! 



:.jAh'|i< l>it|i (»•<, «v« < al>ll 



TVI910 

TVI9 

TVI 9MC 



12C ) PtaaatCaiiToiiFtaa 
v\r y Pftces are loo low to 



4DDS VIEWPOINT 



CRTS 
PRINTERS 



MALIBU iSS^'Nit. .ID' I 
OUME SPRINT 9 
DIABLO 630 
ANACOM tSO 



.tLiSl* e»9) 1600 

K.t t. (LIS1$1975) i1S2S 

SCaN 

tCaH 

,().<st Ii360j fCall 



INTERFACE EQUIPMENT 

EPSON ACCESSORIES 

ORANGE INTERFACE f ■' *P(>t« il 

tWJ I'.l 1 '' '.■ " 'M.tl ' "i .ill III . . . - . 

ITRS-BOCABLES I >i>'-v mm > h>>a mMrfac* 
NOVATION DCAT : '• ■ ..-•ri'iwLl rnodeni 
HArrS MtCROMODEWS 'Apple II) .. 



■ Call 

I no 

fCall 

S 160 

scait 



Ofonqe micro 

^ inc. 

3150 E. LaPalma. Suila G. Anahalm. CA 92906 

The Computer Prtnt&r SpeciaUsts' 



Ptiarc ordw VUElXOMC: laiM day iMoment Wtm i«t ol VISA A MASTER I 
CARD COO'S acoemsd Mnwjlacluta* & wanjniir Widwdtd on aii MuKxranL 



GENERAL 



Programmers, put your hands on the computer 
and feel that assembly code! 



The Conversion 



Robert Woeger 

7130 WhitakerAve. #fl 

Philadelphia. PA 19111 



All of you "would be" Assem- 
bly programmers take heed, 
for you are about to breaK the 



barrier into the ultimate pro- 
gramming language! This arti- 
cle discusses an easy conver- 
sion for Basic programmers 
into the almighty world of 
TRS-80 Assembly programming. 
This is a 'hands on" article, so 
get your hands on that Radio 
Shack EDTASM and a few blank 
cassettes or a disk. Model III 
owners can use this Informa- 



; SET (X.Y) Demonslralion routine 


START 


LD 


HL.O 


, X coordinate 'S loaded into HL 




LD 


lVARX),ML 


, save variable 'X m memory 


SET 


LD 


M,12fl 


, ttiis tells ROM we want lo set a point of 
graphics 




LD 


A,(VAflXl 


, get "x" coor[1inate 




LD 


B.A 


, move "x" to B register 




LD 


A.IVARY) 


, gel Y coord male 




CALL 


GHAPH 


, grapFi the poinl 


INCX 


LD 


HL,(VARX| 


.this section is like Basic s "X ^ X+ 1" 




LD 


DE.I 


, mcren^ent value (the * '•> 




ADD 


HL.DE 


, add-»' + 1 




LD 


(VARX), HL 


, updaia new "x 


IFX128 


LD 


HL,(VARX) 


; this routine does- i1 X-128 Then 40 Else 
set 




LD 


DE,12e 


, 16 bit compare for 




RST 


IBM 


, subiract DE from HL set Z flag il zero 
results 




JR 


Z.L40 


, tt zero then line 40 




JR 


SET 


; Set next point 


GRAPH 


PUSH 


HL 


. graph with ROM Set roulifw |A,B) Is point 




PUSH 


BC 






LD 


HLDUMMY 


, dummy stnnQ lo make ROM think this is 
Basic 




JP 


150H 


: off to ROW and il will return to proflram 


DUMMY 


DEFM 


');■ 


: left parenthesis and semicolon for ROM 


L40 


JP 


6CCH 


call 


VARX 


DEFB 





. same as End siatemenl 


VARY 


DEFB 


4 








Program Listing 1. 



lion, but as you are no doubt 
aware, the folks who sell our 
computers changed the ROM. A 
special section, at the end of the 
article, will advise Model Ml 
owners on how to get in on the 
action. 

The Editor/Assembler will be 
our tool into the fundamentals 
of Z-80 Assembly program- 
ming. It is assumed that the 
reader has an understanding of 
using EDTASM. One should 
know how to type in an 
Assembly program, assemble 
object code, write source code, 
and use pseudo-ops (ORG, 
EQU.DEFB, and so forth). If you 
can afford It, the REMASSEM-1 
course Is a good tutorial for the 
Assembly program neophyte. 

The first thing that we will 
discuss is how to clear the 
screen. What users would or- 
dinarily do In Basic CLS, is 
either very easy or hard. We 
could use our trusty ROM calls, 
or we could write 15 lines of 
source code. Two very easy 
methods will be shown here; 
one that is a true ROM call and 
one that uses control codes. 
This is the ROM call routine: 

CALL 1C9H : clears the screen 
(BASIC -CLS entry 
point) 
or the control code melhod: 

LD A.ICH . nome cu'sor control 

code 



CALL 33H , display byte in A 

register routine 

LD A.1FH erase lo end-of- 

screen control code 

CALL 33H , display byte in A 



The next example shows a 
method of numeric variables 
and the Assembly program 
equivalent of the Basic Set(X,Y) 
command. In this situation, our 
friendly ROM calls come to the 
rescue once again. (Note: no er- 
ror checking is provided using 
this method, so don't try to set 
a point that is out of range!) The 
routine is Program Listing 1, 

This will draw a graphics line 
(horizontally) at the fourth Y 
coordinate line. Here you see 
an example of setting a point at 
300 times the rate of Basic. 
That's right. Assembly pro- 
gramming is generally 300 times 
faster than Basic! Why do you 
think all of the great arcade 
games are written In Assembly? 

You also saw examples of 
If. . .Then. . Else statements, 
X = X + 1 statements, and let 
X = 0. Instead of the "JP 6CCH" 
statement, End statement in 
Basic, you could have gone on 
to another routine In an Assem- 
bly program. You need not totally 
understand this routine; just use 
it as a guide in writing your own 
Assembly programs later on. 
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Note: to do a Reset(x,y) instead 
of a 5et(x,y) change the one 
statement beside the label Set 
from "LD H,128" to "LD H,1". 
With just this one modification 
to the routine, the resetting of 
graphics may be done in 
Assembly aiso. 

Now iet's attack the famous 
Print message statement. In 
Assembly programming you 
simply point the HL register to 
the beginning of an ASCII 
message string that is ter- 
minated by an 03H byte. The 
generalized message display is 
shown In Program Listing 2. 

Next we will convert the Print 
STRING$(Y,B) from Basic into 
Z-BO Assembly programming. 
For those of you who don't 
know what Y and B stand for, Y 
is the number of repetitions of 
the ASCII character number in 
B. The following routine will 
prove very useful for tables and 
printout programs: (Note: 
VARY and VARB must have 
previously been defined in your 
program with DEFBs). 



LD 


A.(VAHY) 


; get Y vmliM 


LD 


B,A 


; move to B 


LD 


A.(VARB| 


; gel b value into A 


CALL 


33H 


; display byta in A 


DJNZ 


^3 


; wait until b>0 


RET 







Finally I am going to go over 
the conversion of the Print @ x, 
message from Basic to As- 
sembly. The HL register has the 
first video RAM location into 
which the message will be put. 
See Program Listing 3. 
To find the value for HL, add 
15360 decimal to the Print at 
location. 

Model III User Hints 

You can use these subrou- 
tines with very little or no modifi- 
cation. Try this out: if a routine 
won't work with your new ROM, 
use a good disassembler and try 
to find what looks like the right 
call. Normally the ROM call 
should be very close to that 
given {within 30 bytes). Please 
write me with the calls for the 
Model 111 if you find that they are 
different from the Model I 
calls.B 



DSPLY PUSH 

TEST LD 
CP 
JR 

CALL 
INC 
JR 

TERM POP 
RET 

OUTPT PUSH 
PUSH 
CALL 
POP 
POP 
rat 
Remember to "LD 
CALL 
LO 
CALL 
JP 

DEFM 
DEFB 
OEFB 



HL 

A.(HL) 

3 

Z,TERM 

OUTPT 

HL 

TEST 

HL 

BC 

ML 
33H 
HL 
BC 



, Bsve HL register 

;aet rtext ct^aracter 

; see It terminating byte 

; it 03 then done 

; display Dyte in A 

: move HL aver next character 



, return to calling program 



; display 



MES3 



HL,MES1" then "CALL DSPLY". An example followa: 

ICSH ; CLS 

HL,MES3 ; point HLto messafie 

DSPLY ; display string 

START ; do the Set routine ur^der massage 

Model I Assembly program by JOHN DOC 

OAH ; carriage return 
3 

Program Listing 2. 



LOW PRICES ON TRS-80* 

From Radio Ranch, Inc. 




In business 27 years at the same location pro- 
viding electronic equipment and service. 

We Are Better Equipped To Provide 



TRS-80 

COMPUTERS & 



Accessories 
Software 



IKS-mi Mod II tj4K i44().(MI 

TRS 80 Mod III UK, J Dr 219S.(H) 

TRS-80 1 ine Printer 6 1020.00 

C.()R\'l S' • -,-10-20 M Hard Disks . . . Call For Prucs 
"CORDOS " and "OASIS" operating systems 

Full Factory Warranty - Complete Service Department 

Cert Check ^^n^ ^^ Route 3, Radio Ranch Airport 

Cashiers rk, ^^B m^ Polo, Illinois 61064 

Call Toll Free 8O0-43S-8310 In III. Call 8n-946-337l 



LD 


HL,16346 


. Print a location 986 


LD 


(4020H).HL 


; set cursor position to 986 


LO 


HL,MES2 


; point to message 


CAa 


DSPLY 


; gen. display routine call 


RET 






MES2 DEFB OAH 


,cn 


DEFM 


Ttiia is Prin 


t location 986 decimal! 


DEFB OAH 


;CR 


DEFB 


3 






Program listing 3. 




"NEW USES FOR THE ^ 

HOME 
COMPUTER 

IN THE 

STOCK 
MARKET" 



'S»9 List of A&tertiamrs on page 418 



A new book— contains a gold mine of ideas!! 

Do you have the great stock and commodity trading advantages 
given by the home computer to the few who properly us it? This 
txiok gives you a nevw insight mto cycles and seasonal factors as 
they affect stock and commodity prices. It gives you solid tools for 
measuring and profiting from them Obtain ideas and programming 
never before published The writer has over 90 years experience as a 
stock broker and 8 years experience programming computers Book 
IS 8V? inches by 11 inches and has 254 pages and 34 programs writ- 
ten in TRS-80 BASIC. 

The book borrows methods long understood by radio and electronic 
engineers but overlooked by most statisticians Thus, it is able to 
present methods, never before published, of stock and commodity 
market timing using cycles and seasonal variations 

To order book-send check S19.95 and your name and address 

to: 

Thomas V. Lenz, Dept. M 
596 W. Karval Ct. Spring Creek 
L Elko, Nevada 89801 -'^ 
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UTILITY 



LOAD 80 



Dive into your disks if you dare. 



Floppy Fixer 



James A. Beebe 
16221 178 Place N.E. 
WoodinviUe. WA 98072 



the system won't boot up. 
Please, use it with caution. 

Communicating With The Drive 

When 1 first purchased my 
disk drive, 1 had no operating 
system. I wanted at least to test 
the drive before my warranty 
ran out. This meant that I would 
have to write my own disk I/O 
routines. 



Ever wonder what's out 
there on your disk? Here's 

a utility that will let you look 

anywhere and modify anything 

on it. The program contains its 

own disk I/O (Input/Output) 

routines and doesn't need any 

operating system to do its 

work. 

All you need is your Level II, 

16K machine with at least one 

disk, an editor/assembler and a 

little time. Now, you're ready to 

dive into those mysterious 

utilities supplied with your 

system. 

Although this utility is infor- 
mative and Interesting, a cer- 
tain amount of risk is Involved 

when you start writing sectors 
on your disk. I am mentioning 
this so some poor soul does not 
indiscriminately write sectors 
on a disk and then wonder why 
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How does one communicate 
with the disk drive? Radio 
Shack uses a chip called a flop- 
py disk controller (Western Digi- 
tal's 1771) inside the expansion 
interface. 

To communicate with this 
controller, your expansion in- 
terface contains four memory 
mapped locations, starting at 
37ECH, to store and receive in- 
formation. Your DSKMOD util- 
ity must put the information in- 
to these locations that the 1771 
chip needs to control the drive. 
Likewise the 1771 returns infor- 
mation to these locations in- 
dicating what It has done. 

Being the fearless type, and 
probably a little foolish too, I 
obtained a copy of Western 
Digital's 1771 Floppy Disk Con- 
troller Manual. The manual ex- 



plains all the disk I/O software 
commands available. By sen- 
ding the 1771 the right com- 
mands, your program can read 
and write to the disk lust like 
any of the commercial disk 
operating systems (DOS). (I 
don't want to get too detailed 
about how the 1771 works. It 
you are interested, I suggest 
you get acopy of the manual. In 
fact, maybe you can add some 
routines of your own.) 

Thrse-ssctton Program 

Written in Assembly, the pro- 
gram is divided into three sec- 
tions: A main menu routine that 
gets your input from the 
keyboard; a set ot routines to 
perform all of the commands; 
the disk I/O routines. 

The main menu shows you 
exactly what commands are 
available and allows you to 
choose one. The program is 
limited to some basic func- 
tions, but I'll add more as my 
experience with disk opera- 
tions increases. Currently, you 
can read, write, modify or zero 
sectors. You can also display or 
print them in both hex or ASCII. 

You select a command by en- 
tering a corresponding charac- 



ter. The program finds the ad- 
dress of the routine in the com- 
mand table. 

For example, to select the 
Display command, enter the 
letter D. The address of this 
routine is the fourth entry in the 
command table. If you enter 
any new commands, display 
the command on the screen 
and enter the address of the 
routine in the command table in 
its alphabetic position. 

The disk I/O section of the 
program consists of five 
routines: FDRDY selects the 
disk; TRZERO positions the 
disk to the first track; TRSEEK 
finds a track on the disk; 
SECGET reads a sector from 
the disk; and SECPUT writes a 
sector to the disk. 

Getting the utility up and run- 
ning on any TRS-80 requires a 
little time, but not much else. 
All the device handling codes 
are in the program, including 
getting keyboard input and out- 
putting to both the printer and 
the screen. 

The program does not de- 
pend on ROM routines and you 
may want to use them to save 
space. Also, t have an ASR 33 
teletype printer connected to 



the serial port of my expansion 
interface and need the custom 
printer routine. If you do not 
have a printer, or if your printer 
uses the standard parallel con- 
nector, then you will most 
definitely have to change this. 

Running Th« Program 

First, type the program using 
your editor/assembler. You can 
save your fingers quite a few 
strokes by eliminating all the 
comments. In fact, you may 
have some difficulty assembl- 
ing the program in 16K, if you 
don't leave out the comments. 
At this time, you can also use 
any ROM routines in place of 
the routines I have supplied for 
Keyboard input and printer out- 
put. 

1 start the program at 7000H. 
but if you want to place it 
elsewhere in memory, simply 
change the ORG 7000H state- 
ment. As written, the program 
uses memory from 7000 H to 
7AFFH. 

When you have entered and 
modified the program for your 
equipment, assemble it and 
make sure that you have no er- 
rors. I always use the /WE 
switch in EDTASM (editor/ 
assembler) that stops the 
listing on the error. Use a com- 
mand like: A DSKMODAVE. 

If everything goes according 
to plan, you can now load a 
cassette and prepare to record. 
When EDTASM tells you the 
cassette is ready, press return, 
and now you have a copy of the 
utility ready to go to work. 

Get back to Basic and rewind 
the tape to the start of 
DSKMOD. Type SYSTEM, and 
in response to the prompt ?*, 
you should type DSKMOD and 
press Enter. If all is going well, 
the stars in the upper-right cor- 
ner will blink tor about 20 
seconds. Now, you will see ?* 
again. Simply type / and hit 
Enter. 

Well, if you've made it this 
far, you're ready to test the pro- 
gram. I suggest you use an ex- 
pendable disk. First, try to read 
a sector. In response to the 
Command? prompt, enter R. 
You will be prompted for the 
drive, Uack and sector numbers 
at the bottom of the screen. If 
you only have one disk, then 



enter 1 for the drive number. 

Two blanks follow the words 
track and sector. These num- 
bers must be entered as two 
hexadecimal digits. TRSDOS's 
last track is 22H and its last 
sector is 9, but I allow a double 
digit sector number for use with 
other disks. For this test, enter 
00 for the track and 00 for the 
sector. The program should 
read the sector into memory. 



both graphics and characters. 
To return to the main menu, 
simply press the X key. 
Generally, pressing X at any 
time returns you to the main 
menu, even if you are in the mid- 
dle of a command. 

Modify Sector 

Modeled after TBug's M com- 
mand, after pressing M, the pra 
gram prompts you for the start 



"Ever wonder what's 

out there 

on your disk?" 



You can now use all the other 
commands to act on this sec- 
tor. You can display it or print it; 
you can modify individual 
bytes; you can zero the entire 
sector; and you can write this 
sector to any place on disk. 

How to Um DSKMOD 

Now that you have the pro- 
gram on your machine, and it 
has passed its first test, you're 
ready to learn how to use it! 
Below is a description of each 
command and how it works. 

Display Sector 

If you press D in response to 
the Command? prompt, you will 
display the sector buffer. Each 
line shows 16 bytes in hex and 
then the same 16 bytes as 
ASCII characters. If you display 
a sector of a machine-code pro- 
gram, the ASCII display will mix 



ing byte in the sector to modify 
Enter the two-byte hex offset 
where you want to start. The 
screen displays the offset and 
Its contents. (The offset is a hex 
number added to your start 
address.) 

You can now change the 
value by typing any two valid 
hex digits. It you want to go on 
to the next byte, press the 
space bar. Also, by entering the 
magic X, the program returns to 
the main menu. 

Read Sector 

This command allows you to 
read one sector at a time from a 
disk into the buffer. Pressing R 
displays a prompt at the bot- 
tom of the screen. Enter the 
disk drive number 1-4 followed 
by the track and sector you want 
to read. Remember that the 
track and sector are two hex 



digit numbers. 

If you enter a track/sector 
that does not exist on your disk, 
the program hangs up. The pro- 
gram does not check for errors. 
If you've entered everything 
correctly, you should be able to 
display the sector you just 
read. 

If you want to cancel this 
command at any time, simply 
enter X. 

Write Sector 

This is the dangerous com- 
mand. You select this com- 
mand by entering a W. You 
need the same information as 
for the read sector command: 
disk, track and sector number. 
Remember, you must format 
the disk tiefore writing to it. If 
the track/sector that you select 
can't be found on your disk, the 
program hangs up. To cancel 
the command, press X any 
time. 

Zero Sector 

This is the easiest command 
to use. Simply enter Z and the 
sector buffer will be filled with 
zeros. You may want to clear a 
sector on disk, so first zero the 
sector buffer and then write 
onto the disk using the Write 
command. Not much to this 
command, but it can prove 
useful. 

Though the commands are 
limited, you're welcome to add 
new ones. Even if you already 
have a utility that performs 
these functions, you can use 
this program as a guide to 
writing your own disk I/O 
routines. ■ 









Pro 


gram Listing 




00100 




















00110 












00120 






DISK SECTOR 






00130 




DISPLAY/HODIFV UTILir/ 






00140 












00150 












00160 




JAMES 


A. BECBE 






80170 




FEBRUARY 1981 






00100 
00190 


...... 


















00200 




DEFINE FLOPPY DISK PARAMETERS | 




00210 






1 


0000 


00220 


iUSY 


EQU 





FDC BUSY 


0001 


00230 I 


JRQ 


EQU 


1 


DATA REQUEST 


0003 


00240 


NESTOR 


EQU 


3 


RESTORE TO TRACK 


0013 


00250 


>EEK 


EQU 


IBH-fRESTOR 


SEEK TRACK 


00D0 


00260 


:lears 


EQU 


0D0H 


CLEAR STATUS 


008C 


00270 


^EADS 


EQU 


8CH 


READ SECTOR 


0AC 


002B0 I 


ffllTES 


EQU 


0ACH 


WRITE SECTOR 


37EC 


60290 


:OHAND 


EQU 


37ECH 


COM HAND/ STATUS REGISTER 










P'ogram continues 
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f",-J'Jf^ 7; 


"■ ".e: 
















37ED 


00300 


TRACK 


EQU 


37EDH 


TRACK REGISTER 






37EE 


00310 


SECTOR 


EQU 


37EEH ; 


SECTOR REGISTER 






37EF 


00320 


DATA 


EQU 


37EFH ; 


DATA REGISTER 






37E1 


00330 


DRIVE 


EQU 


37E1H 


DRIVE SELECT REGISTER 






0004 


00340 


LDERR 


EQU 


4 


LOST DATA ERROR 






000B 


00350 


CRCERR 


EQU 


e 


CRC ERROR 






8010 


00360 


SEKERR 


EQU 


10H 


SEEK ERROR 






0010 


00370 


RNFERR 


EQU 


10H 


RECORD NOT FOUND ERROR 






0020 


00380 


WFERR 


EQU 


20H 


WRITE FAULT ERROR 






0040 


00390 


WPERR 


EQU 


40H 


WRITE PROTECT ERROR 






0080 


00400 


NRERR 


EQU 


60H 


DRIVE NOT READY ERROR 






0098 


00410 


TIERR 


EQU 


NRERR+SEKERR+CRCERR 






009C 


00420 


RDERR 


EQU 


NRERR+RNFERR+CRCERR+LDERR 






BBFC 


00430 


WRERR 


EQU 


NRERR+WPERR+WFERR+RNFERR+CRCERR+LDERR 








00440 
















00450 




DEFINE 


BUFFER LENGTHS AND POINTERS 








00460 














3C0fl 


00470 


VIDMEM 


EQU 


3C00K 


VIDEO MEMORY 






0400 


00460 


VIDLEN 


EQU 


1024 


VIDEO MEMORY SIZE 






0100 


00490 


SECLEN 


EQU 


256 


SECTOR SIZE 






0040 


00500 


LINSI2 


EQU 


64 


CHARACTERS PER LINE 






0010 


00510 
00520 


LINES 


EQU 


16 


LINES PER SCREEN 








00530 




DEFINE 


UART PARAMETERS FOR SERIAL PRINTER 








00540 














00Ee 


00550 


RESET 


EQU 


0C8H 


RESET PORT 






00EA 


00560 


CONTRL 


EQU 


0EAH 


CONTROL PORT 






e0EB 


00570 
00580 


DATAP 


EQU 


0EBH 


DATA PORT 








00590 




CHARACTER EQUATES 










00600 














0000 


00610 


CR 


EQU 


0DK 


•CARRIAGE RETURN 






000A 


00620 


LF 


EQU 


BAH 


J LINE FEED 






005F 


00630 

00640 


CURSOR 


EQU 


5FH 


;CURSOR CHARACTER 








00650 




MISCELLANEOUS EQUATES 










00660 














3F4D 


00670 


CMDPOS 


EQU 


VIDMEM+845 


; COMMAND INPUT POSITION 

■■-CC-- 





COOSOL DISCOUNTS 



PRINTERS 




Firson MXHd BW 

Fpson MX/Q 8341 

i ii,on MXHO GOAF IHAX He.41 

1 p-rfjr. MX80 f I Af,i- 
S PV.-)" VXBU F TGWAF'RA. ^^^4 ■ 

Epsoi WXiOO ^nZ4 
Ev^on f .iriiirs a"ri :. .ii'ls 

NEC Spinwi^ler -laio 

NFC Spinwriler bb^b 

NEC SpinwrilPf j520 

NEC SO">«"te. SS2& 

NEC Spn*''le' -jSSO 
NEC Atcesijnes 

ANACCM Parallel ANC 

ANACOM StRlAL ANC 






-000! 


S4WCA1 


-00(1?) 


5e»CAl 


89''' 


*W#CAt 


-QOtM 


S*99::a^ 


-00 ■i 


sesecAL 


-00 ^'4 


^*9*CAl 




CAL 


-1 


S249fi 


-1 


S249e. 


1 


S3881) 




s^9S(: 




5249^ 




CAL 


'e-op 


S119J 


150t> 


S"95 



CPU— TERMINALS— SOFTWARE 



ADDS COMPUTER SYSTEMS 

• yiJinviSiON? >i"p3 ^16-019000 

• MUL1IVISI0N3 Slep2 ".lO-OIBOOO 

• MULTIVISION :f Step 1 ')160170Q0 . 

■ MULTIVlSlON -^ ^ln-020000 

• MULTIVISION ■ ^IhiJOeOOri 

• ADCl- ACCt^S'.vRlES & SOFTWARE 

ALTOS MTU FLOPPY HARODISK 

• BO00-" MUJ 1Mr. I L 17 ^Ml 

HARD FLOPPY DISK 

jj^K FSA*,' >aP-^' '..M:: = ••A'iC DISK 

■ 'MPFi 17 2 V Hi.HJO-'OMIU 

■ 1','t! F n-'v. &0'\: 'CD 

• 1 2Mr> flofpi WiKW-iO 

• ALTn:i Ai-rp<iSi'ric'. S Soli^.irc 



TELEVIDCO TERMINALS 

• 91CX; ;-?- 

• 920C ■ '-: 

• TElEVIDEO A(( ,-,!.orir 



9'?C 
9S0C 



NEC COMPUTER SYSTEMS 

• NEC C-v-i-.uIP' PC-8001A ... 

• NEC I o lJ".: F'c-ao-::A ... 

• NEC- I O Port CC-SOSJA 

• NEC niSsDRiit PC80.11A 

• NEC DISK DF1IVE PC-0O32A 

• NEC Gr Monil.v. JB-i?01 

• NEC Col PAin.iiK JC1202 

• NEC A,L^5C«>P* 4 So'i*.ir^ 



Si 1 275 

SlO 172 
S 9 070 
S 7 520 
1 :; 3'2 

CALL 



7 438 
CALL 



5705 
5959 

CAlL 



s ■ -lioe 

< .-,2e 

! "52 

< 1 056 
S 931 
S 220 

S 995 
CAL^ 



COOSOL LRC 400 SERIES" 
OEM PRINTER INTERFACE 




SlSOea (QUANTITV ONEi 

DESIGNED TO OPERATE 

ANY SERIES 400 LRC-EATON PRINTERS 

28 SYSTEM LEVEL SOFTWARE COMMANDS 

CHARACTER ENHANCEMENT 

BOTH SERIAL :flS-232) AND PARALLEL INPUT 

BAUDRATE SELECT FROM 110 TO 9600 

STANDARD 96 ASCII CHARACTER FONTS 

REVERSE FONT PRINTING 

UPPEF^ AND LOWER CASE PRINTING 

UP TO 48 CHARACTERS PER LINE 

5X7 10 1 7 OR 10 X 1* DOT MATRIX CHARACTER 

GENERATOR 

PRINTS TEST CHARACTER SET 

SUPPLIED WITH 6.500 u(d 35V ELECTRONIC 

CAPACITOR, BUILT IN POWER SUPPLY WITH 

REGULATORS AND TRANSFORMER 

5-3'4 X 7-1 2 INCH BOARD SIZE 



•^ ■ p 



COOSOL, INC. P.O. BOX 743, ANAHEIM, CALIFORNIA 92805-0743 (714) 545-2216 
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This is a picture 

of all the printers in the world 

that outseU the MX-80. 

Epson. 



The one thinn ^cu cin't beat in tht nwrkctpbce is vjlm- 
And there simply isn't a better combination of reliabil- 
itv, print quality, features and price in an HO-column 
printer ttun the Epson MX-80 Anywhere tm earth. 

But while w-e'rc pleased to make the best-w:Uinn 80- 
column printer in the vs-orld. we're hardlv surprised. 
Because we decided a Ions time ajjo that the wa\' to suc- 
ceed in this business is to build a gtH»d pniduct, sell it at 
a fair price, and staiKl behind it. 

So we tiuill our MX-80 with fe.itures like a choice of 
24 different tvpe faces, graphic*; that rival plotters, loni 
cal seeking, bidirectional printing and tlu* wurid's first 
dtiipo'Wible pnni head. V\V; ^>nced it ai under S6S0. And 
if It breai-s, wv'l! be here to fix it. 

That seems hke a straightforward enough policy But 
when we first introduced the MX-*W, the aimpetition 



laufihod. Now they're cutting prices, introducinp 
"new" mtKU'ln. and runnmi; splashy color ads, all in an 
effort to catch up. And they're not laughing. 

But yvu don't have to take our w»rd fiw it. You'w jflol a 
choice: you can buv the printer that's been embraofd by 

se«.»ral hundred thousand 
computer fanatics all 
over the world. Or you 
can buy something else. 
And take your chances. 




EPSON 

EPSON AMERICA INC 



^Sm9LMlfifAS»mU»9it0t>fi^g»4l9 



J415 Kashiwd Strtvt, TiMronce, CA <»0S05 • (213) 53'*-9:40 
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Program continiMd 
















3PC0 




00680 


LINE16 


EQU 


VIDMEM+960 ; 


LAST LINE ON SCREEN 




3FCD 




00690 


DSKPOS 


EQU 


VIDMEM+973 ; 


DRIVE NUMBER INPUT 




3PE1 




00700 


TRKPOS 


EQU 


DSKPOS-t'20 ; 


TRACK NUMBER INPUT 




3FP6 




00710 


SECPOS 


EQU 


TRKPOS+21 ; 


SECTOR NUMBER INPUT 




3FE2 




00720 


OFFPOS 


EQU 


VIDMEM+994 ; 


BYTE OFFSET INPUT 




387F 




00730 
00740 


KBRDY 


EQU 


387FH ! 


KEYBOARD READY REG 








1 r 1 r t t f 


1 1 1 1 t 1 t 


iiMiiiffitrttiiiii 










00750 
00760 


! 


DSKMOD 


ENTRY POINT f 










II 1 1 1 1 t 


1 t t t t 1 1 


Ifffflllltttllltll 






7000 




00770 




ORG 


7000H 






7000 




007 80 


DSKHOD 


EQU 


S 






7000 


F3 


007 90 




DI 


; 


DISABLE INTERRUPTS 




7001 


CD8fl71 


00800 




CALL 


UART ; 


INITIALIZE FOR PRINTER 




7004 


310B79 


00810 




LD 


SP, STACK 


SET STACK 




7007 


CDA171 


00820 




CALL 


VIDRES 


DISPLAY SCREEN 




70eA 


214D3F 


00830 


DSK010 


LD 


HL,CMDPOS 


COMMAND BYTE 




700D 


CD4D70 


00S40 




CALL 


CHARIN 


INPUT COMMAND CHAR. 




7010 

DS 

7013 


CDA170 


00850 




CALL 


GETADR 


GET COMMAND ROUTINE AD 




3805 


00860 




JR 


C,D5K020 


ERROR 




7015 


112A70 


00870 




LD 


DE,DSK03O 


RETURN ADDRESS 




7018 


D5 


00B80 




PUSH 


DE 


PUT ON STACK 




7019 


E9 


00890 




JP 


CHL) 


PROCESS COMMAND 




701A 




00900 


DSK020 


EQU 


S 


1 M ! ERROR 




701A 


11C03F 


00910 




LD 


DE,LINE16 


MESSAGE LINE 




701D 


CD5670 


00920 




CALL 


CLBLIN 


CLEAR IT FIRST 




7020 


219A7 6 


00930 




LD 


HL,INVMSG 


INVALID COMMAND MSG 




7023 


01180a 


00940 




LD 


BCINVLEK 


MSG LENGTH 




7026 


EDB0 


00950 




LDIR 








7028 


18E0 


00960 




JR 


DSK010 


CONTINUE 




702A 




00970 


DSKO30 


EQU 


S 


COMMAND PROCESSING RET 




URN 
















702A 


3E20 


00980 




LD 


A, ' ' 






702C 


324D3F 


00990 




LD 


(CMDPOS) ,A 


CLEAR OLD COMMAND 




702F 


30D9 


01000 




JR 


NC,DSK010 


GET ANOTHER COMMAND 




7B31 


11C03F 


01010 




LD 


DE,LINE16 


-CLEAR AND START OVER 




7034 


CD5670 


01020 




CALL 


CLRLIN 


Progr3 


T> conlmues 



Hie DmOl-TRANS 1000 



A completely reftu^bished 
IBM Selective Termiricil with 
biiilt-in ASCII Interface. 

•FOR YOUR TRS80 WITH OR WITHOUT 
EXPANSION INTERFACE. AVAILABLE WITH 
CENTRONICS TYPE PARALLEL PORT. 



• woo Liaud Smiil 

• M,H rhaniruTH per hcinwkI 
prlnirrtn 

• Ueliablr hrai y d\ily S(*lr«*lrtr 

• RS-2.')2C Iiilcrtacc 

• Dot unirnUitkMi livludecl 

• 60 day wajTant>-— pan* and 
labor 

• flij^h quality Srlrrtrlc prlni* 
ln((OtF-lln( \iAv h^ lypewnicr 

#(>p11nnal lr»c kit- I**i'(I 
'v:llU^lk 

• 15 iiirh t-urrtiiitr witltli 



Alftn Vi'orks with Kx.< 
tr{>n> Stnn|{y lV»i>ii> 
Itrbuit U)iKllrigor|Mu- 
fpwnii. {Hum HSa52 
biiih IrifllnniCy) 

HCIW'UIOKIN^IK 
IMTA-rR4N$» 1000 

1. We iittviil Vii»a.M.isUM 

|X*rsniV)l chix-k |uiivil>U* lu: 

Z. iVlluitlti's^uv shipped 

KOJl. SanJner.CX 

'S. iHivrrirs/irvimnvHintp 




D«ik and labli Mp mocMi ai»o a^pliutile. 
ForoniersiiTKi infbnti:iiirm 

QATA-TRANS 

4^*77 Fii- II. ;il Mlvi! , f7 .-aw 

Fremont C,A '^•^SVS 
Phone*: (408) 263-9246 
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Program conlinuei} 


















7037 


18D1 


01030 




JR 


DSK010 










01040 




;;;;;;;; 












01050 
01060 




UTILITY 


ROUTINES 










1 1 1 1 t 1 


;;;;;;;; 












01070 
















01080 












7039 




01090 ASCHEX 


EQU 


s 


CONVERT ASCII TO HEX 




7039 


D630 


01100 




SUB 


'0' 


SUBTRACT ASCII BIAS 




7fl3B 


FA4A70 


01110 




JP 


M,ASC010 


INVALID HEX DIGIT 




703E 


FE0A 


01120 




CP 


10 


IS IT 0-9? 




7040 


D8 


01130 




RET 


C 


YES. DONE 




7041 


D607 


01140 




SUB 


7 


ASSUHE A-F 




7043 


FE0A 


01150 




CP 


lAB 


CHECK A-F RANGE 




7045 


3803 


01160 




JR 


C,ASC010 


INVALID HEX DIGIT 




7047 


FE10 


01170 




CP 


10H 


LESS THAN F? 




7049 


DO 


01180 




RET 


C 


YES. DONE 




704A 


3E00 


01190 ASC010 


LD 


A,0 


INVALID DIGIT RETURN 




704C 


C9 


01200 

01210 
01220 




BET 








704D 




01230 


:harin 


EQU 


$ 


INPUT CHAR FROM KEYBOA 




RD 
















704D 


365F 


01240 




LD 


(HL) , CURSOR 


TURN ON CURSOR 




704F 


CDD370 


01250 


:ha010 


CALL 


KEYBRD 


SCAN KEYBOARD 




7052 


28FB 


01260 




JR 


Z,CHA010 


[WAIT UNTIL INPUT 




7054 


77 


01270 




LD 


(HL) ,A 


•SHOW USER 




7055 


C9 


01280 
01290 
01300 


; 


RET 








7056 




01310 


CLRLIN 


EQU 


S 


CLEAR LINE 




7056 


D5 


01320 




PUSH 


DE 


SAVE 




7057 


EB 


01330 




EX 


DE,HL 






7058 


3620 


01340 


CLR020 


LD 


(HL),' ' 






705A 


23 


01350 




INC 


HL 






705B 


7D 


01360 




LD 


A,L 


Program continues 



ADVENTURES!!! 

For TRS BO and COLOR-80. These Ad- 
ventures are written jn BASIC, are full fea- 
tured, fast action, full plotted adventures 
that take 30-50 hours to play. (Adventures 
are interaclive fantasies. It's like reading a 
book except that vou are the mam char- 
acter as you qive the computer commands 
like "Look in the Coflin" and "Light the 
Torch."! 

Adventures require 16K. They sell for 
$14.95each, 
ESCAPE FROM MARS (by Rodger Olsen) 

This ADVENTURE takes place on the 
RED PLANET, You'll have to explore a 
Martian city and deal with possibly hostile 
aliens to suivive this one. A good first 
adventure, 

PYRAMID (by Rodger Olsen) 

This IS our most challenging ADVEN- 
TURE. It IS a treasure hunt in a pyramid 
full of problems. Exciting and tough' 

TREK ADVENTURE (by Bob Retelle) 

This one takes place aboard a familiar 
starship. The crew has left for good reasons - 
but ihey forgot lo take you, and now you 
are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 

Our first and original ADVENTURE, 
this one takes place atward a cruise ship - 
but It ain't the Love Boat. 

VAMPIRE CASTLE (by Mike BassmanI 
This IS a contest between you and old 



QUEST 



QUEST A NEW IDEA IN ADVEN 

TURE GAMES! Different from all the 
others. Quest is played on a computer 
generated map of Alesia. Your job is to 
gather men and supplies by combat, bargain- 
ing, exploration of ruins and temples and 
outright banditry. When your force is strong 
enough, you attack the Citadel of Moorlock 
in a life or death battle to the finish. Play- 
able in 2 to 5 hours, this one is different 
every time. 
16K COLOR-80 OR TRS-80 ONLY, $14.95 



-^^*t^ 




Drac - and it's getting a little dark outside. 

si4.95each. ^,^:\ Please specify system on all orders 

This is only a partial listing of what we have to offer. Send for free catalog to: 

.29 AARDVARK-80 
TRS-80 



ARCADE AND THINKING GAMES 
16K and extended or level II BASIC 

TIME TREK, REAL TIME REAL 
GRAPHICS TREK. See the torpedoes fly 
and Klingons explode. No more scoll- 
mg displays, no more turn taking. - This 
one has real time and teal displays. In 
BASIC - (or 16K level II or extended color 
BASIC. $14.95. 

STARFIGHTER This one man space 
war game pits you against spacecruisers, 
bat tie wagons, dnd one man lighters. You 
have the view Irom your cockpit window, a 
working instrument panel, and your wits. 
Another real time goody. S9,95. 

BATTLEFLEET This grown up ver- 

sion ot Battleship is the toughest thinking 
game available on 80 computers. There is 
no luck involved as you seek out the 80's 
hidden fleet. This is a topographical toughie. 
$9.95 

SLASHBALL - A two player game of 
strategy and skill, this is like nothing you 
have ever seen before. This takes fast 
fingers, quick wits and concentration. Play- 
able from age 6 to 65, it is a good family 
game. $9.95. 

MINOS - 8K - Features ama/ing 3D 
graphics. You see a maze from the top, the 
screen blanks, and when it clears, you are in 
the maze at ground level finding your way 
through on foot Realistic endugh to cause 
claustrophobia S12.95, ICOLOR-800NLY) 




2352 S. Commerce, Watted Latte, tVII 48088 
(313)669-3110 



COLOR-80 



• See List ol Ativerlisers on page ^18 
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P'ngia'" CO'' 



705C 


E63F 


01370 




AND 


3FH 


;END OF LINE? 




7B5E 


20F8 


01380 




JR 


NZ,CLR020 


;NOT YET. 




7060 


Dl 


B139B 




POP 


DE 






7061 


C9 


01400 
0141B 
01420 


! 


RET 








7062 




B1430 


CLBSCN 


EQU 


S 


i CLEAR SCREEN 




7062 


210B3C 


01440 




LD 


HL,VIDMEM 


,- START AT TOP 




7065 


3620 


01450 


CLR010 


LD 


(HL),' ' 






7067 


23 


01460 




INC 


HL 






7068 


7C 


01470 




LD 


A,H 






7069 


FE40 


01460 




CP 


40H 


;DONE? 




7065 


20Fe 


01490 




JR 


NZ,CLR010 


jNOT YET. 




706D 


C9 


015BB 
01510 
01520 


: 


RET 








706E 




01530 


ForaiAT 


EQU 


S 


; FORMAT DISK SECTOR 




70eE 


C5 


0154B 




PUSH 


BC 






706F 


F5 


B155B 




PUSH 


AF 






7070 


217777 


01560 




LD 


HL,FMTBUF+1 


J FORMAT BUFFER 




7073 


CD1971 


B1570 




CALL 


HEXASC 


r CONVERT OFFSET 




7076 


70 


B1580 




LD 


(HL) ,B 


; STORE FOR DISPLAY 




7077 


23 


01590 




INC 


HL 






7078 


71 


0160B 




LD 


(HL) ,C 










01610 


; HEX DIGIT DISPLAY 






7079 


23 


01620 




INC 


HL 






707A 


23 


B1630 




INC 


HL 






707B 


D5 


01640 




PUSH 


DE 


jSAVE FOR LATER 




707C 


0606 


0165B 




LD 


Br8 


1 8 WORDS TO FORMAT 




707E 


0E02 


01660 


POR010 


LD 


C,2 


!2 BYTES PER WORD 




7080 


C5 


01670 




PUSH 


BC 


;SAVE IT 




7061 


lA 


B1660 


FOR020 


LD 


A,{DE) 


;GET HEX DIGITS 




7B62 


13 


01690 




INC 


DE 


;NEXT BYTE 




7B83 


CD1971 


B17B0 




CALL 


HEXASC 


; CONVERT TO ASCII 




7086 


70 


0171B 




LD 


[HL) ,B 


; STORE IN FORMAT BUFFER 




7087 


23 


01720 




INC 


HL 






7BBB 


71 


B173B 




LD 


(HL) ,C 






7089 


23 


01740 




INC 


HL 






70BA 


CI 


01750 




POP 


BC 


; RESTORE 




708B 


0D 


01760 




DEC 


C 


;ONE LESS BYTE 




708C 


C5 


B177B 




PUSH 


BC 


;AND SAVE AGAIN 




708D 


20F2 


B178B 




JR 


NZ,F0RB2B 


;D0 2 BYTES 




70eF 


23 


0179B 




INC 


HL 


;NEXT WORD 




7198 


CI 


01600 




POP 


BC 


! RESTORE 




7091 


IBEB 


01610 
01820 


; ASCII 


DJNZ 
DISPLAY 


FOH010 


;LOOP OVER 6 WORDS 




7093 


23 


01830 




INC 


HL 






7094 


23 


01840 




INC 


HL 






7B95 


Dl 


01850 




POP 


DE 


.•RESTORE BUFFER PTR 




7096 


0610 


B1B60 




LD 


B,16 


:D1SPLAY 16 CHARS. 




7098 


lA 


B187B 


FOR030 


LD 


A,(DE) 


;GET CHAR FOR DISPLAY 




7B99 


77 


81860 




LD 


(HL) ,A 


; DISPLAY IT 




709A. 


13 


01690 




INC 


DE 


;NEXT ONE 




709B 


23 


019B0 




INC 


HL 






709C 


10FA 


B191B 




DJNZ 


FOR03 


;LOOP UNTIL DONE 




709E 


Fl 


01920 




POP 


AF 


; RESTORE 




7B9F 


CI 


01930 




POP 


BC 






70A0 


C9 


0194B 
B1950 
01960 


•; 


RET 








7eAl 

DR 

70A1 




01970 


GETADR 


EQU 


S 


;GET COMMAND ROUTINE AD 




211379 


01980 




LD 


HLrCMDTBL 


; COMMAND TABLE 




7BA4 


D641 


0199B 




SUB 


'A' 


;VALID COMMANDS ARE A-Z 




70A6 


FAfiB70 


02000 




JP 


H,GETa20 


; INVALID 




70A9 


PEIB 


02010 




CP 


27 


;A-Z? 




7BAB 


300B 


02B2B 




JR 


NC,GET020 


; NOPE . 




7BAD 


5F 


B2030 




LD 


E,A 


;GET TABLE OFFSET 




70AE 


CB23 


0204B 




SLA 


E 


; CONVERT TO WORDS 




7BBB 


1600 


B2050 




LD 


D,0 






7BB2 


19 


02B60 




ADD 


HL,DE 


; INDEX INTO TABLE 




70B3 


5E 


02B70 




LD 


E,(HL) 


jGET ROUTINE ADDRESS 




70B4 


23 


02B6B 




INC 


HL 






70B5 


56 


B2090 




LD 


D,(HL) 






70B6 


EB 


02100 




EX 


DE.HL 


fADDRESS TO HL 




70B7 


C9 


02110 




RET 








7BBB 


37 


B2120 


GET020 


SCP 




;FLAG AS INVALID 




7BB9 


C9 


B213B 
02140 
B215B 


; 


RET 








7BSA 

T 

70BA 




B2160 


GETDIG 


EQU 


S 


J INPUT DIGIT AND CONVER 




CD4D7B 


B2178 




CALL 


CHARIN 


;GET USER INPUT 




70BD 


FE0D 


02180 




CP 


CR 






70BF 


C8 


B2190 




RET 


Z 




Progisrn continues 


70C0 


FE58 


02200 




CP 


'X' 


! TERMINATE? 
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70C2 2002 


02210 


JR 


NZ ,GET040 


70C4 37 


02220 


SCF 




70C5 C9 


02230 


RET 




70C6 CD3970 


02240 GET040 


CALL 


ASCHEX 


70C9 EB 

N 

70CA ED6F 


02250 


EX 


DE,HL 


02260 


RLD 




70CC EB 


2 270 


EX 


DE,HL 


7flCD 23 


02280 


INC 


HL 


FIELD OVERFLOW 






70CE FEFF 


02290 


CP 


-1 


70D0 37 


02300 


SCF 




70D1 3F 


02310 


CCF 




7flD2 C9 


02320 
02330 ; 
02340 ; 


RET 




70D3 


02350 KEYBRD 


EQU 


S 


70D3 3A7F38 


02360 


LD 


A, (KBRDY) 


70D6 B7 


02370 


OR 


A 


70D7 C8 


02380 


RET 


Z 


70D8 D9 


02390 


EXX 




70D9 06FF 


02400 


LD 


B, 0FFH 


70DB 10FE 


02410 


DJNZ 


$ 


70DD CDEB70 


02420 


CALL 


READKB 


70E0 D9 


02430 


EXX 




70E1 B7 


02440 


OR 


A 


70E2 F5 


02450 


PUSH 


AF 


70E3 3A7F3a 


02460 KBD010 


LD 


A, (KBRDY) 


70E6 B7 


02470 


OR 


A 


70E7 20FA 


02480 


JR 


NZ ,KBD010 


70E9 Fl 


02490 


POP 


AF 


7flEA C9 


02500 


RET 




70EB 210138 


02510 READKB 


LD 


HL,3801H 


70EE 7E 


02520 READ10 


LD 


A, (HL) 


70EF B7 


02530 


OR 


A 


70F0 2005 


02540 


JR 


NZ,READ20 


7eF2 CB25 


02550 


SLA 


L 


70F4 F8 


02560 


RET 


M 


70F5 18F7 


02570 


JR 


READ 10 


70F7 4F 


02580 READ20 


LD 


C,A 


7 0F8 AF 


02590 


XOR 


A 


70F9 CB3D 


02600 READ25 


SRL 


L 


70FB 3804 


02610 


JR 


C,READ35 


70FD C608 


02620 READ30 


ADD 


A, 8 


70FF 18FB 


02630 


JR 


READ25 


7101 06FF 


02640 READ35 


LD 


B, 0FFH 


7103 04 


02650 READ40 


INC 


B 


7104 CB39 


02660 


SRL 


C 


7106 30FB 


02670 


JR 


NC,READ4B 


7108 80 


02680 


ADD 


A,B 


7109 4F 


02690 


LD 


C,A 


710A 3A8038 


02700 


LD 


A, (3880H) 


710D 0F 


02710 


RRCA 




710E 0F 


02720 


RRCA 




710F 81 


02730 


ADD 


A,C 


7110 4F 


02740 


LD 


C,A 


7111 0600 


02750 


LD 


B,0 


7113 21BG77 


02760 


LD 


HL,KBTAB 


7116 09 


02770 


ADD 


HL,BC 


7117 7E 


27 80 


LD 


A, (HL) 


7118 C9 


02790 
02800 ; 
02810 ; 


RET 




7119 


02820 HEXASC 


EQU 


S 


7119 D5 


02830 


PUSH 


DE 


711A E5 


02840 


PUSH 


HL 


711B 212E78 


02650 


LD 


HL, ASCII 


711E 47 


02860 


LD 


B,A 


711F E60F 


02870 


AND 


0FH 


7121 5F 


02880 


LD 


E,A 


7122 1600 


02890 


LD 


D,0 


7124 19 


02900 


ADD 


HL,DE 


7125 4E 


02910 


LD 


C,(HL) 


7126 78 


02920 


LD 


A,B 


7127 E6F0 


02930 


AND 


0F0K 


7129 0F 


02940 


RRCA 




712A 0F 


02950 


RRCA 




712B 0F 


02960 


RRCA 




712C 0F 


02970 


RRCA 




712D 5F 


02980 


LD 


E,A 


712E 212E78 


02990 


LD 


HL, ASCII 


7131 19 


03000 


ADD 


HL.DE 


7132 46 


03010 


LD 


B,(HL) 


7133 El 


03020 


POP 


HL 


7134 Dl 


03030 


POP 


DE 


71i5 C9 


03040 


RET 





rNO. 
[FLAG IT 



[CONVERT TO HEX 

rDE HAS STORAGE LOCATIO 



rPUT LOW NIBBLE IN LOC. 



rBACK TO NORMAL 
rNEXT DIGIT 



rCLEAR Z FLAG 
[CLEAR CARRY FLAG 



I DONE 



[KEYBOARD SCAN ROUTINE 
[CHECK FOR ACTIVITY 

NOTHING. 
SAVE REGS 
DEBOUNCE KEYBOARD 

;GET CHARACTER 

[RESTORE 

[RESET Z FLAG 

[SAVE CHARACTER 

[WAIT UNTIL KEY LIFTED 



[DONE 
[START SCAN 



: CONVERT HEX TO ASCII 
;SAVE 

ASCII TABLE 
SAVE A 

GET LOW NIBBLE 
SET AS OFFSET 

INDEX INTO TABLE 

GET ASCII CHAR. 

RESTORE 

GET HIGH NIBBLE 

SHIFT TO LOW NIBBLE 



SET AS OFFSET 
TRANSLATION TABLE 
INDEX INTO TABLE 
GET ASCII CHAR. 
RESTORE 



Prnqrun' conliriijf, 
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Program continuea 




03050 


; 










7136 


03060 


LPRINT 


EQU 


S 


; SERIAL PRINTER DRIVER 




7136 B7 


03070 




OR 


A 


jANYTBING TO PRINT? 




7137 C8 


03080 




RET 


Z 


;N0 




7138 F5 


03090 


LPR010 


PUSB 


AP 


;SAVE FOR NOW 




7139 DBEA 


03100 


LFR020 


IN 


A,(C(»n'RL) 


jCBECK OART STATUS 




713B CB77 


03110 




BIT 


6, A 


; READY? 




713D 28FA 


03120 




JR 


Z,LPR02e 


;N0. 




713F Fl 


03130 




POP 


AF 


I RESTORE 




7140 D3EB 


03140 




OUT 


(DATAP) ,A 


;SEND TO LINE PRINTER 




7142 FEID 


03150 




CP 


CR 


;WAS IT A CR7 




7144 C0 


03160 




RET 


NZ 


;N0. DONE 




7145 3E0A 


03170 




LD 


A,LF 


;ADD A LINEFEED 




7147 IBEF 


03180 
03190 


; 


JR 


LPRB10 


I GO SEND TO LP. 




7149 

R5 

7149 11CI3F 


03200 


SECDFN 


EQU 


S 


IDEPINE SECTOR PARAMETE 




03210 




LD 


DE,LINE16 


JLAST LINE ON SCREEN 




714C CD5670 


03220 




CALL 


CLRLIN 


jCLEAR IT FIRST 




714F 213E78 


03230 




LD 


BL,RWMSG 


I PROMPT USER 




7152 013800 


03240 




LD 


BC , RWLEN 


I PROMPT LENGTH 




7155 EDB0 


03250 




LDIR 




;SHOW USER 






03260 


; GET 


DRIVE NUMBER 






7157 21BB79 


03270 




LD 


BL, DRIVEN 


.■STORAGE LOCATION 




715A 3601 


03280 




LD 


(BL) ,0 


;CLEAR FIRST 




715C 11CD3F 


03290 




LD 


DE.DSKPOS 


; SCREEN POSITION 




715F EB 


03300 




EX 


DE,BL 






7160 CDBA70 


03310 




CALL 


GETDIG 






7163 D8 


03320 




RET 


C 








03330 


; GET 


TRACK NUMBER 






7164 21E13F 


03340 




LD 


HL,TRKPOS 


;SCREEN POSITION 




7167 110C79 


03350 




LD 


DE,TRACKN 


; STORAGE LOCATION 




716A CDBA70 


03360 




CALL 


GETDIG 






716D DB 


03370 




RET 


C 






7ieE CDBA70 


03380 




CALL 


GETDIG 






7171 D8 


03390 




RET 


C 


; TERMINATE 






03400 


! GET 


SECTOR 


NUMBER 






7172 21P63F 


03410 




LD 


BLrSECPOS 


; SCREEN POSITION 




7175 110D79 


03421 




LD 


DE,5ECTRN 


; STORAGE LOCATION 




7178 CDBA70 


03430 




CALL 


GETDIG 






717B D8 


03440 




RET 


C 






717C CDBA7B 


03450 




CALL 


GETDIG 






717F C9 


03460 




RET 







7180 

7180 D3EB 

7182 3EF4 

7184 D3EA 

7186 C9 



7187 

7187 3AED37 
718A CD1971 
718D 78 
718E 41 
71BF 4F 
7190 ED43E13F 
7194 C9 



7195 

7195 117673 
7198 2ie03C 
719B 010004 
719E EDB0 
71A0 C9 

71A1 

71A1 11003C 
71A4 217673 
71A7 010004 
71AA EDB0 
71 AC C9 



71U) 

7 IAD 3A0B79 
71B0 32E137 
71B3 21EC37 
71B6 11EF37 
71B9 010000 
71BC 0B 
71BD 7B 
71BE Bl 



03470 
03480 
03490 
03500 

03510 
03520 
03530 

03540 
03550 
03560 
03570 
035B0 
03590 
03600 
03610 
03620 
03630 
03640 
03650 
03660 
03670 
03680 
03690 
03700 
03710 
03720 
03730 
03740 
03750 
03760 
03770 
037B0 
03790 
03 800 
03810 
03820 
03B30 
03840 
03850 
03860 
03870 
03B80 
03B90 
B39II 



UART 



UPTRAK 



VIDSAV 



VIDRES 



EQU 

OUT 

LD 

OUT 

RET 



EQU 

LD 

CALL 

LD 

LD 

LD 

LD 

RET 



EQU 

LD 

LD 

LD 

LDIR 

RET 

EQU 

LD 

LD 

LD 

LDIR 

RET 



(RESET] rA 
A,BF4[1 
(CONTRL) ,A 



A , ( TRACK ) 

HEXASC 

A,B 

B,C 

C,A 

(TRKPOS) ,BC 



DE,VIDBUF 
HL.VIDHEM 
BCjVIDLEN 



DEfVIDHEM 
HL,VIDBUF 
BC,VIDLEN 



; INITIALIZE UART 
; RESET UART 
;SET PARAMETERS 
;SET SWITCHES 



lUPDATE TRACK DISPLAY 
;GET ACTUAL TRACK < 
f CONVERT TO ASCII 
;5WAP B AND C 



;SAVE SCREEN IN BUFFER 
; VIDEO SAVE BUFFER 
.-VIDEO MEMORY 
;MEMORY LENGTH 
;MOVE TO SAVE AREA 
;DONE 

;RESTOR SCREEN 
; VIDEO MEMORY 
;VIDEO SAVE BUFFER 
; BUFFER LENGTH 
;MOVE TO SCREEN 



I F ; ; I ; ; ; 1 1 ; ; ; ; ) ; f M r ! ) ; ; ; ; ; ; 

; FLOPPY I/O ROUTINE 

'f J J a lit ',}}}!}} tr if, } it Hi! 1 

FDRDY EQU $ 



; ! ;; 



DELAY 



LD 

LD 

LD 

LD 

LD 

DEC 

LD 

OR 



Ar (DRIVEN] 

(DRIVE) ,A 

HL,COMAND 

DE,DATA 

BCr0 

BC 

A,B 

C 



I READY DISK 

;GET DRIVE NUMBER 

;SET COMMAND REGISTER 
;SET DATA REGISTER 
; DELAY TIME 

; UNTIL DISK 
; IS UP TO 



Program cor^Unue\> 



334 • 80 Microcomputing. December 1981 



COMPUTER CENTER 



31 East 31il Street • Htm York. N.Y. 
(bttwttn MtHaon A Pari Amw») 



480 Uxington Avenue • New York. N.Y. 
(Amertcmn Brmndt BUg.. belwwi 46th A 47th Si) 



presenting the LARGEST SELECTION OF SOFTWARE EVER ASSEMBLED. 



the best available on the market today for TRS-80® Computers 

at SUPER DISCOUNT PRICES! 



AVALON HILL 



D TANK TICS 

D MIDWAV 

D NUKE WAR 

D PLANET MINERS 

a CONVOY RAIDER 

D B^ BOMBER 

D LOHDS OF KARMA 

D CONFLICT 2500 . ... 

D COMPUTER ACOLJIHt 

a BASEBALL 

a EMPIRE OVERMINO 

AOnNTURE INTCRHATMHAL 

D ADVENTURE MINT BOOK ... 

D ADVENTURE «0 

D ADVENTURE (T 2 3l [DJ ... 

D ADVENTURE 14 5.61 |D: .... 

D ADVENTURE |7 a 9i |D' . . 

□ ADVENTURE 11011 12l |D; 
D ADVENTURE (speci'y 1-121 . 
D MEAN CHECKERS MACHINE . 
D MEAN CHECKERS MACHINE |D 

G Dfl CHIPS 

a DR CHIPS |D1 

D INTER FICTION SAMPLER ID| .. 

D INTER-LOCAL CALLS [U| . . 

D INTER-TWO HEADS [DJ . . 

D INTER-IMPETUOUS [D] 

a KID-VENTURE t 

a STAR TREK 3 5 

□ STAR TREK36 [D] 

□ ZOSSED IN SPACE 

□ MACES m BARLOG 

D MACES •! SISYPHUS .... 

a LUNAR LANDER 

a LUNAR LANDER [D| 

D POKER 

D GALACTIC TRILOGY [D| . 

O SILVER FLASH . . 

Q SILVER FLASH |D| 

a MISSILE ATTACK 

n STAR SCOUT 

D SPACE INTRUDERS 

D STAR FIGHTER 



21 50 
13 50 

.13 50 
.13 50 
.13 50 
.13 50 
IB 00 
13 50 
IBOO 

22 50 
27 00 



7 95 
625 
35 95 
35 95 

35 95 
J5 95 

17 95 
17 95 
22 95 
.17 95 
17 95 
13 55 
17 95 
.17 95 
17 95 
17 95 
17 95 
17 95 
13 55 
31 00 
.31 00 
.17 95 
.18 95 
13 55 
.35 95 
.17 95 
1795 
17 95 
.1795 
IB 75 
22 50 



ACORN SOFTWARE 

D ATERM 

a SYSTEM SAVERS 

n DISASSEMBLER 

O DISK/TAPE UTILITY 

D STAR TREK SIMULATION . . . . 

C GAMMON CHALLENGER 

D PIGSKIN 

D ULTRA TREK 

D SPACE WAR 

D WARP/LANDER 

D BASKETBALL 1D| 

D BASKETBALL 

D DUEL-N-DROiDS [D) .... 

O DUEL-N-DROIDS 

D INVADERS FROM SPACE . 
D INVADERS FROM SPACE (D] 

D PIGSKIN |D| 

D PINBALL . 

a PINBALL |D] . . 

D EVEREST EXPLORER 

D EVEREST EXPLORER \D\ 
D SUPERSCRIPT |D] . . . 

RIEO SYSTEMS 

O DEATHMAZE5000 

D HATS REVENGE 

a REALITY ENDS 



17 95 
.13.55 
.13 56 

17 95 
..8.95 

13.55 
13 55 
.13 55 
.8 95 
.8 95 
IB 95 
13 55 

18 95 
.13 55 

13 55 
IB 95 
.1B95 
13 55 
IB 95 
13 45 
18 95 
45 00 



11 65 
11 65 
S96 



Check program desired. 
Complete ordering information 
and mail entire ad. 
Immediate Stiipments (rom stock. 



KEY: 

C-TRS-80 Color 

D-cn Disc 

If not marked - Cassette 



EPX-AUTOMATED SIMUUT10H 

D STAR WARRIOR [CASS. OR DISK] 35 95 

D THREE PACK ID] 45 00 

D STARFLEET |CASS OR DISK] 22 50 

D INVASION ICASS.OROISK] 22 50 

D APSHAI ICASS OH DISK] 35 96 

D RVN ICASS ORDISKl 17 95 

D MORLOC ICASS. OR DISK] 17 95 

□ HIGEL ICASS OH DISK] 26 95 

D HELLFIRE ICASS OR DISK] 35 95 

D CRUSH CRUMBLE ACHOMPICass or 01 2695 

D TUESDAY QUARTERBACK [D] . .. 26 95 

COMPUTCR SIMULATIONS COMPANY 

□ BATTLE OF BULGE-BASTGONFS 17 95 

D D-DAY INVASION OF FRANCE 17 95 

□ DOG RACE COLOR ONLY IC! 5 95 

a GREAT DICTATOR 7 25 

□ JEDI KNIGHT 11 75 

D LUNAR ENCOUNTER 11.75 

D MERCENARY 8 95 

Q SHARK COLORONLY |C] 5 95 

□ SLOT MACHINE 7 25 

a BATTLE OF BULGE-ST VITH 13.55 

a STAR CRUISERS 13 55 

D U-BOAT COLORONLYId 5 95 

DORIONWAH COLORONLY [C] 5 95 

D POLARIS COLORONLYId 5 95 

D ASTEROID PIRATES 13 55 

INSTANT SOnWARE 

D AIR FLIGHT SIMULATION 8 95 

D ASTEROIDS (D] 1795 

D BALL ruRRETGUNNER 8 95 

n BATTLEGROUND 8 95 

a CHECK MANAGEMENT [D] 36 55 

D CHESSMATE-aO 17 95 

□ COSMIC PATHOL 13 55 

a COSMIC PATROL (D| 17 95 

a DAREDEVIL . . 8 95 

a DISASSEMBLER 8 95 

a DISK EDITOR [D] 36 55 

D DISK SCOPE 1D| 17 95 

D DLDIS (D] 1795 

n DEVICE DRIVERS 1795 

a ENHANCED BASIC 22.50 

a FLIGHT PATH 8 95 

a I TEST 8.95 

n INVADERS 895 

□ INVESTORS PARADISE 8 95 

D IRV 225C 

□ IRV [D] 27 55 

n JET FLIGHTER PILOT 13 55 

a MONEY MADNESS 8 95 

n NIGHT FLIGHT B 95 

D ONE-D MAILING LIST |D| 22 50 

a SKlRMISH-80 895 

D TLDIS 13.55 

a UTILITY I 695 

D UTILITY H 895 

QUALITY SOFTWARE 

C DEBUG 1355 

D FASIGAMMON 1795 

lOWBALL POKER 1045 

D BANKSHOT 8 95 

D POKER PETE 10 45 

D RUMMY MASTER 1045 

D 3DTICTACTOE 1355 

DOS LIGHT PEN 17 95 

D SKETCnaO . 1355 

If you don't see it listed, write. 



PERSONAL SOFTWARE 

□ CCA MCMT-THS-BO . 85 00 
n ZORK [DI ... 3595 

RIB nVE SOFTWARE 

D ATTACK FORCE 14 30 

D GALAXY INVASION 14 30 

D METEOR MISSION II 14 30 

□ SUPERNOVA 14 30 

a COSMIC FIGHTER 14 30 

D ROBOT ATTACK U 30 

APPARAT 

D NEWDOS 60 2 . i3bOC- 

HAYDEN 

n SAHGON II 25 (X) 

D SARGlNII ;D; 3000 

STRATEBW SIMUUTMWS 

a COMPUTER BISMARCK |Di . 5150 

n COMPUTER BISMARCK 42 00 

SUB- LOGIC 

□ TB0-FS1 Flight simulator ??oo 

D 3DGRAPHICS .2650 

MICROSOFT SOFTWARE 

Q ADVENTURE [Dl . . . 25 50 

□ ASSEMBLY DEVELOPMENT [D] . .8000 
n BASIC COMPILER [D] .17500 
a EDI rOH ASSEMBLER 25 00 
n FORTRAN COMPILER !DI 80 00 

□ LEVEL III BASIC 4400 

n MuMATH [O] 6400 

n OLYh*>IC OECATKALON jCASS OR DISK) 25 00 

D TYPING TUTOR 13 55 

SSM 

a LA2Y WRITER [D] .11250 

D CONQUEST 13 45 

D DISASSEMBLER [C] 1345 

D HANGMAN [Cj 11 fi5 

D TAPE COPY 1345 

TP8 

□ DEATH DREADNAUGHT 1345 

a DEATH DREADNAUGHT [D| ... .1795 

a DEADLY DUNGEON 13 45 

ID OMNI TERM jD] .. 85 00 

a DRAGON QUEST 14.35 

a DRAGON QUEST |D| . ..1975 
n TRIPLE ADVENTURE [D] 31 00 

SYNERBISTIC SOLAR 

D ACE 21 1/95 

D ANTS 1345 

a LIFE 1345 

n PARSECTOH .. . 17.95 

SPECTRAL 

O SPACE INVADERS jC] .19 75 

D METEROiDS |C] 19 ?£ 

D SPACEWAR ;c; 1975 

D LIFE |C| . 1345 

D ETCH-A-SKETCH Ic;. 8 95 

n ARTILLERY |C; ', 725 

n SPACE TRADERS \C' 13 45 

a MAGIC B01 |C: 22 50 

.we probably have it in stock! 



Slip tnf above programs as checked lo 

Mr iMrs _^ 

Address 

Citv 

SUle ^_^^_ .Zip 

1 have a . 



Nam* of Computer 



Numoei of Programs Ordered 

Amounl ot order 

H Y lesKlentsaddSalesTa' . 

Add sliipDing anywhere iri the U S 

Total amounl efidoset) 

Cnarge rny D Master Charge D Vi: 

Signature 



2.00 



K memory Card No 



BO MICBO-DEC at 



Personal Checks please aitOMi 3 weeks 



.Expires 



Mail to: 



\ 



TRS-80 IS a registered trademark of TANDY CORP 



\ Prices subject to change witliout notice. 



DI6IBYTE SYBTEMS COBB 

31 East 31st Street, New York, N.Y, 10016 
OUTSIDE NEW YORK CALL TOLL FREE (800) 221-3144 

IN NEW YORK CALL (212) S89-6975 



1^226 



^X 



P'Og^jm coni 


nufC 


















71BF 


20FB 


B3910 




JR 


NZ, DELAY ; 


SPEED. 






71C1 


C9 


03920 




RET 










71C2 




B393B 


TRZERO 


EQU 


$ ; 


POSITION TO TRACK 






71C2 


3603 


B3940 




LD 


(HL) ,RESTOR 








71C4 


7E 


B3950 


TRZB10 


LD 


A,(HL) ; 


GET STATUS 






71C5 


E69e 


03961 




AND 


TlERR ; 


ERRORS? 






71C7 


C0 


03970 




RET 


NZ ; 


YES. EXIT 






71C8 


CB46 


03980 




BIT 


BUSY,{HL) ! 


DONE? 






71 CA 


C2C471 


0399B 




JP 


NZ,TRZ010 ; 


NOT YET. 






71CD 


3E01 


04000 




LD 


A,l 








71CF 


321279 


04010 




LD 


(INIT),A ! 


FLAG AS READY 






71D2 


C9 


04020 




RET 










71D3 




B403B 


TRSEEK 


EQU 


5 J 


FIND SPECIFIED TRACK 






71D3 


3AED37 


04040 




LD 


A, (TRACK) J 


GET CURRENT TRACK 






71D6 


47 


04B5B 




LD 


B,A 








71D7 


3A0C79 


B4BeB 




LD 


A,[TRACKN} , 


GET SELECTED TRACK 






71DA 


B8 


04B70 




CP 


B ; 


SAME? 






71DB 


C8 


04080 




RET 


Z , 


YES. DONE 






71DC 


32EF37 


0409B 




LD 


(DATA) ,A 


LOAD IT 






71DF 


3E13 


B41BB 




LD 


A, SEEK 


SEEK COMMAND 






71E1 


77 


B411B 




LD 


(HL},A 


ISSUE COMMAND 






71E2 


7E 


04120 


TRS010 


LD 


A,{HL1 ) 


GET STATUS 






71E3 


E698 


B413B 




AND 


TlERR ] 


ERRORS? 






71E5 


C0 


04140 




RET 


NZ 


YES. EXIT 






71E6 


CB46 


84150 




BIT 


BUSY, (HL) 


DONE? 






71E8 


C2E271 


04160 




JP 


NZ,TRS010 


NOT YET. 






71 EB 


C9 


B4170 




RET 










71 EC 




04180 


SECGET 


EQU 


s 


SECTOR READ 






71EC 


3A0D7 9 


04190 




LD 


A,{SECTRN) 


GET SECTOR NUMBER 






71EF 


32EE37 


B42BB 




LD 


(SECTOR) ,A 


SETUP SECTOR REGISTER 






71F2 


B1BB7A 


B421B 




LD 


BC,SECBUF 


DATA BUFFER 






71F5 


3E8C 


04220 




LD 


A, READS 


SET COMMAND 






71P7 


77 


0423B 




LD 


(HL) ,A 


ISSUE COMMAND 






71FB 


CB4E 


04240 


SEC010 


BIT 


DRQ,(HL) 


DATA REQUEST? 






71FA 


CAF871 


04250 




JP 


Z,5EC01B 


NO. WAIT 






71FD 

RY 

71FE 


lA 


04260 




LD 


A,{DE) 


HOVE DATA BETWEEN MEMO 






02 


04270 




LD 


(BC) ,A 


AND FLOPPY DISK 






71FF 


0C 


04280 




INC 


C 


ONE MORE BYTE 






7200 


C2FB71 


04290 




JP 


NZ,SEC010 


DO 1 SECTOR (256 BYTES 






7203 


C9 


04300 




RET 










72B4 




0431B 


SECPUT 


EQU 


s 


WRITE SECTOR 






7204 


3A0D79 


04320 




LD 


A,(SECTRN} 


GET SECTOR NUMBER 






72B7 


32EE37 


04330 




LD 


[SECTOR) ,A 


LOAD IT 






720A 


01007A 


04340 




LD 


BCSECBUF 


DATA BUFFFER 






720D 


3EAC 


B435B 




LD 


A, WRITES 


SETUP COMMAND 






720F 


77 


04360 




LD 


(HL) ,A 


ISSUE COMMAND 






7210 


CB4E 


B4370 


SECB20 


BIT 


DRQ, (HL) 


DATA REQUEST? 






7212 


CA1072 


04380 




JP 


Z,SEC020 


•NO. WAIT 






7215 


0A 


04390 




LD 


A,(BC) 


•GET BYTE 






7216 


12 


B440B 




LD 


CDE] ,A 


■WRITE TO DISK 






7217 


0C 


04410 




INC 


C 


■ONE MORE BYTE 






7218 

) 

721B 


C21072 


04420 




JP 


NZrSEC020 


fDO 1 SECTOR (256 BYTES 






C9 


04430 
04440 




RET 
















; ) ! I ; I 


rl?!?!!!rf!jf«ff7'f 


' 










04450 


; 


COHHAND ROUTINES 


; 










04460 


; M ; I ; 


; I ; ; ; ; 


;; ; I ; ; ; ; M M F ; ; I ] 1 1 


' 






721C 




04470 


DISPLY 


EQU 


5 


; DISPLAY SECTOR 






721C 


CD9571 


04480 




CALL 


VIDSAV 


;SAVE SCREEN 






721F 


0610 


B4490 




LD 


B, LINES 








7221 


3E00 


B45B0 




LD 


A,0 


; STARTING OFFSET 






7223 


11BB7A 


04S10 




LD 


DE,SECBUF 


; BUFFER ADDRESS 






7226 


D9 


04520 




EXX 










7227 


11B03C 


04530 




LD 


DE,VIDHEK 


;VIDEO SCREEN 






722A 


D9 


04540 




EXX 










722B 


CD6E70 


04550 


DIS01B 


CALL 


FORMAT 


J FORMAT 16 BYTES 






722E 


D9 


04560 




EXX 










722F 


217677 


04570 




LD 


HL,FMTBUP 


; FORMATTED LINE 






7232 


B140BB 


04580 




LD 


BC,LINSIZ 








7235 


EDBB 


04590 




LDIR 




;MOVE TO VIDEO 






7237 


D9 


04600 




EXX 










7238 


C610 


04610 




ADD 


A, 16 


;BUMP OFFSET 






723A 


10EF 


0462B 




DJNZ 


DIS01B 


;LO0P UNTIL DONE 






723C 


CDD370 


0463B 


015020 


CALL 


KEYBRD 


jGET INPUT 






723F 


FE58 


04640 




CP 


■X' 


(BACK TO MAIN MENU? 






7241 


20F9 


04650 




JR 


NZ,DIS020 


jNO. WAIT 






7243 


CDA171 


04660 




CALL 


VIDRES 


(RESTORE SCREEN 






7246 


C9 


04670 
04680 
04690 
04700 


] 


RET 










7247 




04710 


MODIFY 


EQU 


S 


(MODIFY SECTOR CONTENTS 






7247 


11C03F 


04720 




LD 


DE,LINE16 


(MESSAGE LINE 


















P'OQiii" tnniinuf. 
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TEXAS COMPUTER SYSTEMS 



Offers Lowest Prices on 



FOR PERSONAL BUSINESS 
OR ENTERTAINMENT 

Color Computer 

4K Level I S319 
16K Level! $439 
16K Extended Basic $489 

With TCS Memory: 

16K Level I $369 

16K Extended Basic $449 




Expansion Interfaces 

Zero K inierface $2b4 With TCS Memory: 

16K Interface $359 16K Interface $318 

32K Interface $469 32K Interface $388 



Epson Printers $Call 

iBllr a.* ', ~a:-n Dr -:c riii 'uli solwi'B conlfj ra; ec 66 3- i3i columns 80 C3S C'O.'KIioia 
KactoMwo a SDOMbie D' -iftwo 1300 i«s man nwresl comwlil'V* D''"'e' lh!! I64i ;»■■ 'O' oui 



10* D"« 

MX-80 Tractor Feed 
MX-80 FT Friction and 
Tractor 



MX-lOOGraphtrax, Friction 
and Tractor up to 15 " 
wide 
Graphtrax for MX-80. IVIX-80 FT, graphics option. 



SOFTWARE 

EPSON IVIX-BO 
PRINTER DISKETTE 



" )■■■;' e'f :■■*■■? ^ -■■ . ■• ;ieit 'lies '0' use 
*''ti jcii' tMO" M« flO P-if"*r 

M/CMft-Swoaiiol'riPtosorPfiiieuwnrtyrms 
ID Iff IV ■■■"F flKBtiiY lion- DOS Of aj w" ot i" juit; 
rryi'i'i ;■,■'•«"• Se' uD If* O'inte' "0"' DOS loliw 
'.Cf".lv '■ , •!. A.inl ttien run Iht Qioii'i"' 

BIGLETT/BAS "'iWiice i^iQe qMOlitc if^ie'i on 
,i.iiriir ■■■c .i-CSt'fen DurnDtheWltfli^ loonmei W 

10 Oii* A' c«i 3 oitie'en! m;p leiws lo trip or,niei 
PtOflidfUi'menuO'iver voomav J'iPCO"S'fiK.Ma't)e 
ifilei ti!;*'. fo' MtBGf infj n!0 yOj-MS't O'Ogrjm 

[PSON/SM Ue^Qeln.s^'t;J!'rt>oou'»|'rtOi'*> 
a.. ;iF-c'>~ JiviltiftiisiireitnYn'Thf pi.n;e'CW" 
-.I- ,-' *■"■ J ' f:'?-c!)">">i"0*'"i«'i«'i'?D'Me''- 
lirgriepii'DOseoMfieconi'njril 'ou "M" "O"*'*' 
twtii jnO foir'' t[) aixjr-«ri.v«)'i f il'WWIy eJSy to 

use fa nwtiei using irw p'wiie' mycn ««■« tns" 
evB' Wee 



JKl MTCH - il.'i - 

NfftllOS B:; ic trwi ittf JKl lunri.on *<i< pim) (n- 
IHS809'*Df"csrtniWln*[)'"ile"Piniin5in"wsl.fn 
nj'dinooe '•il''e'iii*''lf«'<'S60'"nOf in.s,>iio*' 
jnol "w 'eitii'ps of rt« D'mlcr tottt usM Du! lOu C>~ 
OiiTHp IIP srippr: 10 ine O'iiKm itl .tn» tiiiit w?" j 

j-apnic! 
OEMO/US ~ ■i»Of luiottavi^'X" *■"> '^' 

tf- ' , ' n ■■t>. F'lsio :-e3'f "'affiftitny > 

fir..' ■,'(;.■- ..■ ■■■=■ 

UUfl/US-CiiSTO'^ 'jMI rngiing progiatn m 
Ciumnu giJDnics Ma>es CuSlom miiimg UMIS ar; 
easy |Dt) 

DfrSnT[/SM - i stn.(s 01 onf word 0'">i'' 
(Wnnwno^ tnji '.jf: up meigect i"10 i"* BSi'C f'' 
T^^'i Ai; <I''C* (JIfol'S Ji]lo"iiliC luntliWi tC :' 
Cu' P'lnt M'fS *Ftli qripBiC tMKMfS JfOunO li^- 
iwltt one •WO Cent*' a"y feni *Fin one tommjint 

Special P' ice Ail seven oUhp ^bov 
mcHlulesonofiediskeUeof orldoede^ 
JKLl for your Model I or III (or on', 
$29.95 



0^ l,^^'eHS'OalSCCHJ^l)lyrl^l^liv'^ls I'eri ath ;)i,rcn^se ol ihe tosoo MX 8:. 




Model III 16K S835 

Model 111 32KS979 
Model III 48K$1089 



TRS-80 



Hf hjM 111 flMi^ 5i»t» com^jtKi me KtMwi 

Cjii -1 Iw fOu' 'pk'fc «»»di lid |W I twi at ow 

:jtii3[ 



With TCS Memory; 
Model III32KS909 
Model tll48KS969 



Model lll48K2DiskRS232$2100 
Model II132K 1 Disk $1729 

Model III 48K 1 Disk $1849 



TEXAS COMPUTER SYSTEMS 



Offers Lowesf Prices on 



COMPUTERS 




Model II 64K $3288 

Ar excelieni compute' lor yotr Dusiness 
neecJs Easy expanoaoiiilv & compaiiOility 
No formal operator training needec AH ac- 
cessories avanaoie-disk expansions, 
printers so'tware at our low discount 
prices Ou' las! fuiiy msufed air Ueight 
service can assure most denvenes withm 
seven days alte' paymefil is 'eceived 



Corvus Hard Disks SCall 

.Its ot sio'age tor me Moaei |i '<■ i -'- ■ ■ 
,, ' ■ IKJ wCP/M'WDne or sevetakomiiii'F'' ■ i i; 

0", i.i' ii :■ '.'"^r s FnavsnafBasina'ela'!)e';'i''ili-F ■' ''■ 

'ti . ,).■. I ■vren1nianutaOu'e'SC'y''()utEv5or-' 

A'^.o" f1. ' ■osaix)iTiostoir>etcOfn3Lj!e's fts'.'i 

ic'minj.i ,1. . n.i,t.;,., :. in-. .-■>(,.. , y,-, «■ ■ F-ifiF-'"; 'i. .;.,. 
'fliaDiC [HWti faiO dii" ^> ."<: i ■ : '.no;ii:;; 



' ,011 wtn f.'-:^' 

• ulTifieouSly '(' 

^'. 1i[ii".-r 



"es "io'» wo 0'iv« 'u' 



mn'xyr^Wi "an m ifv 



Call M lor tiM lowe^ prfctl 



MICROSOFT 

BASIC-M F .-..'r,:.-!] . h fm i < 

n.r'^e* : tijFnFnq va'ii»c»ie i#^nq1"'»'i O'l^^ asSi' ■ ■' 

!i,i-F!ip nip-[„.-,'ve v«'si'jFi SZ9* w/manu«l. 
S30 Ftidfiual only. 

BASIC COMPtlfR San^p BdM lanau.lQf ii 
111 I , i''p*< «■'" r^'iiT-i" •mil -■ 



■• l^[yFJle^ i tn tpiimp; '^^I's- i»,i!i foii,, .v g,(,ii 
L, ,---■ l,l*'iFr .^^^e■"^l.^■ .-r^'iis ■ i'V ■ 
'ns: I' S32S w/fninual. SJO manual only. 
FDIITR*tt-«8 -■'■" '- • ■' "■• 



^HlO'1^ 



llltll 



.llllf 



StOO w/tnanual tSO manual oniv 



Word Processor Package S2679 

includes 2 Disk Mocei I'l with 4fiK Eoson Mx-80Tracio'feed witricaoie ana 
wore processing software ready to operate. Lists at S3300 Our low pnce 
special this rriontn S2879. For MX-80 FT Tractor and Fnciicn add $99 



Special-WithTCS Memory 
if Model III 48K 2 Disks 

I ^•■\ pF3*en MP' 3'Fvfs ■^0(1'' err 't tii[in» OD*' jl«on and 
PeFrijm LontiQ'igF iFmiieo 91J Cii *jf'S''I« ^^l^ tn' 
rtpiHil'. 



$1895 



Printers 



Daisy Wheel II 
$1695 



(( L'." 1 fUf^ ilf . ■ 'ly loi woio p'oieSVHJ O 
^Ui SUnOitC Ceiiironiti M'iiiti inle'lK* Fun 16' 



Line Printer IV $825 
Line Printer V $1599 
Line Printer VI $995 
Line Printer VII $350 



Pochet Computer 
& Ace. SCall 

inttdjue in tiocii 



iW 3"' 



■ '^ni!>(-iF' 



If ifa'- jOft -I 
'J .«..! i^DFlity 



TEXAS COMPVT£R SYSTEMS 

BOX 1327, ARLINGTON, TEXAS 76004-1327 

For last, elfictent sef^ice we can an Ireigni 'rom Daiias 
to ma|or a-'o near vou Can for information 

Toll Free Number 800-433-5184 

Texas Residents 817-274-5625 



■ See Lislot AOvertisers on page 4 16 
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Program contmuea 



724A CD567fl 


04730 


CALL 


CLFLIN ; 


CLEAR IT FIRST 


724D 217678 


04740 


LD 


HLjMODMSG ; 


MODIFY MESSAGE 


7250 012400 


04750 


LD 


BCMODLEN 




7253 EDB0 


04760 


LDIR 








04770 


; GET STARTING 


OFFSET 




7255 CD9571 


04780 


CALL 


VIDSAV ; 


SAVE SCREEN FIRST 


7258 21E23F 


04790 


LD 


HL,OFFPOS ; 


OFFSET POSITION 


725B 110F79 


04800 


LD 


DE, OFFSET ; 


TEMP STORAGE 


725E CDBA70 


04610 


CALL 


GETDIG , 


GET OFFSET 


7261 D8 


0482B 


RET 


c 


DONE 


7262 CDBA70 


04830 


CALL 


GETDIG 




7265 D8 


04840 


RET 


c 


TERMINATE 


7266 CD6270 


04 850 


CALL 


CLRSCN 


CLEAR THE SCREEN 


7269 21003C 


04860 


LD 


HLrVIDHEH ; 


START DISPLAY AT TOP 


726C 3A0F79 


04870 


LO 


A, (OFFSET) ; 


SET INITIAL OFFSET 


726F 11B07A 


04880 


LD 


DE,SECBUF , 


BUFFER ADDRESS 


7272 5F 


04S90 


LD 


E,A , 


SET BYTE OFFSET IN S! 


TOR 












04900 


; DISPLAY STARTING OFFSET 




7273 CD1971 


04910 


HOD010 CALL 


HEXASC 


CONVERT TO HEX 


7276 70 


04920 


LD 


(HL) ,B 




7277 23 


04930 


INC 


HL 




7278 71 


04940 


U) 


(HL) ,C 




7279 23 


04950 


INC 


HL 




727A 23 


04960 


INC 


HL 




727B 23 


04970 


INC 


HL 






04960 


; DISPLAY BYTE 


AT OFFSET 




727C lA 


04 9 90 


LD 


A, (DE) 


GET BYTE 


727D CD1971 


05000 


CALL 


HEXASC 


CONVERT TO ASCII 


7280 70 


05010 


LD 


(HL) ,B 




7281 23 


05020 


INC 


BL 




7282 71 


05030 


LD 


(HL) ,C 




7283 23 


05040 


INC 


HL 




7284 23 


05050 


INC 


HL 






05060 


J GET MODIFYING BYTES 




7285 D5 


05070 


PUSH 


DE 


SAVE SECTOR ADDR 


7286 110E79 


05080 


LD 


DE, MOD BYT 


STORAGE FOR HOD BYTE 


7289 CDBA70 


05090 


CALL 


GETDIG 




728C Dl 


05100 


POP 


DE 




728D 3839 


05110 


JR 


C,MOD0 3 


TERMINATE 


728F 2810 


05120 


JR 


Z,MOD020 


NEXT BYTE 


7291 D5 


05130 


PUSH 


DE 




7292 llflE79 


05140 


LD 


DE,HODBYT 




7295 CDBA70 


05150 


CALL 


GETDIG 


2'ND DIGIT 


7298 Dl 


05160 


POP 


DE 




7299 382D 


05170 


JR 


C,HOD030 


END 


729B 2804 


05180 


JR 


Z,MOD0 20 


NEXT BYTE 


729D 3A0E79 


05190 


LD 


A, (MODBYT) 


GET MOD 


7 2A0 12 


05200 


LD 


(DE) ,A 


UPDATE SECTOR 


72A1 3620 


05210 


HOD0 20 LD 


(HL),' ' 


CLEAR BYTE 


72A3 7D 


05220 


LD 


A,L 


GET COLUMN NUMBER 


72A4 F63F 


05230 


OR 


3FH 


SET TO LINE END 


72A6 6F 


05240 


LD 


L,A 




72A7 23 


05250 


INC 


HL 


BUMP TO NEXT LINE 


72A8 7C 


05260 


LD 


A,H 


CHECK SCREEN END 


72A9 FE40 


05270 


CP 


40H 


BEYOND SCREEN? 


72AB 2011 


05280 


JR 


NZ,MOD025 


NOT YET. 


72AD D5 


05290 


PUSH 


DE 


SAVE 


72AE 21403C 


05300 


LD 


HL,VIDMEM-*-LINSIZ 


; SCROLL DOWN 


72B1 11003C 


05310 


LD 


DE,VIDHEM 




72B4 01C003 


05320 


LD 


BC.VIDLEN-LINSIZ 




72B7 EDB0 


05330 


LDIR 






72B9 CD5670 


05340 


CALL 


CLRLIN 




72BC EB 


05350 


EX 


DE,HL 


•SET HL TO LAST LINE 


72BD Dl 


05360 


POP 


DE 


■RESTORE 


72BE 3A0F79 


05370 


MOD0 2 5 LD 


A, [OFFSET) 


•GET OFFSET 


72C1 3C 


05380 


INC 


A 


■NEXT BYTE 


72C2 320F79 


05390 


LD 


(OFFSET) ,A 


•SAVE IT 


72C5 13 


05400 


INC 


DE 


•NEXT BYTE IN SECTOR 


72C6 IBAB 


05410 


JR 


MOD010 


■DISPLAY ANOTHER LINE 


72C8 CDA171 


05420 


MOD030 CALL 


VIDREE 


.-REDISPLAY SCREEN 


72CB C9 


05430 
05440 
05450 


RET 






72CC 


05460 


PRINT EQU 


s 


fPRINT SECTOR 


72CC 21C03F 


05470 


LD 


i!L,LINE16 


•SECTOR INFO 


72CF 063A 


05480 


LD 


B,RHLEN+2 




72D1 3E0D 


05490 


LD 


A, OR 


; SETUP FOR PRINT 


72D3 CD3671 


05500 


CALL 


LPRINT 




72D6 7E 


05510 


PRI005 LD 


A, (HL) 


; PRINT INFO 


72D7 23 


05520 


INC 


HL 




72D8 CD3671 


05530 


CALL 


LPRINT 




72DB 10F9 


05540 


DJNZ 


PRI005 




72DD 3E0D 


05550 


LD 


A,CR 


;END OF LINE 


72DF CD3671 


05560 


CALL 


LPRINT 




72E2 3E0D 


05570 


LD 


A,CR 





Proqiarr^ conurmei 
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\j£L 




Mod«l 4BB-B0B For Modtl 1 Optratlon 

»mmam 



JEL 



Model 4BB-80C For Model 3 Opentlon 



IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPtB-488 controller capability to 
TRS-80 Model 1 or 3, Level 2 or DOS with 
a minimum of 16K. 

488-80B or 488-80C $325. 

• shipping insurance & la* 
WHBN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING LABORATOniES ^291 

11 Neil Drive • Old Bethpage. NY 11804 
Telephone (516) 694-3205 

'Traa«marli ol TanOf Corp 

Tn»r» IS no alliliai'C-i bvrwvffn Scitntilic Engmaarlng 

Laboratories and Tandy Corp or Radio Shack 



UTILITIES 



* MUST FOR ALL 
PROOHAMMERS 



PROGRAM INNOVATIONS 



Mod*! II Diaa«s*mbl*r ■'^'^ 

Oulput in ASCII or hex to pfinter or screen ONLY $73.95 

Data Fila Utility (Model I Level II. 16 K mtn ) Creates/Updates/Sorts ANY distt file 

independent of your program Disk only Sei.ftS 

Modal II Macro Asaomblor Incorporate fast, time-saving macros into assembly 



language programs 



ONLY $74.95 



LOOK! (i> CLS 


i2-A) 


LD B.1BH 


(2-B) 


AST 8 


PRINT MSG ^0 13 




CO A 8 




LD A, 36 


JP?DOS 




RST 8 




RST 8 


MSG DEFM IT WORKS" 




LD HL. MSG 


WSG 


DEFM iTWORKS'i 


END 




LD 8. 1# 
LD C jfDH 




END 



Both programs produce ineeiact same code Program (II was created with the Macro Assembler 
Save JO'ib-SO'Sj lime while reducing error probability' 

ORAND OPENING SPECIAL '0% OH all O'Oers recemeO t>y 1 1 16-81 MAS TER CARD AND 

OUR GUARANTEE All p-ogiams will wO'k asadverdsad Or yOU' monay rfllundud VISA WELCOME" 



j:{.iM:f:i-ii;i:[.vni[.]:k 



P.O. Box 1 3SB Lumbcrlon, N.C. 28350 
Phon*(S1B) 73S-3217 Night 739-36aO 
N.C.RCSIOKNT$ADD41l,SALESTAX ^ 



DELTA PRESENTS 

PRICES WITH BYTE 



MODEl. I' 

3K MaiiinQ List-Keep nocn oi 2000 names & 
oao'esses reirsive anv or^e m 2 SBcor^ds The mosi 
SOpriisiicalBO moiier on the TiorKet Wltti Zip sorting 
rnaiiing lapel printer 3349.95 

DMMU (Dlih/Memorv Monogement utilities) - RooO 
write move ond copy any sector on any Otsu or seo'Cti 
aiSK lor specmc n«i or ASCII string Use DiSASSTBS 
10 aisossembie anvthmg m memory to riigrnyreoaoDle 
Z 80 mnemonics $34 95 

DCS NU-BASlC-Bettei than the other exteodeo 
BASICS, tor much less' Sort & seotch arroys. PEEK & 
POKE, reod from CRT singie-step BASIC Insert & 
aeieie imes undei program control creote iinkobie 
BASIC modules whicn lood & execute wifhout closing 
flies or erasing vofloDies use ON BREAK GOTO lo trap 
interrupts Detter lire & stung editing smgie-iirie 
Qupitcdte & reiocoie tuii rype orieod 90X48 
g'ophics multiline lunciions. much more Must be 
seeniocebeiievedi t170 

DCS CUSTOM SERVICES-We provide fully custom 
sottwore at the industry s most leosohoDle rates Coll 
or write tor oetolls 

MODEL I /III 

MAGIC-Ihots whot we coll Our Advanced Graphics 
inslruc'ion Course learn to draw 3dimensiona( 
snopes ohd curves ttiot look hKes' Volume i ovoiiopie 
nowtor4KI 16KII&III 19 95 

M0D3M0N- Examine, modify dump A lood 'o tope 
compijte JR vaiu« lor hor^d-ossemDly 

16KIII 



OISASSTHS -Machine code disassemDier 

III 

MODEL It DISKS (Box ol 10) 

We invlfe suDmissions trom all solTwore aul^ots 

Highest royalties poid ^o< more 
irformafion coi or write 



*9 95 

16KII or 
19 95 

I39H 



A DEL 

A" 



DELTA COMPUTER SYSTEMS 

668 Chenango Street 
Blnghomton, NY 13901 ^^p^ 
(607)722-9593 .--n 5i3 



A 



ONACKI 





\^^^' 



,V3C^' 



d^^ 



o^^^^ 

s®.^' 



INTRODUCING THE FIRST PASCAL COMPILER 
FOR TRS-80* MODEL I AND MODEL 



* * 



FAST ONE PASS RECURSIVE DESCENT DESIGN 

CONFORMS CLOSELY TO ISO DP 7 185,1 

SYNTAX ERROR CHECKING 

ACCESS TO TRS-80 GRAPHICS AND RANDOM NUMBER GENERATOR 

COMPLETE DOCUMENTATION 

RUNS UNDER TRS DOS 



*mS-80 IS A TRADEMARK Of TANDV CORP. 
**MINIMUM 32 K AND SINGLE DISK DRIVE 



S£t«) C>€CX OR MONFV OPOEP - 6% S 

ONACKI SYSTEMS 

5161 COLE ST. 

SAN DIEGO. CA 921 17 I 



(2AuF0fi0tRS 



ONACKI 



r-See List ol AdvBrt'seis on page ^18 
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PrOiJ'df cOf^f't^ 


ea 


















72E4 


CD3671 


05580 




CALL 


LPRINT 








72E7 


0610 


05590 




LD 


B, LINES 








72E9 


3E00 


05600 




LD 


A,0 


;BUFFER INITIAL OFFSET 






72EB 


11007A 


05610 




LD 


DE,SECBUF 


.-ADDRESS OF BUFFER 






72EE 


CD6E7B 


05620 


PRI010 


CALL 


FORMAT 


; FORMAT A LINE 






72F1 


D9 


05630 




EXX 










72F2 


08 


05640 




EX 


AF,AF' 








72F3 


217677 


05650 




LD 


HLfFMTBUF 


J FORMATTED LINE 






72F6 


0640 


05660 




LD 


B,LINSIZ 








72F8 


7E 


05670 


PRI020 


LD 


A, (HL) 


;GET A BYTE 






72F9 


23 


056 80 




INC 


HL 








72FA 


E67F 


56 90 




AND 


7FH 


; PRINT ONLY CHARACTERS 






72FC 


FE20 


05700 




CP 


1 1 


.-CONTROL CHAR? 






72FE 


F20373 


05710 




JP 


P,PRI030 


jNO. 






7301 


3E20 


05720 




LD 


A,' ■ 


[SUBSTITUTE SPACE 






7303 


CD3671 


05730 


PRI030 


CALL 


LPRINT 


;SEND TO SERIAL PRINTER 






7306 


10F0 


05740 




DJNZ 


PRI020 


;LOOP UNTIL DONE 






7308 

N 

73flA 


3E0D 


05750 




LD 


A,CH 


;END WITH CARRI AGERETUR 






CD3671 


05760 




CALL 


LPRINT 








73flD 


D9 


05770 




EXX 










73aE 


06 


05780 




EX 


AF,AF' 








730F 


C610 


05790 




ADD 


A, 16 


;BUHP OFFSET 






7311 


10DB 


05800 




DJNZ 


pRiaie 


jLOOP OVER 16 LINES 






7313 


C9 


05810 
05820 




BET 










7314 




05830 


READ 


EQU 


S 


jREAD DISK SECTOR 






7314 

S 

7317 


CD4971 


05840 




CALL 


SECDFN 


;DEFINE SECTOR TO ACCES 






D8 


05650 




RET 


C 


.-TERMINATE 






7318 


CDAD71 


05860 




CALL 


FDRDY 


; START UP DRIVE 






731B 


3A1279 


05870 




LD 


A, (INITl 


jHAVE WE INITIALIZED? 






731E 


B7 


05860 




OR 


A 








731F 


CCC271 


05690 




CALL 


Z,TRZERO 


,-NO. MOVE TO TRACK 






7322 


CDD371 


05900 




CALL 


TRSEEK 


,-GET TRACK 






7325 


C25073 


05910 




JP 


NZ.IOERR 


;DISPLAY ERROR 






7328 


CDEC71 


05920 




CALL 


SECGET 


.-READ SECTOR 






732B 


C25073 


05930 




JP 


NZ.IOERR 


;DISPLAy ERROR 






732E 


CD8771 


05940 




CALL 


UPTRAK 








7331 


C9 


05950 
05960 
05970 


! 


RET 










7332 




05980 


WRITE 


EQU 


5 


;WRITE DISK SECTOR 






7332 

S 

7335 


CD4971 


05990 




CALL 


SECDFN 


; DEFINE SECTOR TO ACCES 






DS 


06000 




RET 


C 


f TERMINATE 






7336 


CDAD71 


06010 




CALL 


FDRDY 


; READY DISK 






7339 


3A127 9 


06020 




LD 


A, (INIT) 


jHAVE WE INITIALIZED? 






733C 


B7 


06030 




OR 


A 








733D 


CCC271 


06040 




CALL 


Z,TBZERO 


.-NO. FIND TRACK 






7340 


CDD371 


06050 




CALL 


TRSEEK 


;GET THE TRACK WE WANT 






7343 


C25073 


06060 




JP 


NZ.IOERR 


; DISPLAY ERROR 






7346 


CD0472 


06070 




CALL 


SECPUT 


.-WRITE SECTOR 






7349 


C25073 


06060 




JP 


NZ,IOERR 


;DISPLAY ERROR 






734C 


CD8771 


06090 




CALL 


UPTRAK 








734F 


C9 


06108 
06110 




RET 










7350 

S 
7350 




06120 


lOERR 


EQU 


S 


jDISPLAY DISK I/O ERROR 






F5 


06130 




PUSH 


AF 


jSAVE ERROR CODE 






7351 


11C03F 


06140 




LD 


DE,LINE16 


fHESSAGE LINE 






7354 


CD5670 


06150 




CALL 


CLRLIN 


! CLEAR IT 






7357 


21B27B 


06160 




LD 


HL,IOEHSG 


I I/O ERROR MESSAGE 






735A 


011900 


06170 




LD 


BC,IOELEN 


; LENGTH 






735D 


EDB0 


06180 




LDIR 










735F 


Fl 


06190 




POP 


AF 


.-RESTORE ERROR CODE 






7360 


CD1971 


06200 




CALL 


HEXASC 


; 'A' HAS ERRORS 






7363 


13 


06210 




INC 


DE 


.-NEXT BYTE 






7364 


EB 


06220 




EX 


DE,HL 








7365 


70 


06230 




LD 


(HL) ,B 


[DISPLAY ERROR CODE 






7366 


23 


06240 




INC 


HL 








7367 


71 


06250 




LD 


[HL) ,C 








7368 


C9 


06260 
06270 
06280 


I 


RET 










7369 




06290 


ZERO 


EQU 


S 


.-ZERO SECTOR BUFFER 






7369 


0600 


06300 




LD 


B,0 


;256 BYTES LONG 






736B 


21fl07A 


06310 




LD 


HL,SECBUF 


.-BUFFER ADDRESS 






736E 


0E00 


06320 




LD 


C,0 


.-NULL FILL 






7370 


71 


06330 


ZER010 


LD 


{HL3 ,C 


.-FILL IT 






7371 


23 


06340 




INC 


HL 


[NEXT BYTE 






7372 


10FC 


06350 




DJNZ 


ZER010 


;FILL SECTOR 






7374 


C9 


06360 
06370 
06360 


1 


RET 










7375 


C9 


B639B 
06400 


DUMMY 


RET 




; DUMMY ROUTINE ^ 


'lyQ'jir conrin. ,!-'■, 


1 






'''''' 




1 1 1 1 1 I r 1 1 1 1 1 1 1 


rill 
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Untangle + Beautify with tlie Organizeri 




CABINET 1 



Now you can place your TRS-80 Model 1 components 
into one convenient handsomely designed desk top 
package. The ORGANIZER puts everything within easy 
reach, with room for Monitor. Expansion Interface, four 
Disk Drives. Diskettes. Cassettes, tape recorder and 
many accessories The ORGAtsllZER eliminates messy 
wires, reduces eye and body strain, provides room for 
ventilation, and works as a dust shield. 

The ORGANIZER consists of two cabinets: 

CABINET ONE holds Monitor. Expansion Interface. Pow- 
er Supplies. Line fillers, Cables. Power strip. Fan and has 
an easily removable front panel for re-booting 

CABINET TWO can hold up to four Disk Drives. Tape 
Recorder. Fan, Diskettes and cassettes. This cabinet is 
usable with any manufacturer's 5' .*" disk drives 



BUY BOTH 
$57.50 

FULLY ASSEMBLED 
VISA, MASTERCARD, or COD. 

For fast service 

CALL NOW TOLL FREE 

CoTlrnental US. . . 800-824-7888 ask for operator 617 

California .800-852-7777 ask for operator 617 
Alaska and Hawaii . .800-824-7919 ask for operator 617 



Or send check or money order to: 

IIvSIoIIQIi Ull 2794 Hume Rd.. Malibu, California 90265 • For information. (213) 456-9023 .» 



.•Sm Lmtal A<ttmft*wmn anpaf »«W 
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Program conlirtued 




06410 
06420 




BUFFERS 


; 








t t r 1 1 r 1 


iiiiiitii 


f 1 r t 


triiiiiiiii 








06430 
















06440 












7376 




06450 


VIDBUF 


EQU $ 






7376 


20 


06460 




DEFH 




■ 




7385 


44 


06470 




DEFH 


DISK 


SECTOR DISPLAY/HODIFY UTILITY' 




73A7 


20 


06480 




DEFM 




1 




73B6 


20 


06490 


L2 


DEFH 








73D6 


20 


06500 




DEFH 








73F6 


20 


06510 


L3 


DEFH 




COHMANDS AVAILABLE ARE: ' 




7416 


20 


06520 




DEFH 








7436 


20 


06530 


L4 


DEFH 








7456 


20 


06540 




DEFH 








7476 


20 


06550 


L5 


DEFH 




1 




7488 


44 


06560 




DEFH 


D - 


DISPLAY SECTOR ' 




7 4 AD 


20 


06570 




DEFH 




1 




74B6 


20 


06580 


L6 


DEFH 




' 




74CB 


4D 


06590 




DEFH 


M - 


HODIFY SECTOR 




74EE 


20 


06600 




DEFH 




1 




74F6 


20 


06610 


L7 


DEFK 




" 




7508 

1 


50 


06620 




DEFH 


P - 


PRINT SECTOR 




7530 


20 


06630 




DBPM 




. 




7536 


20 


06640 


LB 


DEFH 




■ 




7548 


52 


06650 




DEFM 


'H - 


READ DISK SECTOR • 




756A 


20 


06660 




DEFH 




' 




7576 


20 


06670 


L9 


DEFH 




' 




7588 


57 


06680 




DEFH 


'W - 


VreiTE DISK SECTOR ' 




7 SAB 


20 


06690 




DEFH 




' 




75B6 


20 


06700 


Llfl 


DEFH 




' 




75CB 


bh 


06710 




DEFH 


•z - 


ZERO SECTOR BUFFER' 




75Efl 


20 


06720 




DEFH 




' 




75F6 


20 


06730 


Lll 


DEFH 








7616 


20 


06740 




DEFH 








7636 


20 


06750 


L12 


DEFH 








7656 


20 


06760 




DEFM 








7676 


20 


06770 


L13 


DEFH 








7696 


20 


06780 




DEFH 






'''ogtant continues 



OVER 75 TRS-80 PROGRAMS ON TAPE 
EACH YEAR... 



For the MODEL I III: 

or Ebenezer Cload wiped his glasses off — and grabbed for his 
gold pouch! With CLOAD Magazine, he could use and enjoy 
his computer for the price of a turkey with stuffing ! And he could 
send Bob home early, since the programs did not have to be 

typed ml 

He now gets a 30 minute tape each month with 7 or more 
practical, tutorial, utility, and game programs to CLOAD and 
run. While he CLOADs the programs, he reads the editor's 
babblings that come with each tape. 

Don't let ghostly images cloud your TRS'80's screen. Get a 
subscription to CLOAD Magazine! 

The Fine Print; Tlw Bottom Line: 

IssutTi are sent Fir^I Class M^il 1 year (12 rssues) S4 2 00 

All issues from Oct 78 on av^il^ble — 6 months |6 issues} S23 00 

ask for list (24 Level I issues also) Single copies — 

Prograrrs are for I6K Level II. 16K Back issues SS4 50 

Model III. and occasionally for disks Good Games #1 S12.00 

Calif residents add 6% to single Adventures #1 SI300 

copies and anthologies Overseas — Anthology #1 SIO.OO 

add SIO to subscriptions, S5 to Anthology #2 S15.00 

anthologies. Ar\6 Si to single copies T1IS*80 is ? trademark of Tandy Corp 

Sent AO rate MasterCard/ Visa/ Gold also welcome 




CLOAD "^•^S?" 

PC. Box 1448 Santa Barbara. CA 93W2 
[8051 962-6271 
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Progra'^ coniir\u«0 


76B6 


20 


06790 


LI 4 


DEFH 


' C0HHAND7 ' 






76DG 


2B 


06B0B 




DEFH 








76F-6 


20 


06810 


LI 5 


DEFH 








7716 


20 


06820 




DEFM 








7736 


20 


06830 


L16 


DEFH 








77 56 


20 


06840 

06 650 


I 


DEFH 








7776 


20 


06860 


FMTBDF 


DEFH 








7796 


20 


06870 




DEFH 








77B6 


60 


06B80 


KBTAB 


DEFH 


' 'ABCDEFGHIJKLHNOPQRSTOVWXYZ ' 






77D6 


30 


06890 




DEFH 


'0123456789:;,-./' 






77E6 


0D 


06900 




DEFB 


CR 






llZl 


20 


06910 




DEFH 


' ' 






77F6 


60 


06920 




DEFH 


' ' ABCDEFGHIJKLHSOPQRSTUVWXYZ * 






7816 


30 


06930 




DEFH 


■01'l$%fc' 






781D 


03 


06940 




DEFB 


3H 






7B1E 


28 


06950 




DEFH 


M)*+<->7' 






7826 


0D 


06960 




DEFB 


CB 






7 827 


20 


06970 




DEFH 


' ' 






782B 


30 


06980 


ASCII 


DEFH 


'0123456789ABCDEP' ;ASCII TABLE 






783E 


20 


06990 


RVfflSG 


DEFH 


' DRIVE J ' 






784B 


5F 


07000 




DEFB 


CURSOR 






784C 


20 


07010 




DEFH 


' ' 






7857 


54 


07020 




DEFH 


'TRACK : ' 






785P 


5F 


07030 




DEFB 


CURSOR 






7B60 


5F 


07040 




DEFB 


CURSOR 






7861 


20 


07050 




DEFH 


' ' 






766B 


53 


07060 




DEFH 


■SECTOR : ' 






7874 


5F 


07070 




DEFB 


CURSOR 






7B75 


5P 


07060 




DEFB 


CURSOR 






0038 




07090 


RHLEN 


EQU 


$-RWHSG 






7876 


20 


07100 


HODHSG 


DEFH 


' STARTING WITH BYTE (B0-PF} : ' 






7898 


5F 


07110 




DEFB 


CURSOR 






7899 


5F 


07120 




DEFB 


CURSOR 






0024 




07130 


HODLEN 


EQU 


$-HOI»<lSG 






7B9A 


20 


07140 


INVHSG 


DEFH 


' ••• INVALID COHHAND' 






0018 




07150 


INVLEN 


EQU 


S-INVHSG 






7 8B2 


20 


07160 


lOEHSG 


DEFH 


' *** DISK I/O ERROR : ' 






0019 




07170 


10 EL EN 


EQU 


$-IOEHSG 






0040 




07180 




DEFS 


64 : STACK AREA 






790B 




07190 


STACK 


EQU 


$ 






790B 


01 


07200 


DRIVEN 


DEFB 


1 iDRIVE NUHBER 


Program coniinues 



. . . FOR UNDER $0.75 (that's SIX BITS) APIECE I 

For the COLOR COMPUTER: 



Vtou just spent your vacation rnoncy on the Extended 
BASIC Color Computer, and now you warit to iDuy 
software!'!??' 

Don t skip rneals — get CHROMASETTE Magazine" Eadi 
month your computer will get a balarKed diet of 6 or 
more progranns on cassette ()ust load arxJ run!) Along 
with the tape comes some r>otcs on the programs, along 
with tidbits on the Color Computer world 



The Fine Print: 

.« are sent f rst Cidss Mail 
"ii 'ssues (com Juty 81 on asflilabic — a* tor list. 

Programs arc 'Of the £x(cfKJcd BASIC mocJel onty. 
Calif 'csiaenb ddd 6% to smgte cook Owerses - 

aod $10 to subscriptions, add SI to sngte copies. 
Sertt AO rate 




MasterCard /Visa welcome' 



— Chromascttc Masazine 

— for those who relish every byte (that pun even hurt me). 




Chromascttc Magazine 

PO Box 1067 SenlaBdfbard.CA 93102 
(805)963-1066 ^u 



The letton Line: 

1 year CI2 ivsoes) $45 00 

6 months (6 issues) $25 00 

Sffiste coptes . ..... $&.00 



^S»tLlat ol A(/vartlsmrs ort pagm 418 
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Progrsm conlinu^d '""'- 


00 


07210 


TRACK N 


DEFB 





; TRACK NUMBER 


790D 


00 


07220 


SECTRN 


DEFB 





; SECTOR NUMBER 


790E 


00 


07230 


MODBYT 


DEFB 





; SECTOR MODIFY BYTE 


790F 


00 


07240 


OFFSET 


DEFB 





;SECTOR OFFSET BYTE 


7910 


8C 


07250 


lOCMD 


DEFB 


READS 


; FLOPPY I/O COHMWro 


7911 


00 


07260 


TRACKA 


DEFB 





; ACTUAL TRACK NUMBER 


7912 


00 


07270 


INIT 


DEFB 





; INITIALIZE FLAG 


7913 




07280 


CKDTBL 


EQU 


S 


(•COMMAND TABLE 


7913 


7573 


07290 




DEFW 


DUMMY 


;'A' 


7915 


7573 


07300 




DEFW 


DUMMY 


;'B' 


7917 


7573 


07310 




DEFW 


DUMMY 


! 'C 


7919 


1C72 


07320 




DEFW 


DISPLY 




791B 


7573 


07330 




DEFW 


DUMMY 


; 'E' 


791D 


7573 


07340 




DEFW 


DUMMY 


; 'F' 


791F 


7573 


07350 




DEFW 


DUMMY 


I 'G' 


7921 


7573 


07360 




DEFW 


DUMMY 


; 'H' 


7923 


7573 


07370 




DEFW 


DUMMY 


; ' 1 ' 


7925 


7573 


07380 




DEFW 


DUMMY 


; 'J' 


7927 


7573 


07390 




DEFW 


DUMMY 


; 'K' 


7929 


7573 


07400 




DEFW 


DUMMY 


; 'L' 


792B 


4772 


07410 




DEFW 


MODIFY 




792D 


7573 


07420 




DEFW 


DUMMY 


; 'N' 


792F 


7573 


07430 




DEFW 


DUMMY 


; '0' 


7931 


CC72 


07440 




DEFW 


PRINT 




7933 


7573 


07450 




DEFW 


DUMMY 


; 'Q' 


7935 


1473 


07460 




DEFW 


READ 




7937 


7573 


07470 




DEFW 


DUMMY 


; 's' 


7939 


7573 


07480 




DEFW 


DUMMY 


. ,^, 


793B 


7573 


07490 




DEFW 


DUMMY 


; 'U' 


793D 


7573 


07500 




DEFW 


DUMMY 


. IV' 


793F 


3273 


07510 




DEFW 


WRITE 




7941 


7573 


07520 




DEFW 


DUMMY 


; 'X' 


7943 


7573 


07530 




DEFW 


DUMMY 


; 'Y' 


7945 


6973 


07540 




DEFW 


ZERO 




0e7A 




07550 


SECKSG 


EQU 


$+0FFH<-8 ;ROUND HIGH BYTE UP | 


7Aflfl 

RY 

0100 




07560 




ORG 


SECMSG<B 


;NOW ON 256 BYTE BOUNDA 




07570 


SECBUF 


DEFS 


256 


; SECTOR BUFFER 


7000 




07560 




END 


DSKMOD 




00001 TOTAL 


ERRORS 










The error reported by Ihe assembler is only 


a viarning- 


-fiof a fatal error. 


The obiect code generatM at line 2290 is correct 




Sales Opportunity 



Join a fast growing company 
involved in the microcomputer 
industry as a direct salesman. 
Sales involve our v^'ide selection 
of books, four publications, soft- 
ware and advertising space In the 
publications. We are looking for a 
nonsmoking individual with a good 
sales background and a basic under- 
standing of microcomputers. An ex- 
cellent career awaits the person who 
wants to be "on his own." It will be 
the responsibility of our direct 
salesman to become familiar with all 
makes of computers and their sales 
outlets, amateur radio and electronic 
stores, book stores, and other outlets 
for our products in your given terri- 
tory. We will also add 
other lines as they 
become available. Ar- 
rangements are being 




made to coordinate efforts with some 
other firms in the area, including a 
major printer manufacturer. We offer 
an excellent growth potential with a 
highly motivated, young corporation. 
If you or someone you know is inter- 
ested in the opportunities available 
at Wayne Green Inc.. please submit 
your background in detail, including 
sales experience, recent work his- 
tory, knowledge of the microcomput- 
ing industry, educational background 
and references to: Sales Manager, 
Wayne Green Inc., Peterborough. 
N.H. 03458. All replies will be immedi- 
ately acknowledged and held m the 
strictest of confidence- 
Personnel Dept. 
80(D) Pine St. 
Wayne Green Inc. 
Peterborough, N.H. 03458 
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********************************* *jL*A* * ^n*-t *i.* tw w ^ 

4MHZ, DOUBLE DENSITY,COLOR&B/W 
GRAPHICS . .THE LNW80 COMPUTER 




liner ytu'f cowtrvl the feitur^l of an inSO Cwiputtr, you'll quietly 
undersunO why the Lmi80 is the uUt«te TRSBO ioftwsre co^Btible syst«i. 
LHW RESEARCH offers the noSt carplete ni crocoinnjter syste" at an outstand- 
ing lew price. 

Mc back up our product with an unconventional 6 month Mrranty and a 10 
days full refund policy, less shipping charts. 

LHW80 Coi^uter 51,*50.O0 

LNW80 Ccwputer m/BIM Honitor i one 5' Drive 51,914.00 

All oriJers muit be prepaid, CA residents please include 61 sales t**. 
ContacI: us for shipping charqaa 

* TRSeO Product of Tandy Corporatioti. 

•• PMC Product of Personal Mi crocoaputer. Inc. 



COMPOSE THE 
TATWES 


FEATURES i'iZ PEHFORKA-VCE 

L-W35 '^ -FiO" 


I«S-SO- 
HC3EL ii: 


PROCESSOR 




3.0 MHi 


!,■■ "m: 


2.d <*z 


LEvri n BASIC iNTEHP. 




YES 


'E"^. 


LEVEL III 

BASIC 


IRSaO MODEL 1 LEVEL 11 COMPM 


lELE 


YES 


YlS 


NO 


48K BYTES RW 




YES 


YES 


YES 


WSSETTE BAUD PjME 




500/1 000 


^00 


500/1500 


FLOPPY DISJC CONTROLLER 




SINGLE/ 
DOUBLE 


SINGLE 


SINGLE/ 
MUeLE 


5ERIAL RSZ12 PORT 




YES 


YES 


YES 


PRINTER PORT 




YES 


YES 


YES 


REAL TIME CLOCK 




YES 


YES 


YES 


^* « 80 CHARACTERS 




YES 


NO 


NO 


VIDEO MDNITOfi 




YES 


YES 


YES 


UPPER AND LOWER CASE 




YES 


OPTIONAL 


YES 


REVERSE VIDEO 




YES 


NO 


NO 


UYMWftD 




63 SEY 


53 KEY 


53 KEY 


NUMERIC KEY PAD 




YES 


NO 


YES 


B/M GRAPHICS, 1?B I iS 




YFS 


YES 


YES 


Hl-RESOLiniOH B/W GRAPHICS. 480 < 192 


YES 


NO 


HO 


HI-RESOLJTION COLOR GRAPHICS 
128 I 192 IN 8 COLORS 


(NTSC). 


YES 


PM) 


m 


HI-RESOLLTTION COLOR GRAPHICS 
384 K 152 IN 8 COLORS 


(RGB). 


OPTIOWL 


NO 


NO 


yAHRANTY 




6 WMTHS 


90 DAYS 


90 QAYS 


TOTAL SYSTEM PfllCt 




51 ,914.00 


tl.B40.00 


ti.ia'.oo 


LESS HONITOR AND DISK DRIVE 




$1,450.00 


ll,]7b.00 


— 



LNW80 

- BARE PRINTED CIRCUIT BOARD S MANUAL W9.95 

The 1.NW80 - A high-speed color computer totally coiH)atib1e with 
the THS-80'. The LNW80 gives you the edge in satisfying your 
coi^utatlon needs in business, scientific and personal coiWkita- 
tion. With perfomunce of 4 MHz, Z80A CPU, you'll achieve per- 
funnance of o«er twice the processing speed of a TRS-80*. This 
wins yoa'11 get the performance that is coaparable to the wost 
enpeosive nicrocomputer Mith the compatibility to the world's 
mnt popular computer (TfiS-80«) resulting in the widest soft- 
■arr base. 



FEATURES: 



TRS-SO Mxlel 1 level 11 SoftMre Coi^atlble 

High Resolution Graphics 

, RGB Output - 384 J 192 in a Colors 

. NTSC Video or RF MOD - 128 • 192 in a Colors 

. Black and White - 480 > 192 

4 mz CPU 

500/1000 Baud Cassette 

Upper and Lower Case 

ISK Bytes RAM, 12K Bytes ROM 

Solder Masked and Silkscreened 



LNW SYSTEM EXPANSION 

BARE PRINTED CIRCUIT BOARD 

WD MANUAL 169.95 

WITH GOLD CONNECTORS 184.95 



Tfi* System Expansion mil allow you to eipand your LNW80, TRS-BO- 
or Pttt-80'* to a complete computer system that is still totally 
software curnpatible with the TRS-EO' Model 1 Level IE. 

FEATURES: 

32K Bytes Memory 
. 5" Ftuppy Controller 
. Serial BS232 2G<« 1/0 
. Parallel Printer 

Real Tine Clock 

Screen Printer Bus 

On Board Power Supply 
. Solder ^tasked and Silkscreened 



LNW RESEARCH 

C OR PORA T ION 
2620 WALNUT 
TUSTIN CA. 92680 ^^ 



LNDoubler&DOS PLUS 3.3D 



- Assembled and Tested w/DOS plus 3. 3D S175.00 

Double-density disk storage for the LNM Research's 'SystsB Eipan- 
sion' or the Tandy's "Expansion Interface". The LNDouhler™ is 
totally software coimatible with liiy double density software 
generated for the Percoa's Qoubler*". The LNOoublerTM provides 
the following outstanding features. 

Store up to 350t; bytes on a single 5" disk 
Single and double density data separation 
. Precision write precai^>ensatiOn circuit 

Software switch between single and double density 

Easy plug in installation reguiring no etch cuts, ji*()ers 

or soldering 
35, 40, 77, 80 track 5' disk operation 
120 day parts and labor Warranty 

*" Dmibler is a product of Percoa Data Cuipany. Inc. 

DOS PLUS 3. JO 

Micro Systems software's double density disk operating systen. 
This operating system contains all the outstanding features of 
a well developed DOS, with ease in useability. 



KEYBOARD 



LNWaO KEYBOARD KIT $84.95 

The Keyboard Kit contains a 63 key plus a 10 key, P.C. board, and 
reewining coiponcnts . 



CASE 



LWWO CASE W4.9S 

The streamline design of this metal case will house the LNW80, 
LWN System Expansion, LKW80 Keyboard, power Supply and fan, 
LNDoublerT'1, or LNW Data Separator. This kit includes all the 
hardware to mount all of the above. Add S'l.OO for shipping 

PARTS AVAILWLE FROM LHW RESEHWCh 
. 4116 - 200ns HAM 

6 chip set tZo.OO 

8 chip set J33.S0 

16 chip set IM.OO 

24 chip set t94.00 

32 chip set S124.00 

. LHWSO -Start up parts set" LNHBO-l 182.00 

LNWeO "Video parts set" LNU80-2 J31.00 

LNWBO Transformer LNW80-3 JIB. 00 

LNWaO Keyboard cable LNU80-4 tie. 00 

40 Pin ccmputer to expansion cable tU.OO 

System Expansion Transformer J19.0O 

. Floppy Controller (FD1771) and UAHT (TR1602) . . . 130.00 



ORDERS a I N FO. NO. 714 - 544 - 5744 
SERVICE Na 714-641-8850 



VISA MASTER CHARGE 
ACCEPTED 



UNLESS NOTED 

ADO S3 FOR SHIPPING 



GAME 



The Magic Cube 




David York 
Energy Systems Co. 
55 Hemlock Lane 
Chagrin Falls, OH 44022 



The Basic program listed in 
this article simulates the 
mechanical action of a popular 
puzzle known as the Magic 
Cube, or Rubik's Cube. 
The actual puzzle is a cube 



with six colored faces divided 
into nine squares. By holding 
the cube In one hand and turn- 
ing any face with the other 
hand one quarter turn, it is 
possible to shift the colored 
squares to a new position. In a 
few moves, the cube colors 
become quite mixed. Although 
simple in appearance, the cube 
has an estimated 43,252,003. 
274,489.856.000 possible posi- 
tions! The advantage of this 
Basic program is that simu- 



lated manipulations of the 
cube can be performed while 
the moves are displayed. UntlKe 
the actual puzzle, this allows 
you to keep track of your 
moves. 

In the execution of the Basic 
program, the cube is unfolded 
on the screen (or printer) into a 
two-dimensional representa- 
tion of the three-dimensional 
structure. The program accepts 
two modes of displaying the 
cube. If Numbers is typed after 



the Move? input request, the 
cube is displayed as shown: 



51 52 53 
54 55 56 
57 58 59 

1112 13 212223 3132 33 4142 43 
14 15 16 24 25 26 34 35 36 44 45 46 
17 IB 19 27 28 29 37 38 39 47 48 49 

6162 63 
64 6566 
67 68 69 



If Symbols is typed after the 



Program Listing 



1 CLEAJ(J»HiCLS:PRI»T'RUBIi;'S CUBE PUZZLE" ;PRIST'SEE SCIESTIFIC 

AHEBtCAH VBl': 'PROGRAM BI DAVID lORK 3/B/81 

IB OEFIST I,J,K 

12 ts-1 

15 OIH S(6,9) ,0(3) ,1P141 ,10(12) ,SS(6,9) 

21 AS-* l« tl I** 

22 CS-' 1 1 1 ■ 
25 BS-*I» II 11 

27 DS-"1 1 I 

3B IS-"!lC.liICSllC)-" 

50 F0RI-lTO6:F0RJ-lT09;S(I,J)-I»l»*J:NEXT!NEllT 

9» GOSUBtaa 

lit INPUT'I10VE-!tS:ICS(lC)»!CS{ICl*IS»* " :FOBI -ITOIC iPRIKTlCSlIC 

1 :SeXT:lFLENHCS(lC}) >252THENIC-IC*1 

in IFIS- ■B-n(EIIHS-*23695369474163693'iCOT05H 

115 IFIS-*RP"THEMHS-"2»6 369634147596 33' sGOTOSM 

12» IFIS- ■L'T«ENIIS-"274l6741436957411"iGOTO5ll 

125 IFr5-"LP"THE(I(tS-'21475l«7496361471':COT05li 

1)1 IFIS- ■U*THeNtlS-*21231123412331235-:COT05«« 

135 IFIS-"UP"THENMS-' 23 21 3321 432113215 *:(iOT05f I 

141 IFIS- •D'THEKMS-*298739B7498719B76*:COT05B< 

14 5 IFIS-*DP"THENMS-*27e9I7B9<7B937B»6*:GOT05i« 

15a IFIS= •B*THENHS''512317<169B733694"iGOT058B 

155 1FIS-*BP'THENHS- "5321 396367 891 147 4* !G0T05e« 

160 IFIS- •F*THEN«S-'598737<1612313692*:GOT05fll 

16 5 IFIS-'FPTKENKS"" 57891963632131472* :C0T05flB 

17 B IFIS-"S¥MBOLS"THENlX-2:COSUB199:GOSUB6ee:GOT01BH 

17 5 IFI$''HllHBERS'THEMX>liGOSUB199iGOSUB4BB:GOT01IB 
198 IFIS-"HEW"GOT03fl 

198 PRINT-INPUT NOT RECOGNIZED - TRY AGAIN" !GUSUB199!GOTOHB 

199 ICSUCl -LEFTS UC sue) .LENl ICS IIC) 1 -LEN ( 1 SI -1) :RETliRS 
20« II='l:IJ-atF0RI>lT04 



21 B 1P(I)-VAI,(MIDS(MS,II,1)) :F0RJ-1T03 

22B IO(J*IJ)-VAL(Mlt)S!HS.II+J,l)) iSEXT 

23B IJ-IJ + 3;I[':IIt*:HEXT 

251 F0RJ-1T03:D(JI-S(IPI41 ,IQ( J*9) ) sNEJtT 

26i IJ-9JFORI-4T02STEP-1 

271 F0RJ.1T03;S1IP(I) , I0( J*IJ) I -S( IP( I-l) ,I0(J»IJ-3) ) :»EXT:IJ-IJ 

-3: NEXT 

2BB PORJ*1T03:S(IP(1) ,I0IJ1)-D(J) iHEXT 

3BB I^VAL|RICHT$(HS,1)) iDl-S(I,9) :D2>S(I,6) :D3'S(I,3) 

111 IFHIGHTS(lS,ll-'P"GOT033i 

32B S(I,9)-S(I.3)iS(I,6l-S(I>2l:5(I,3)-5|].l) :S{l,2)*S(t,4} :5(I, 

1)-S{I,7) !S!],4)-S(1,B) :S(I,7)-Dl!S(I,B)-D2jSfI,9)-D3:GOT034« 

3ia S(t,3)-5II.9) IS1I,6)-S1I,S] :S(I,9) -S(I,7) :S(I,B)'S(I,41 :S(I, 

7)>S(I,1) :S( 1,4) •S( 1,2) :S( 1,1) -D3:S( 1,2) -D2:S( 1,31 -Dl 

3 40 RETURN 

tBB lf5:G05UB43a 

4ia J-B:F0RK-lT03:F0RI'lTO4:PllIHT USING BS;5( 1 , 1 tj) ;S( 1 , 2*J) ;S ( I 

,3*J) ;!NEXTiJ-J+3i PRINT: NEXT; PRINT 

42B K>6iCOSUB43a:ttETURN 

43a I-BiPORJ-ITOJ: PRINT USING AS;S(R, 1 H) ,S(K,2 + I) ,S (K,3 + I) : l-I. 

3: NEXT: PRINT: RETURN 

5aB GOSUB2B«:IFlX*lTHENGOSUe4BB:COTOlBfELSECOSUBeaB:COTOiaa 

6»» F0RI-lTO6:FORJ-lTO9!j;-S(I,Jl 

611 lFK<2»Tf!ENSS-"L*:GOT07eB 

62B iri;<3BTHENSS-"F*:GOT07ia 

63B IFK<4ITHENSS-'R'!GOT07BB 

648 IFK<5aTHENSS-'B":GOT07flB 

658 IFK<6aTHESSS-'U':G0TO7BB 

668 SS--D- 

788 SSa.J)-SS:NEXT:NEXT 

785 K-5!GOSUB73a 

71B J-B!FORK-lT03iFORl-lT04:PRINT USING DS I SS 1 1 . 1 'J) ; SS ( I , 2*J ) ; S 

S(I,3tJl ; :NEXT!J-Jt3i PRINT :NEXT: PRINT 

728 K-6:GQSUB73B!nETURN 

718 I'B:F0HJ-1T0):PBINT USING CS ; £S ( K , 1 -I ) ,SS ( K , 2-t I ! , SS (K , 3 .1) ! I 

=1 -3 ;NEXT: PRINT: RETURN 
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Move? request, the cube is dis- The inputs I have selected 



played as follows: 

uuu 
uuu 

uuu 

LLL FFF RRR BBB 
LLL FFF RRR BBB 
LLL FFF RRR BBB 

ODD 
DOD 
DDD 

The letters L, R, U, D, F, and B 
correspond tothe left, right, up, 
down, front and back faces of 
the cube, respectively. 

The other valid inputs which 
are recognized after the Move? 
request are as follows: 

• R —This Fias ttie same etfecl as 

rotating the right face ot the cuDe 
one quarter lurn clockwise. 

• RP— This has Ihe same eftecl as 

rotaling the right face of the cube 
one quarter turn counter-clock- 
wise (RP siands '0' R pome) 

The same rotations are pos- 
sible with the other five faces. 
The proper input responses are; 
L, LP,U,UP,D,DP,F,FP.B,and 
BP. 



correspond to standard terms 
used by the "cubists". Addi- 
tional moves may be added, but 
these moves are combinations 
of the moves already de- 
scribed: 



■ Rg = R ana L [sc called "anli-slice" 

■ Rg = R and LP (so callM "Slice") 

■ R2 =^ R and R (halt-turn rrrove) 



You may revise the program to 
recognize these or other input. 
This can be done by inserting 
GOSUBs between lines 175 and 
190, 1$ being the input string 
variable. 

The input response New will 
cause the cube to revert to the 
original position, all moves t3e- 
ing erased. The program will re- 
spond with Input Not Recog- 
nized—Try Again for any input 
other than those descritwd. 

The Magic Cube has endless 
possibilities for computer own- 
ers. 1 hope you enjoy this pro- 
gram and I would iil^e to hear 
from others who have worthed 
with it.H 




unuTY 

FORCE 



THE VIDEO MANAGER ^U RRST IN A SERIES 

Our Video Manager will enhance your computer's per- 
formance with these features: vertical printing on 
screen; forms design direct from screen to printer; send 
entire screen or any part to your printer; save screen to 
disk as a file and more. Written so you can utili2e it from 
DOS or BASIC. Available on disk for: TRS-80,* Mod I TRS 
DOS 2.3, Mod 11 TRS DOS 1.2 & 2.0. CBM 2.0 or later, 
soon available for Mod III. For your convenience with 
Visa or M/C phone in your order. Please add S2 for hand- 
ling and postage. ""Ttwiycorp. 

SOFTWAREHOUSE IIVTERNAT10NAL 

5070 N. Sixth St. Suite 103B 
Fresno, CA 93710 (209) 221-7877 

TO RECEIVE A FREE CATALOG PLEASE >^i3 



r 



V 



s LYNN'S A/R SYSTEM $ 



12 Intergrated Account Receivable Programs 
Tested In Service For Over 2 Years 

User's Cements: 

• increased cash flow 
• saved over 50 hours a month in secretarial hours 
• almost completely eliminated billing errors 

LYNN'S A/R SYSTEM WILL 




• print invoices • store 1 .100 open invoices • tell you your 
account's receivable total, amount of total invoices out- 
standing, average amount of total invoice's • tell you at any 
time how many invoices an individual account has open, the 
total amount owed, the average per invoice, the invoice date, 
and the invoice amount • total sales on account for given 
month, number of invoices sent, average sate per invoice 

• how much an account purchased during month, how many 



invoices were sent, average invoice for month • tell you 
what percent of sales an account is to total sales by month 

• tell you what percent of accounts receivable an account is 

• print labels for your accounts • print statements at end of 
month and'or beginning of month and'or any time during 
month, (either individual or all accounts)*pnniatphabetical 
hardcopy of accounts and account numbers • print all items 
sold for the month • AND MUCH MORE!! • 

49 + S2,00 Shipping & Handling 

Illinois Residents AOd 6% Sales Ta. 



Only 



Send S10 00 For Printouts 

And Documentation 

Credit Given On Order 



LYNN COMPUTER SERVICE 

6831 W. 157th St. 

Tinley Park. II 60477 

(312)429-1915 

Send state sales tax rate, company name - address - phone U. TRS-80 model #, number of drives, 
and whether you will be using NEWDOS or NEWDOSSOfor model I, orTRSDOS/NEWDOSSO for 
model III. 

Equipment Needed: 48K model l or in. linepnnter. 2 
disk drives. Model I users will need NEWDOS or NEWDOS- 
80 operating system by APPARAT, INC 



TRS80 and TRSDOS are Ifademarks of TANDY CORP 

NEWDOS and NEWDOS80 dre regisie-Bd TraOpmarks ol APPARAT INC 



J 



-See UstotAOverVsers on page 418 
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GENERAL 



More bells and whistles for the chess set. 



The Sargon Saver— Part II 



Thomas L. Quindry 
6237 Windward Driv0 
Burke, VA 22015 



In my first article on Sargon I/O 
(see 80 Microcomputing, May 
1981, pg. 272) patches to 
enhance your ability to use 
either of the cassette- based 
Sargon I or Sargon 11 chess pro- 
grams at their maximum play- 
ing ability were given. In this ar- 
ticle, modifications to enhance 
your ability to play chess will be 
added to Sargon II. This Is not 
to say that Just adding these 
modifications will Improve your 
chess game. Rather, they will 
add to your enjoyment and 
understanding of the game by 
providing a tool with which you 
can learn more about It. 

The modification given here 
expands on and supersedes the 
Assembly code given in May, 
and includes ail the frills need- 
ed to make life easier when us- 
ing the program. The following 
features will be added: 

• An easier, foolproof way 
to load Sargon II. 



• A bell tone to signal when 
It Is your move. 

• Saving of all game moves 
to memory. All game moves 
may also be saved to tape or 
printed. 

• A printer graphics routine 
to print the current board 
position. 

• A training aid mode to 
display all moves from first 
to last. 

• A manual play mode to 
enter published games. You 
may then use the training 
aid mode to analyze them 
visually. 

As can be seen In the Pro- 
gram Listing, the above 
modifications, which I'll call 
MODIIB, have t>een structured 
around Sargon II. The main pro- 
gram of Sargon II loads from 
4A00H to 76FFH, and the 
Sargon II loader program loads 
from 4400H to 4600H. Not all of 
this code Is used, but never- 
theless, it is entered and is thus 
not available for our use. 
However, part of MODIIB loads 
from 43C0H to 49FFH because 
the part of MODIIB from 43C0H 
to 46261-1 la only needed before 
the Sargon 11 loader is entered 
Into memory. It Is overwritten 
by the Sargon II loader pra 



gram, but by then it has done Its 
Job. The important code of 
MODIIB Is from 4633H to 
49FFH and from 7700H to 
7857H. Thus Sargon 11 along 
with MODIIB uses all available 
memory from 43COH to 7857H 
to run. 

This modification, MODIIB, 
along with Sargon II, takes 
practically all available 
memory In a 16K computer. I 
am sorry to say that, though 
this modification and Sargon II 
will run In 16K, the Assembly 
program needs more than 16K to 
be complied by Radio Shack's 
Editor/Assembler. Deleting the 
frills doesn't save memory; 
even just the essentials takes 
more than 16K to compile. I had 
to compile and test It in two 
parts. I tfien borrowed a f hend's 
32K computer to Join the two 
parts. It can be spilt Into two 
nearly equal parts by assembl- 
ing the code for addresses 
43COH thru 4626H, 7700H thru 
7BS7H, and 41E2H thru 41E4H 
in one part (lines 00100 thru 
01550 and lines 05510 thru 
07380). Codes for addresses 
4633H thru 49FFH can be 
assembled In the other part 
(lines 01560 thru 05500). To test 
your program, tie In each part 



by using equates (EQU) for 
common subroutines between 
parts. When both parts of the 
program are completed, load 
the part with addresses 4633H 
thru 49FFH first. 

Added Features 

First, MODIIB Is much easier 
to load than MODIIA (the patch 
program given In the May Issue) 
and Is loaded before Sargon II. 
When loaded, this program will 
start automatically (lines 07340 
thru 07380). You are first asked 
to enter the two byte hexa- 
decimal addresses giving the 
location of your printer's first 
TRS-80 graphics character. If 
your printer has no TRS-80 
graphics capabilities, enter 00. 
This will disable the printer 
graphics routine, called Board 
(lines 04550 thru 04770). by put- 
ting an FFH value byte In place 
of the code In line 04060 (Shift 
B). My printer calls Its graphic 
characters from addresses 
AOH (160 decimal) to DFH (223 
decimal), and thus I enter AO. 
The computer's location for 
graphics Is 80H (128 Decimal) 
to BFH (191 decimal). The off- 
set—In my case 20H (32 Deci- 
mal)— is calculated by the pro- 
gram and the value needed Is 
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then entered at the location 
given by GRAFIC + ^ (see lines 
00500 and 04660). 

After this bit of house- 
keeping Is completed, you are 
prompted to position the 
Sargon 11 program and press 
Enter. The modification con- 
tains a System loading routine 
(lines 01170 thru 01270) which 
will check to see if the word 
Sargon Is at the beginning of 
the System tape being loaded. 
If not, with most Radio Shack 
ROMs the program will hang up 
and you must reload MODIIB. 

Both parts of Sargon II will 
load without stopping and, 
after It Is loaded. It will auto- 
matically start. You will be 
prompted as in Sargon II, but 
you will have additional com- 
mands at your fingertips. In ad- 
dition to the normal commands 
of G (Game) and C (Change 
board), you will have L (Load 
previous game) and S (Save 
game) as in MODIIA, plus one 



more command, T (Training 
aid). 

Features 

The bell feature signals the 
start of your turn (lines 03560 
thru 03830) which is especially 
useful when it takes a long time 
for the computer to analyze a 
move. The bell, or tone, is 
sounded when an amplifier is 
attached to the CPU output 
plug and during the game 
mode. The program determines 
when It Is your turn by inter- 
rupting Sargon's Input routine 
and testing for the cursor at 
positions three or nine on the 
video screen (see lines 03590 
thru 03650). Both three and nine 
are the starting positions for 
white and black, respectively. 
The interrupts for this and all 
other routines are set in lines 
01640 thru 01930. 

During the Game and Manual 
Play modes, each move is 
saved into a buffer table by the 



Move routine (lines 03230 thru 
03560). This requires inter- 
rupting two locations In Sargon 
II— one for the player's moves 
and one for Sargon's moves. 
Once all moves have been 
saved to a buffer table, they 
can be saved on cassette tape 
for future entry (see the Save 
routine, lines 02940 thru 03210, 
and the Load routine, lines 
02290 thru 02920). These 
routines are very similar to the 
MODIA and MODIIA routines 
given in May. Also notable is 
the compatibility with the data 
tapes generated by MODIA and 
MODIIA. That is why, in MODIA 
and MODIIA, an additional FFH 
value byte was saved. You can- 
not step through the game us- 
ing the training mode after us- 
ing a MODIA or MODIIA tape, or 
print the moves. On lines 02430 
thru 02520, the Load routine 
checks for this byte as an end 
of file marker. It also checks to 
make sure we are reading the 



right byte and not a buffer table 
pointer. The correct entry loca- 
tion, depending on the data en- 
tered. Is resolved in lines 02540 
thru 02630. For MODIIB data, 
the Sargon II program is re-en- 
tered in the Game mode with 
the correct level of play and the 
player's move. 

The game moves can also be 
output to a printer by the Plays 
routine (lines 05530 thru 07320). 
This routine formats a list of 
game moves in up to four col- 
umns of 25 moves each, de- 
pending on the length of the 
game. If, by any chance, a game 
is over 100 moves, it starts 
other groups of 100 moves in 
the same format. In a 16K com- 
puter, the buffer table is long 
enough to hold 195 moves. 

The Plays routine is ac- 
cessed by the Titles routine 
(lines 03650 thru 04130) while in 
the Game mode by pressing 
shift L (for listing plays) at the 
beginning of your move. Also In 











Program Listing 














XICB ;nDD iin 








80590 


WRITE 


ROUTINE 






RY 


BBlia ;EAKGON 


II MODIFICATIOM - Bt 


THOMAS L, OUIND 


440B Tl. 


B0S0B WRITE 


LD 


A, (KL1 




tai2t : 








440C BT 


BBblB 




OR 


A 












440D ce 


80628 




RET 


I 




SSETTE. 


•iija rsuvE OB load 


BOARD POSITION 


AND ItOVES 01 CA 


44IE CD33flB 


8 86J8 




cal; 


t33H 












4411 23 


886 48 




INC 


HL 






111*1 ;nuvt:s 


AMD CiHAPfIT BOARO ^'.S 


PLAY TO PHJKTEB. 


4412 ISF" 


BBtLB 




JR 


WRITE 






HISI jCHES£ 


TBAIs: 


^G *:;■ :>:spla"'S 


GA.1E ?•: SCREEK . 




88640 
08(7? 


PRItrTER GRAPHIC OFFSET S 


_-br:-.t;ne 




■1151 ; 

BI17# nc,vn\ 








4414 )£dS 


006 ?0 


Hfri 


LO 


A, 13* 




7Bi; 


CQ-C 


78t2H 




4416 77 

4417 CD2BB8 


886=0 
08:88 


SPT2 


LE 
CALl 


[SL]' ,A 
il2BH 




7Bei 


IIISI BLFFtH 


ECJL- 


nOVlOC-I 




441A B7 


88718 




UV 


A 




4)CI 
43Ci 3EC3 


ii2»B MOUi IB 


ORG 


43C8H 
ft,BC3H 




441B 28FA 
441 D FE0S 


88T28 
B073B 




JR 
CP 


I, I nit; 

BBH 




<3C2 32E241 


00218 


1,D 


(41E2H) ,A 




441F 2aic 


B074B 




JR 


I.BKSPC 


i CHECK FOR B 


<3C5 2133*t 


88228 


LD 


HL, PATCH 


; SETUP AUTO 


ACK SPACE 












STKBT OF PATtH 








4421 rb 


BI7SI 




PUSH 


AF 




4)C8 ;2E}41 


U8238 
it2it : 


LD 


(41E3H) ,UL 




4412 TD 


Bi7tl 




LD 


A, I 












4421 rem 


BI7TI 




CP 


■ DDH 


rCHEC* CURSC 




l»2bt .-PJlINTEl* CIRAJHICS OFFSET BOi.' 


'l-iE 


R 












tlCB ;iTU* 


33260 


"_C 


ML , 1 NSTJi 




4425 IBll 


BB7B« 




JR 


I.INPTI i 


:f C..VSCF :s 3Rn PO 


t)CE CDEBtt 


ii2~t 


cal;. 


WHITE 




5. 

4427 Fl 












4]D1 ZlEEIt 


18289 


L- 


Hi., ISSTFl 




1*7 9( 




?CF 






41D1 CQCP4* 


e829C 


-Ji-LL 


WPITE 




4420 77 


IIBBi 






SL ,A 




Hl!~ 213H31: 


tfitl 


:.L 


ilL , JODA^-: 


:SZT FIRST C 


H SCHEOI 












'11" SOS PtiE . - 










4424 EEll 


BI81* 




CP 


38)! 




*irA ;3 


1*318 IKPT 


:k>: 


rit. 


J ADVANCE CUR 


441B 3BET 


BIB2I 




JR 


C, INPTl 


CHECK IF INPUT t 


*1DG CD1**« 


80328 


CALL 


INPTl 




442D Dtli 
442F FEBA 


BB83B 

0BF40 




SUB 

CP 


3BH 
18 




4J0E F5 

tt) INPUT 


80338 


PL'Sfi 


^^ 


ISAVB MODIFJ 


4431 DB 


BBBSB 




RET 


r 


, J F 8 TO 9 R 


<3DF 7D 
*3EB FEDC 
f 

41E2 latA 


80340 
00358 


LD 

CP 


A,L 
BDCH 


rClECH CUHSO 


ETUBN 
4432 u(i-7 
4434 rttK 


net* 

BBB7f 




SI'B 
CP 


7 
IB 




8 8 3 6 8 


IB 


C.BITK 


;IF FIPST PC 


4436 38DC 


BBBBI 




JR 


C, INPTl 


;CHECK IF INPUT i A 


siTios >;16 










443B FEIB 


BBB9B 




CP 


16 




43E4 IBH: 


883-8 


-F 


: .s:t: 


I IF SECOND P 


443A D8 


BB9BB 




RET 


~ 


ilF A TO F fl 


05ITI0N XI 










ETURN 












43E6 Fl 


;e3?c 


PC'f 


A!" 


; IF THIRD PO 


443B IBDT 


BI91B 




JR 


iupt; 


I IF NO COKD 


SITION 










RET REPEAT 


IBPUT 










13L7 78 


S8398 


LD 


A.H 


iCrr FIRST 1 




11921 


1 








SPlT 












■ B93* 


J BACKSPACE SUBROUTINE 




iBEC ei 


00400 


ADD 


A.L 


jADD SECOND 


14ID 3E1I 


■ t94B 


BKSPC 


LD 


A,28H 




INPUT 










443r 77 


BB9 5t 




LO 


(HL) ,A 




*3E9 FS 


08110 


PUSH 


AF 


; SAVE 


4441 TD 


tt96B 




LD 


A,L 




*3EA 3E62 


0D420 


LD 


A, 98 




4441 PEDB 


B1971 




CP 


BDBH 




13EC 121Me 


00430 


LD 


(GRAF'l) ,A 


;LOAD <SHn"T 


4443 IBCr 


• ■911 




JR 


I.INPTI 




a. 










4*45 2B 


■ ■191 




DEC 


BL 




<3EF Fl 


88448 


PCF 


AK 




444( IBCC 


• 1111 




Jl 


IHTTI 




43rB B7 


e%l-.^ 


OR 


A 






mil 


1 








«!F1 2885 


384(8 


• f 


SZ.GRAFON 


; IF :NP'JTS < 




11128 


iKULTIPLY B* 


16 ROUTINE 




• (■' NC GRAf 


.(."i 








444B rl 


•l«]t 


aiTis 


POP 


*P 




*3F3 3EFP 


iff? 


!.: 


A.25i 




4441 cai7 


■ 1B4B 




SLA 


A 


IE I 


*3F5 323A*e 


004Se 


LD 


iGkAF-l: ,A 


i DISABLE CUk 


444B CBll 


BUM 




SLA 


A 


I« J 


PHiCS 










444D CB27 


BIHB 




SLA 


A 


tl 1 


*3F8 36BP 


03490 GRAFON 


SUB 


S8H 


:Get PRurrER 


444r C«J7 


B1^78 




SLA 


A 


II 2 (I It 


GRAPHIC OFf 


■^FT 








) 












iiri, 32uite 


80580 


LD 


(CHAFIC*1I ,A 


;I.0AI1 OFFSET 


4451 47 


■ IBBB 




LD 


B,A 


iF'IRET INPUT 


tiro 2i7<t4 


0BS10 


LD 


HL.INSTB 




44S2 ISBi 


81191 




JR 


IHPT 






81520 ; 








44J4 Fl 


■ 1111 


BITl 


POP 


AF 






BB53I iHODII 


1 LOAD 


ROUTINE INSTPUCTIONS 


445S 4r 


•nil 




LD 


C,A 


rSECOHD INPU 


**»» c;d«b4 4 


■ 1540 


CALL 


WHITE 




t 

4456 lBe2 










441] 21614^ 


01558 


LD 

CALL 


HL,IN3TB2 
WHITE 




11121 




JR 


INPT 




4419 1851 


80578 
80:60 ; 




A ZERO 




44SB Fl 
445» 3EtD 


11138 
• 1141 


IHPT3 


POP 
LD 


AP 

A, SDH 


;LOAD CR 










445B C» 


■ 115^ 




BET 


























Progiam continues 



80 Microcomputing. December 1981 • 349 



Pregrwn corMinvKf 
















■lit* 1 

■ 1171 tHDDIIB LOM) 1 
445C CD2B(I fllM AlCIC CALL 






4tBB 1121 


lltIB 


JR 


NI.CORDl 




tOUTINI 
1B2BH 




4*BD AF 
44BE 32315B 


I2B9I 

IZlll 


(OR 

Ul 


A 

(5B31B) ,A 


■Sr* ALL POI 


445F B7 llttl OB 


A 




RTBRS 










44(B 2IFA llZff JR 

BT TO COWT. 


I,AIEBO 


jEOTEB ANY R 


4(C1 323951 
44C4 3C 


12111 
12121 


LD 
TRC 


I 513111! .A 

A 




44*2 ]ia«4z mil ui 
n 

44(S 2I(B4; HJJt LD 


5F,42Bafl 


lETACI POIHT 


4<C5 323551 
4(CI 21DI4I 


12131 
12141 


LD 
LD 


<5B35II,A 
BL,T>AII> 




BL,?oiirrs*5 


1 FOIBTS TO E 


4tCB 21FE(F 


12151 


LD 


{(FFDi ,rL 




n HDDS 'SAHGOM* 






4CCE 21*274 


121(1 


LD 


HL,R0VLOC 




446B 113S3C IIZII LC 


DE I 3C3Da 




4fiDl 22(174 


12171 


LD 


(9D-rE>l' ,BI, 




44(B BlBCBI ■114i LD 


BC,BSB*I 




4CD4 CD3B*I 


• 2111 


ca:^ 


(BIBB 




44«B BMB •!»• LDDB 




)PUT OB GCRE 


4*D7 3EB* 


12191 


LD 


A, BIB 




■■ 






4CD1 333151 


■ 2299 


LD 


(5I3IB) ,A 




44Tf U BiMB INC 


BL 


1 SETUP *SAAC 


4(DC 3A5F7I 


12211 


LD 


A, IBUFFER-1) 




CM* FOB STffTM UUU) 






4*DF 33535* 


11221 


LD 


I5B53B1 ,A 




4471 C3CBB] 11271 JP 


• 2CEH 


|T0 UMO SAB 


4*E2 C3F(7I 


1223^ 


JP 


7(Ftl< 




COP TAPE 






4(E5 FE53 


12241 CONDI 


CV 


■3 


)ir 5 SAVE c 


■1281 1 






ARE POSITIOM 


TO CASSETTE 








ii2*i lUssACES roR 


ItODIIB LOADER 




4IE7 CA7147 


1^351 


Jl' 


I, SAVE 




44T4 IC ilJii IltSTD DEn 


21 




4(CA ri4C 


122*1 


cr 


7t 


lIF L LCAD G 


447S IF 11311 DEFB 


31 




ARE POSITION 


FRCM CAEEETIE 








44TC 4D mil DEFH 
44*3 BD 11331 DEFB 


'ItODIIB - BY 


TBOHAS L, QUIND 


t(EC 31AA 


12271 
12381 1 


JR 


HI, EAR CON 




•DB 






12211 rl^SSBTTE LOAD 


ROUT IRE 




44S4 21 11341 DEFH 




TLO ENTERPRISES 


4(EE CD4547 
AD RaJTIKE 


123*1 LOAD 


CALL 


READY 


iCASSRTTE LO 


44AF ID tl31* DEFB 


■DH 




4(F1 CD12I2 


12311 


CALL 


■ 21 IN 




44Bi 21 11341 DEFH 




*137 WIHDHASH □ 


4Cr4 CD1613 


■ 2321 


CALL 


129(8 




BIVE' 






4CF7 CD3;i2 


113 31 UVUIl 


CALL 


I235B 




44CF BD IIJ^B DEFB 


BDH 




4(FA 77 


113 41 


LD 


(BL) ,A 




44DB 21 llllf DEFK 




BURRE, VA IlflS 


4IFB 23 


12331 


TBC 


■L 




* 




4CFC ID 


123(1 


DEC 


E 




44EB IMS illM DEFW 


■DSDH 




4*rD 7B 


13171 


LD 


A.E 




44ED ii 11411 DEFB 


IB 




4tFE 2ir7 


1234B 


JR 


NI.LOADl 




44EE 4S 11411 IHSml DEFH 


'mTBR THO BTTE REXIDECIRAL 


47BI 215C7I 


1231* 


LD 


BL,BDPFBR-4 




ADDKKSS FOB FIKVT* 






4711 23 


12411 LCADl 


INC 


ML 




4S1A n 11431 DEFB 


BDH 




4TB4 CD35I2 


12411 


CALL 


■ 235B 




451B SI 11411 DEm 


'FRIWTEl CRAFBIC CHABACTBR. 


47B7 77 


12431 


LD 


(BL),A 




(IF m> CRAFBIC 






4711 FEFF 


13431 


CP 


IFFB 


;EKD OF GAME 


4544 n 1144B DEFB 


nw 




POIRTKR 










4545 43 ■145B DEFM 


'CAFABILITIES, <E>TBR BB>.ll 


47IA 2Bf7 


11441 


JR 


RI,L0AD2 




' 






47BC Bl(i7l 


■ 3451 


LD 


BC, BUFFER 




45tB BB 114*1 DEFB 


Bl 




47IF 7C 


I24*B 


LD 


A,H 




4S«1 14 11471 IHSTfll DEFM 


■TBIE ' 




4711 BB 


II47B 


CP 


B 




4Mi bl B14Bf KJIVrS DEFH 


'SARGCm II HODIFICATIOB ALU! 


4T11 2114 


12481 


JR 


Nl,LOAD3 




M TOD TO SAVE UUOBTAHT' 






4713 7D 


12491 


U> 


A,L 




4Sn BD B14H DEFB 


■ DB 




4714 Bl 


12III 


CP 


c 




4S>A 47 llSSi DEFH 


'CANE IIPOMATIOB TO CASSBTT 


4715 2IEC 


12311 


JR 


l,IOAD] 




B TUB OB FUVTO. ■ 






4717 CDFMl 


12521 L0AD3 


CALL 


IIFIB 




4SC7 BDBD 11511 DBFW 


BDBDB 






■2531 , 








4KI SI 11S3B DBFM 


'SABGOB I IB 


CAB ALBO BB DSBD 




12541 iMIICH 


HOD DATA EMTERED SUBROUTINE | 


A£ A CBBSE TMIBIMG AID.' 






471A 3A5D7I 


■ 255^ 


LD 


A,(BUFFER-31 




45FD IDBD llllB DEFX 


IDIDB 




471D 333551 


i25(( 


LD 


(5I35RI ,A 


[SET MOVE NO 


45FF S« 11541 DEFM 


'FOEITIOR BABOOB II TAPE UK 












PBXS8 DTTKB' 






4721 I15E7I 


■ 357^ 


LD 


BC, BUFFER'] 




4*U BB BJlSM DIFB 


II 




4723 7D 


■ 2SB^ 


LO 


A,L 




4413 BIMB ORG 


4*31B 




4724 Bl 


12391 


CP 


C 




4<1] »C3 B117( PklCfl LD 


A,BC3E 


tFATCB iwro 


4725 2115 


12(11 


JR 


HI, AUTO 










4727 7C 


■ 2«1^ 


LD 


A,H 




4B1S 13AB44 Bllll LD 


[44AaB),A 




4728 Ba 


■ 2(2( 


CP 


e 




4fli 114(4* BISM LD 


EL.BBGIB 




4729 CA747( 


12431 


JF 


I.7I74H 


[IP N3DIA OR 


4t3B 21AI44 B14BB LD 


|44A1B),BL 




IIA DATA JURF HERE 








4«3B 3BC* Bllll LD 


A,BC9B 






12(41 , 








tftl 32IZ41 IlilB LD 


(41 EH) ,R 


lUrAII ADTO 




12(51 iDATk 


rnOH NODIIB SUBROUTINE 




LOAD BOOB 






472C 3A5E7I 


I2((l AUTO 


LD 


A,(BUFFER-2) 


I SET RQIAIHI 


4443 C11544 BICIB JF 


441SB 


iJDHP TO BAH 


K FOINTEXS 










cca II LOADia 






472F 32315* 


■ 2*71 


LD 


(5I3BB),A 




4441 314D4* B144B BBCIB LD 


BL.TITI^ 


IBLOCI HOVB 


47)2 EESa 


■ 2(8* 


ROM 


liB 




10 CBANCE SABGOa TITLE 






4734 323151 


• 24 1« 


LD 


(5B31B) ,A 




4(49 11CF«E 11(51 LD 


DE.BBCTB 




4737 3A5F7I 


■ 27BB 


LO 


A,(BUrrER-l} 




4(4C tll2BI IKd LD 


BC,12B 




4J3A 32535B 


■ 2711 


LO 


[5BS3HJ ,A 




4S4F EDBi IK?* LDIR 




rBLOa HOVE 


473D 3EI1 


12721 


LD 


A,l 




4(51 215F49 11(11 LD 


BL.KESS 


iBLOCH NDVB 


473F 32395* 


1273^ 


LD 


(5I39N1 ,A 




TD CBAMCE DTDIIK OF SARCOM *BEH CAM! - -' HESSAOB 


4T42 C3F(71 


■ 274^ 


JP 


7BF(B 


1 DISPLAY BOA 


4454 IIBEMF IKM LD 


DE,(rlDB 




RD READI TO 


MOVE 








44S7 BIBSBB 11711 LD 


kC,l 




4745 11D341 


127 51 READY 


LO 


DE,HES5 4 


;BEAOT CASSE 


4CU KIM 1171B LDIB 




IBLOCX mvB 


TTE HESSACE 










4BSC 3BU 11721 LD 


A,3*B 


iCBJLKE LBU 


4748 Mli 


127(^ 


LD 


B,2BS 




TB or nSBAGB 






474A CD0175 


■ 2771 


CALL 


75D1H 




4(5B 325ATI 1173B LD 


(7I5AB) ,A 




47 4D CD2BI1 


■ 27 88 BACK 


CALL 


■ ■3BII 




4((1 219B4C 11748 LD 


BL, START 




4751 B7 


■ 27*1 


0* 


A 




UEl HMD MBSia ADDITIOa 






4751 28rA 


■ 2111 


JR 


I, BACK 




4ti4 22S77B B175B LD 


(7I57B) ,BL 




47 53 CDClll 


12811 


CALL 


■1C9R 


I CLEAR SCREE 


4*17 IBC) 117*1 LD 


A,BC3B 


iCBANGI TD J 


N 










r IBBTKDCTIOa 






4754 AF 


12121 


lOR 


A 




***■ 315*71 B17TI LD 


(7I5IB] ,A 




4757 211551 


12B3^ 


LD 


HL,5115H 


;SARGOM BOAR 


4*«C )I7r76 B17SB LD 


(7(7rH) ,A 




D BUFFER 










4*«F 21B>4< (17 »■ LD 


BL,CaND 


iPATCB TO CO 


475A 1E4E 


■ 284* 


LD 


E,78 


;LEHGTB OF B 


■IITIOIUU. STATMEHTB 






UFFER 










4(72 234S7I IISBB LD 


(7B(BB),IJL 




475C C9 


■ 285^ 


BET 






4IT5 31EC47 liaiS LD 


BL.BSLL 




475D 3A35SI 


128(1 POINT 


LD 


A,(S835H) 


(HOVE NUMBER 


4*71 227A7( 11B3B LD 


I7*7AB),BL 


jPREVIODSLI 












stm 






47*1 325D7B 


12871 


LD 


(BUFFER-1) ,A 




447B 311541 11B3I LD 


BL, TITLES 




4763 3A3i;i 


82881 


UD 


A, (513(H) 


lYOUR COLOR 


447E 12BBT( I1B4B LD 


[7(IIB1.BL 




47(C 325E7I 


I2B1* 


LD 


(BUFFER-2) ,A 




4*B1 Z1DC47 11451 LD 


BL, SETUP 


J SET BOFFRRS 


47*1 3A5351 


12918 


LD 


A, I5853B) 


r LEVEL OF PL 


4«B4 21CI7i lli(B LD 
WB7 11A447 IIB7B LD 

WOVE ROOTim 


(7BCIB},HL 
BL.BOVEl 


iSAPGOH SAVE 


AY 

47(C 325F7B 

47(F C9 


■ 311I 
12911 


LD 
RET 


IBOFFER-1) ,* 




4(aA 22F»(F BIBBB LD 
ttm 21AA47 Bllff LD 

■OVE ROgTIW 
4CH 22A171 lltSB LD 
4*13 JEFF BlflB LD 

FCIVTER 
4(» 12«]7I 81921 LD 


(*FF>B> ,BL 
BL.BOVBl 


iFLATSB SAVB 


4771 CD5D47 


12931 J 

■2141 iCASSETTE SAVE 

■ 2951 SAVE CALL 


ROOTIHE 

Foirr 




(71A1B},BL 
A.BFFB 


;EHD OF GAME 


4773 CD4547 
477( CD12I2 
4779 CDa7*2 


■ 29 *■ 

■ 297^ 

■ 21 SB 


CALL 
CALL 
CAIX 


HEADY 

■ 212H 

■ 2S7H 




(HOVLOC) ,A 




4T7C 7E 
477D CD<4I2 


■ 2*9^ SAVEl 

■ 3*11 


LD 
CALL 


A,(BL] 
■ 2(4H 




4Cti C3II5B 11931 SMtGOH JF 


5BBi« 


IJDHP TO BEG 


47 BB 13 


■ 3^1^ 


IliC 


BL 




imiK or SARGOM PBOGBAM 






4711 ID 


■ 3B1I 


DEC 


E 




4«>B 11*741 IIB*! BTABT LD 


DE,IIBSS1 


lAOD OCR REE 


4782 7B 


■ 3^3^ 


LD 


A,E 




SACBS 






4783 2IF7 


■ 1^4I 


JR 


HI, SAVEl 




4*1E B*2A ill5B LD 


B,2AB 




478C 215078 


■ ^■5^ 


LD 


HL.BUrrER'l 




4CAJ CDD175 BIKB CALL 


75D1H 


;SAAGOR PBIH 


4788 7E 


i3B(B SAVE2 


LD 


A, (RL) 




T ROCTIBB 






4719 5F 


■ 3^7^ 


LD 


E,A 




4(A3 111149 1117* LD 


DE, BBSS 2 




47BA CM4*2 


■ l^B* 


CALL 


■ 2*411 




4«Af Bilr IllBB LD 


B.lFfl 




47 ID 23 


93^99 


INC 


HL 




4IAI a)D175 111*1 CALL 


75D1H 




47IE 7B 


93111 


LD 


A,E 




4(AB ]lBt49 mil LO 


DE,NESS3 




478F FEFF 


■ 311* 


CP 


IFFB 


I END OF GAME 


4eAE t«2] 121] i LD 


l,23x 




POIRTER 










4(BI CDD175 12121 r-ALl, 


75D1H 




4791 2lr5 


■ 312^ 


JR 


NI,SAVt2 




4«B3 11EF(E B2I3I LD 


DE,(EEFB 


1 RESTORE BAR 


4793 11(171 


B313I 


LD 


BC,BUFFER'»1 




OOS INSTRUCTION I^liT Rf PATCH 






479( 7C 


13141 


LD 


A, If 




4(Be C15171 1]14« JF 


715(H 


iJOHP BACR T 


4797 BS 


■ 315^ 


CP 


■ 




3ARGOH VTER HESSACE IK5ER1 






4718 2114 


■3141 


JR 


NI,5AVt3 




4(B1 FE54 IZISI COML CP 


n4 


[EBB IF HART 


471A 7D 


13171 


LD 


A,L 




THAI HER DISFLAT 






47 IB Bl 


I311I 


CF 


c 




IIHI : 






47IC 2BEA 


I31M 


JR 


I , SAVE2 




12171 iTMATHTHC AID 


ROUTINE 




471E CDF8B1 


■]2^^ SAVEl 


CALL 


llrSH 


Progrmm continiMa 
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then vour TRS-80 COLOR COMPUTER needs the 

Word l^ocessinq Lowerkit 

It converts your screen from an illegible checkerboard to this: 



>\s p>"0ta3rafh 'r-as teken of an 
irdirary television screen beinq 
Fed by a Color Ccfrfuter urmcdi-" 
^ied e>cept for the irstallati 
>f the Ictjjerkit, Characters: 

PEctercHi JvinKf<i^n}M<i7K i 

afccdefqhi 'klrrrccqrstuMiWUZ-'*^ 
H234567&cof'*#.r/A'^);K-=;+/.>/l 



Complete and ready to install — no software needed 
Nothing to solder — fully assembled, tested, guaranteed 
Compatible with all Color Computer software 
Absolutely no loss of hi-resolution graphics modes 
Optional cut-off switch restores original reverse<aps display 
European, Kala Kana (Japanese) and Creek characters optional 
Designed by 80 Microcomputing's Dennis Bathory Kitsz 

$79.95 complete 



MSB Electronics 

Drawer 766, Barre, Vermont 05641 
(802)476-7311 

Bire board and kits available Cait or wnie for informailon. 

Dealer inquiries mvlted. 'TRS-80 is a trademark of Tarnlv Corporation 

COD— Visa— Mastercard Dealer Inquiries Invited 



>^n 



■fSav Ifmind MMrilaanorr aase 4Tj 
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L - 


Load Oama From CaaMfta. 


— From THta Block 




S - 


Saw Oama to Caaaatte. 


— FromTntaBtoch 




T - 


TraMngAUModa. 


— From TItia Btock 




Shift M — 


GotoiylanualPlayModa 


— Front Gama Moda 




Shift G — 


FWumtoOamaModa 


— From Marwal Play Moda 




ShtttB — 


Pilnl GrapAtc Boaid Dtaptay 


— From Oama or Martual 
Moda 


Play 


ShtHL — 


Pilnt Uat of Playa 


— From Gama or Martual 
Moda 


Play 


Space — 


Pauaa 


— From TraMrtg Aid Moda 




Space Ctaar — 


Ratum lo Gama Moda 


From Tralnlrtg Aid Mma 




Table 1 


AMed commands to Sargon II with MODIIB. 





the Titles routine is a sub- 
routine to determine whether 
your printer Is up and ready. If 
your printer is not ready to run, 
the printer commands in the 
program are ignored. The Titles 
routine also allows you to ac- 
cess the graphics Board 
routine. The Board routine Is 
accessed in the Game mode by 
pressing shift B during the 
beginning of your turn. The 
Board routine (lines 04550 thru 
04770) is essentially a screen 
printer which prints only the 
graphic portion of the screen. 
Line 4645 Is needed only when 
your computer has an upper/ 
lowercase character generator 
modification. This code sets bit 
six to zero. It does not affect 
other computers that are upper- 
case only, so It is best to leave 
it in the code, if your printer 
does not have graphic capabili- 
ties, the Initialization routine 
disabled the Board routine by 
entering the value of FFH at 
GRAF -t- 1 (line 04060). Since the 
value FFH cannot be entered by 
the keyboard, this effectively 
takes out the Board routine. 

The printer routines were for- 
matted so that a game listing of 
up to 100 moves and a graphic 
board display can be printed on 
an eight and a half by eleven 
Inch page using an 80-column 
printer. The resulting graphics 
are not square but elongated, if 
you have a 132-column printer, 
the board display will t>e better 
proportioned. Many printers 
can be set up for different col- 
umn widths. Be sure to set up 
the column count you prefer 
before you load MODIIB and 
Sargon 11. 

Now comes the fun part, the 
Training aid routine. This 
routine Is accessed from 
Sargon li after pressing Break. 



in the Training aid mode (lines 
02070 thru 02270 and lines 
04890 thru 05400), the game 
which has been saved In the 
buffer table is put through Its 
paces and played from begin- 
ning to end. After all moves are 
played, you are returned to the 
Game mode to continue the 
game. While In the Training aid 
mode, two hidden codes are 
available, f^essing the space 
bar (lines 05280 thru 05310) will 
pause the display after com- 
pleting the current move. The 
display will remain static until 
the space bar Is released. By 
pressing the space bar and the 
clear key (lines 05320 thru 
05400) you not only pause, but 
will exit the Training aid mode 
and return to the Game mode at 
the point the game Is being 
displayed. Beware: Once you 
elect to return to the Game 
mode, that point of the game 
being displayed Is now the end 
of the game. You can continue 
the game, however, and each 
subsequent move will be saved 
in tr>e buffer table along with 
the previous moves. 

The buffer table is auto- 
matically loaded with each 
move In one of, or a combina- 
tion of, three ways: playing a 
game; loading a game from 
cassette; or the Manual Play 
mode. A game could be loaded 
from cassette, the Training aid 
mode used to go to move X, and 
then the game continued in a 
different way using the Game 
mode or the Manual Play mode. 

The Manual Play mode (lines 
04150 thru 04280) can be best 
used to enter published games. 
For example, you could enter 
one of the Spassky- Fisher 
championship games from 
their match in Iceland, and then 
analyze it. After saving the 



Program cotitituMd 










4Thl 


C1881I 


■ 3318 

■ 3331 




JP 


58^8H 








■ 323^ 


POT HOVES IN 


BUFFEB ROUTIME 




8 
47*7 


CIUUI47 


■32 48 MOVEl 


CALL 


NOVES 


1 SARGON HOVE 


CKSTB 


■ 12S^ 




JF 


7885H 




47M 

S 

47IU> 


CD7a75 


■33t« HOVBl 


CALL 


7S73H 


1 PLATER HDVE 


imn 


■3371 MOVES 


LD 


A,3DH 




47kr 


3lr4;« 


8128a 




Ul 


(;8F4H),A 




47a2 


1A1SJ8 


831M 




LD 


A,(5835E) 




47BS 


CB27 


83388 




SLA 


A 




47B7 


47 


§3318 




LD 


B,A 




47Ba 


3A315B 


■ 3338 




LD 


A, (58318) 




47H 


B7 


83338 




OR 


A 




47BC 


2811 


83348 




JH 


i.HOvesi 




47aE 


■4 


■ 3358 




INC 


B 




47Br 


21S871 


83388 HOVESl 


LD 


HL, BUFFER- 8 




47C2 


IIBSBB 


83378 




LD 


DE,B885H 




47CS 


11 


83388 HOVESZ 


ADD 


BL.DE 




47Cf 


iiro 


■ 3318 




Djm 


t:DVES2 




47CI 


EB 


83488 




EX 


D8,BL 




47C1 


zirisB 


83418 




LD 


8L,5flF2B 




47CC 


■18588 


83438 




LD 


BC,8885H 




47CF 


loai 


■ I438 




LDIB 






4TD1 


IB 


83448 




El 


DB,BL 




47D3 


1»B7 8 


■ 345i 




LD 


IBOFPBR) ,ML 




*70i 


lEFf 


■ 34tl 




LD 


A,8FFB 


itXD OP GAHE 


POIHTBB 












47D7 


77 


13478 




LD 


IBLI ,A 




4TDB 


CD5D47 


■ 34 88 




CALL 


POINT 




47DB 


C9 


■ 34)8 




RBT 






4TDC 


311171 


■ 3588 


SETVF 


LD 


HL,71B1H 


I RESET SAHCO 


H CODE 












47Dr 


32PitP 


■ 1S18 




ID 


(SFF(R) ,HL 




4TE] 


31t37B 


■ 1S28 




U) 


RL,NOVLOC 


iKZSET HOVE 


POIVTU 












47ES 


CD3 8C8 


■ 3531 




CALL 


(■3«B 




4711 


3EPr 


■ 154^ 




LD 


A , BPFB 


lETO OP GAn 


POIVTER 












47EA 


77 


■ 3S5I 




LD 


(BL) ,A 




47n 


C9 


■ 35(^ 

• 357^ 


1 


RET 










■ 3 581 


iSODND 


TOHE ROUT IKE 




47EC 


C5 


■ 3S» 


BELL 


PUSH 


BC 




47ED 


3X1 «■ 


■ 3fi^^ 




LD 


A.I5I1CH) 


iLSB CURSOR 


47FI 


Et3F 


■ 3«1^ 




Am 


■ 3FH 


iHJLSE VALUE 


<^rn 


83 












4Tri 


FBI 3 


■ 1«2^ 




CP 


3 


iCBEd CDRSO 


■ UKATIOM 












47r« 


3814 


■ 3831 




JR 


t.TOHE 




«7r« 


FEa8 


8M48 




CP 


9 


iCaBCC OJRSO 


B LOCATioa 












47PB 


liiP 


• 3818 




JR 


HI, INPUT 




47FJI 


■ »< 


litf 


TOME 


LD 


C,15« 




47FC 


3M1 


Hill 




LD 


A.^IH 




47PE 


CD8E4B 


83888 




CALL 


TOHEl 




4M1 


3C 


nti§ 




IK 


A 




*m 


CDtE4 8 


■ 17^^ 




CALL 


TOKIl 




4MS 


•D 


■ 371^ 




DtC 


C 




4 sac 


AF 


■ 373^ 




ZOB 


A 




4U7 


D3FF 


■ 3731 




OOT 


(«5),A 




4M« 


CI 


■ 374* 


IHPDT 


POP 


HC 


l&ACK TO BAR 


G(MI 


■PUT 












4Hft CDIBII 


■ 1751 




CALL 


■ I2BH 




4MD 


C» 


■ 376^ 

■ 377< 


1 


RET 










■37M 


llORE 


SUBRCUTIHBS 




4ME 


«* 


■ 379« 


Tomi 


LD 


L,C 




4Mr 


D3rF 


l3Sil 




OOT 


(355) ,A 




4111 


2D 


■l^lf 


TOB3 


DK 


L 




4812 


28 FD 


83838 




JR 


Hl,TOHE2 




4B14 


C» 


81838 
83848 


I 


RET 










83858 


ILPRIVI AND NAHUAL FLAX SELECTION ROOTIKES | 


4>1S 


C5 


838t8 


TITLES 


PUSH 


BC 




4114 


FS 


83878 




PUSH 


AF 




4B17 


1A1C58 


• 3BS8 




LD 


A, (581CFI) 


iLSB CURSOR 


4IIA 


EClr 


83898 




AND 


83FH 




4I1C 


FE83 


83*88 




CP 


3 


iCBECR CUR50 


R FOSITION 












4811 


3814 


■ 3>18 




JB 


I, GO 




4818 


rB88 


83438 




CP 


9 


iCBECB CUR50 


R POSITION 












4812 


2811 


83«38 




JR 


NI.SACIl 




4824 


Fl 


83S48 


GO 


POP 


AF 




4>2; 


FEtD 


83951 




CP 


189 


;ir SHIFT R, 


tuaau, PutT 












4837 


3I1E 


83>»8 




JB 


I, HAH 




4818 


FE87 


13978 




CP 


183 


lIF SHIFT a. 


l»T 


■AMUAL 


PUlI 










tS2B 


283k 


83888 




JR 


1,U1MAN 




4820 


F5 


■ 39»8 




PUSB 


AF 




48ZE 


3AEB37 


148^1 




LD 


A, (37E8NI 


jPRIRTER ADD 


BEGE 














4S31 


TEM 


8481^ 




CP 


128 


; PR INTER BEA 


DlfT 














4B31 


3883 


i4^38 




JR 


C.COI 


;IF PRDFTER 


BEADY QO 












4835 


n 


■ 4838 


BACKl 


FOP 


*F 




4B]8 


188A 


8484^ 




JR 


BACK 2 




4818 


Fl 


84858 


GOl 


POP 


AF 




481* 


FEt3 


B3«32 


GRAF 


CP 


<a 


|IF SHIFT B, 


Lfttlin BOhBD 










4838 


2857 


84878 




JB 


I .BOARD 




483D 


FEfiC 


84888 




CP 


118 


lIF SHIFT L, 


LPBIMT fULtS 










4B3F 


CAI§T7 


■ 4^>8 




JP 


I, PLAYS 




4842 


CI 


■ 41^^ 


BACK 2 


POP 


BC 


iGO BACR2 SA 


RGOM 














4841 


DDEl 


• 4I1I 




POP 


IX 




484S 


Dl 


■ 413t 




POP 


DE 




484C 


cs 


■ 413B 
14I4^ 




RZT 










>415^ 


lllANUAI, PLAf 


BOOT INK 




4847 


219D71 


841(8 


NAN 


LD 


HL.7J90H 




484A 


22F«eF 


84178 




LD 


(«FFtH),BL 




4B4C 


2A1C58 


■ 41«^ 




LD 


aL,(S81CB) 




4BS8 


ES 


84198 




PUSB 


HL 




4851 


2182JC 


84388 




LD 


HL,3C83II 




4854 


221CSI 


84218 




LD 


(581CHI ,HL 




4857 


llr34S 


84338 




LD 


DE,NESS5 


iHAKUAL PLAT 


ntssAGE 












48SA 


8«aD 


84 238 




LD 


B,8DK 




485C 


CDQ175 


84348 




CALL 


15D1B 




485r 


El 


84358 




POP 


HL 




4888 


221CS8 


84248 




LD 


1581CH) .HL 




4863 


lEie 


84271 




LD 


A.8BH 


;SET BACK SPA 

Program continues 
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Program continues 



CE CODE 










*E(^ 18DB 


Bt281 
14291 : 




JB 


BACK 2 




B43BB , 


REMOVE 


HAMUAI. 


PI>r ROUTINE 


*UT Z1I171 


■431I UHKAN 


LD 


8L,71(1H 


4l«fl 23Pe6F 


94321 




LD 


:6FF6H) ,HL 


4e6D 213858 


B4338 




LD 


KL,5(3(ld 


4B7B 3A315e 


84348 




LD 


A, 15(319) 


4B73 BE 


84358 




CP 


|HL) 


4H7t 2803 


843li0 




JR 


NI,NOEXC 


4S7S EE88 


04370 




XOR 


B(B 


«878 77 


04380 




LD 


(HL) ,A 


tB79 CD5D47 


0*390 fJOEXC 


CALL 


POIMT 


*»1C lAlCSt 


04400 




LD 


HL, (5(1CH) 


»a7F E5 


04<10 




PLaM 


HL 


4181 CDC:4B 


04428 




CALL 


PLAYER 


4SS1 £1 


I44I0 




POP 


HL 


4SI4 221CSf 


B44tB 




LD 


'5(1ch; ,hl 


4117 JEII 


• 445B 




U) 


A, (BE 


CE CODE 










4BB9 1BB7 


B446B 
(4470 




JP 


BACK 2 




04 4Bf 


LPRINT SPACES 


ROUTINE 


4tBB ]E2a 


04498 


SPACES 


LD 


A,2(K 


4IBD CDlBia 


045BB 




CALL 


003BH 


41)1 23 


«451i 




INC 


HL 


GHAPBICS ROUTINE 








4B91 lire 


84520 




DJNI 


SPACES 


4IS3 C9 


04538 
04548 




EET 






84558 


LPRINT GRAPHICS ROUTINE 


4»4 lEgC 


04568 


BOABD 


LD 


A,1DH 


4l9t CD3B>> 


84578 




CALL 


883BH 


4I»; 21II3C 


84S88 




LC 


HL,3C((i! 


AiiC I61R 


04591 




LZ) 


B,16 


489E CS 


(4608 


sline; 


Pi'SH 


BC 


4I9F leil 


04610 




LD 


B,1(H 


4aAi CQSB4f 


84620 




CALL 


SPACES 


4aA4 lesi 


(4638 




LD 


B,3(1! 


4SA6 7E 


0464( 


SBLOCF 


LD 


A, i'EL; 


48A7 EE3F 


04658 




X0-- 


63 


PBICS 










*»M cest 


04660 


GHAFIC 


ADD 


A, 00 


PHIC CHAilACTEB OFFSET 






4SAB CDiBBB 


84678 




CAUL 


0e3BH 


4eAE 23 


046B0 




INC 


HL 


46AF 1BF5 


84698 




DJNI 


NBLOCK 


4BB1 BEBD 


84700 




LD 


A,BDH 


4BB3 CD3BBB 


84710 




CALL 


813BH 


(IM CI 


(4728 




POP 


BC 


4aB7 1IE5 


84718 




DJNl 


NLIHE2 


4 IBS 3EID 


84748 




LD 


A,1DE1 


(•BB CD3BII 


84758 




CALL 


003BH 


4BBE 3EI8 


84768 




LD 


A,1BU 


4BCI IBBB 


84778 
(478( 




JB 


BACK 2 




(479( 


;DETEIWIh-E PLAYER'S COLOR ROC 


4KI 21I11C 


84B80 


PLAYER 


LD 


UL,3C81H 


ttCi J31C5I 


84818 




LD 


!5ilCH) ,HL 


tecs 2i7ief 


84824 




LO 


HL,6P71H 


4SCB 11AA6F 


848)8 




LD 


DE,6F6AH 


*eCE 3A5E7B 


84848 




LQ 


A, (BUrFER-2| 


4801 CD2A7( 


84S58 




CALL 


702Afl 


4BD4 CD1A4D 


84668 




CALL 


4D1AH 


<8D7 C9 


84871 
848BB 




HET 






04890 


JTRAINING AID 


ROUTINE 


4BDB CDC24a 


04948 


TRAIN 


CALL 


PLAYER 


4BDB 2A6B7e 


(491( 


TRAINl 


LD 


HL, (BUFFER) 


4BDE 7E 


(4920 




LD 


A, (BLl 


4BDr EEFP 


04930 




CP 


BFfH 


PCIMTEIL 










4SE1 2823 


(494( 




JB 


Z, RETURN 


4eE3 11F2S« 


(495* 




LD 


DE,58r2H 


T BUFFER 










4BE6 41I5II 


84 964 




LD 


BC,(((5M 


48E9 EDBt 


(4974 




LDIR 




48EB 226(78 


(4981 




LD 


(BUFFER) ,HL 


48EE 2A1CSI 


(4991 




LD 


HL,(5(1CH) 


48F1 iiieii 


(5((( 




LD 


DE,8((6H 


BABGOH LINEFEED 








4BPt n 


15111 




ADD 


HL,DE 


4BF5 eiBBBe 


05028 




LD 


BC,06(BH 


4BFS ca-.ais 

D 

4BFB CDA371 


05(38 




CALL 


7588H 


B5B41 




CALL 


71A3H 


4erE CD2C49 


05450 




CALL 


TOGGLE 


49tl Cn36t9 


15(61 




CALL 


PAUSE 


tiiit IBD^ 


15(71 




JR 


TRAINl 


49IG CD5D47 


(5(81 


RETURN 


CALL 


POINT 


4919 219D7I 


(5(91 




LD 


HL,719DH 


49»C 22FE6F 


(51(( 




LD 


(6FFEH) ,HL 


49IF 211171 


(511( 




LD 


HL,7181B 


4912 22F66F 


(512( 




LD 


(6FF6B) .HL 


4915 3A315I 


(51}( 




LD 


A,(5(31H) 


ONLY 










4918 EEBf 


(5141 




KOB 


8(H 


t91A 323151 


(515( 




LD 


(SdlH) ,A 


I91D CB 


B516( 




RET 


1 


491E 113558 


85178 




LD 


HL,S835U 


4921 35 


(5180 




DEC 


(HL) 


4922 2A1C50 


B519( 




LD 


HL,(5B1CH) 


4925 11C8FF 


15211 




LD 


DE,BFFCBH 


4928 CD2e76 


B521B 




CALL 


762BH 


LINE 










492B C9 


15224 




RET 




t91C 3A3158 


85238 


TOGGLE 


LD 


A,(5(31H) 


492F 323151 


05240 




LE 


(5B31H) ,A 


4932 C0IS7I 


05250 




CALL 


7(0aH 


4111 C9 


(526( 

(527( 




RET 






I528( 


1 PAUSE 


SUBROUTINE 


4936 3A4I3B 


05290 


PAUSE 


LD 


A, (3e48H) 


4919 FEBB 


(53(8 




CP 


lie 


493B !aF9 


45318 




JF 


: , PAUS E 


DEPRESSED 










493D FEB2 


(5320 




CP 


131 


D CLEAR DEPRESSED? 








493F CB 


05330 




RET 


HZ 


t94e 2A£878 


05340 




LD 


HL, (BUFFER) 


AME MODE 










4943 3EFF 


(5350 




LD 


A, BFFH 


4945 77 


(536( 




LD 


(HL) ,A 


4946 3A4B38 


(5171 


CLEAR 


LD 


A,'3B4(K) 


4949 B7 


0518( 




OR 


A 


4)tA liYt~ 


8^391 




JP 


Sl.CLEAP 


E KEYS TO CONTINUE 








»94C C9 


85480 









:SET BACKS PA 



i NEEDED FOB 



: REVERSE GRA 
; PRINTER GHA 



;EKD OF GAME 



iSABGON INPL' 



iSET UP FOB 



;GET LINEFEE 



; TOGGLE I1;RN 



[MOVE BACB A 



rIF SPACEBAR 
i SPACEBAR AK 

I RETURN TO C 



;KUST RELEAS 





(541( ; 










(5421 jHESSACES FOB 


SARGON I IB 




494D 2( 


(543( TITLE 


Dcrn 


' SARGON-IIB • 


•'• ' 


495F 2C 


05444 HESS 


DEPM 


'.L,S,T):' 


(LOAD? SAVE 7 


TRAINEB? 










4967 4C 


45450 HESEl 


acm 


'LOMl PREVIOUS 


CAME POSITION 


FRCKl CASSETTE, ' 








4991 53 


85460 MESS2 


DEFM 


'SAVE GAME POSITION TO CASSE 


TTE,' 










49B0 53 


15470 MESS3 


DEFM 


'SET UP SABGON 


IIB TRAINING 


DISPLAY, ' 










49D3 52 


85400 MESS4 


DEFH 


'BEADY CASSETTE 


AND PRESS EN 


TEB: ' 










49P2 88 


05490 


DEFB 


136 




49F] 4D 


05508 HESS5 


DEFH 


'KANUAL PLAY 




770( 


05510 
45520 ; 


ORG 


77flBH 






855)1 JLIST PUIYS ROfTINE 




7700 3A5D78 


85541 PLAiS 


LD 


A, (B'JFFER-3i 


iGET TOTAL N 


0. HOVEE 










77(3 f; 


05558 


?-.Sh 


Af 


i TOTAL NO. « 


OVES 










77(4 F5 


05560 


P'JSH 


AF 


; TOTAL HO. n 


CVEE 










7705 3EB1 


(5578 


LD 


A,l 




7787 325D78 


(5588 


LD 


(BUFFER-3) ,A 


;SET TO 1 


77BA 216278 


(5591 


LD 


HL , MOVLOC 


iGET MOVE LO 


CATION 










770D 226178 


05600 


LD 


(BUFFER) ,H1, 


[FIRST BOVE 


l^C IN BUFFER 










7710 3E2( 


05618 


LD 


A,20H 




7712 3J5C7B 


15628 


LD 


(BUFFER-4) .A 


; "SPACE" IN 


RUHDREDS COL 










7715 ltd 


05638 plays: 


LD 


B,02H 




1717 1E4D 


05648 FLAVE2 


LD 


A,8DK 




7719 i:d3b>0 


(56 50 


CALL 


(83BH 




771C IBF* 


056bf 


ljn: 


PLASSi 






f-.iit :-K. c; 


".■.'HNS S;;BRC«:TI!iE 




■:iE 86(1 


a 56 90 


Lr 


B,l 




;72e Fi 


85788 


i".!- 


AF 


; TOTAL NC . ••. 


OVES 










7731 F5 


05-:? 


PL"ii; 


At 


: TOTAL SC . y. 


nvEs 










7722 FEIA 


85728 


CF 


16 




7724 3BBB 


05738 


JH 


CLIST 




V7 26 84 


85748 


INC 


a 




7727 FE33 


B575B 


CP 


51 




7729 38B6 


85766 


JK 


C.LIST 




772B 84 


85771 


INC 


B 




772C FE4C 


857 89 


CV 


76 




772E 3881 


0579B 


JR 


CLIST 




7738 84 


05B00 
85B1B ; 


INC 


^ 






85)128 ;SAHGON - PLAYER HEADING SCBROVTIKE 


7711 70 


85938 LIST 


LO 


A.B 




7733 325BTt 


85E48 


LD 


BCFFEP-S: .• 


;SAVE WC. irr- 


LU?<NS 










7735 C5 


C5B50 LIsTl 


S'SSi: 


BC 


; NC . COLVI^NS 


7736 0605 


B5868 


LD 


B.eSn 




773S CDBB45 


115871 


cal; 


SPACES 




773B 21716F 


i;5880 


LD 


HL.6r71H 


! "PLAYER" PO 


INTER 










773E 116A6F 


05B98 


LD 


DE,6F6AH 


i "SARGON" PO 


INTER 










7741 3A5E7B 


059(0 


LU 


A, (BUFFEH-i) 




7744 A7 


85911 


AND 


A 




7745 2801 


85928 


JR 


HZ, SAKE 




7747 EB 


85930 


EX 


DE.HL 


jSWITCH POIN 


TEBS 










7748 0682 


(594( SAME 


LO 


B,82H 




774A C5 


B5958 LIST! 


PUSH 


BC 


;«HITE/BLACi: 


COUNTER 










771B D5 


8596B 


fJSH 


DE 


;SAVE 


774C 8607 


85978 


LD 


B,17B 




"■T4E 7E 

GS 

774F CD3B00 


35988 L1ST3 


L.D 


A, (HL) 


:LTST HEADIS 


05998 


CALL. 


«e3BH 




7752 23 


(618( 


INC 


HL 




7753 10F9 


06810 


DJKI 


L1ET3 




7755 Dl 


86821 


POP 


DE 


iSAVE 


7756 EB 


16838 


EX 


DE.HL 




7757 CI 


86(41 


POP 


BC 


iWITE/BLACt; 


POINTER 










7758 1BF0 


(6050 


DJNI 


LIST2 


1 PRINTER OTH 


ER HEADING 










775A CI 


06061 


POP 


BC 


J HO. COLUMNS 


775B 11D8 


0687( 


DJNI 


MSTl 


J PRINT NEXT 


COL, HEADING 










775D 3E0D 


86(00 


LD 


A,0DH 




775F CD3B(8 


(6(90 


CALL 


e8)BH 


i LINEFEED 


1762 3A5B7S 


(6101 


LD 


A, (a"FFE:-'-5 




7765 47 


(611( 


LD 


B,A 




7766 2A6(7£ 

B 

""769 3A5D7E 


86128 


L^ 


hL, 31:ffe8: 


1I40VE POIKTE 


86138 


LL 


A. B'JFFEB-)! 


iHOVE ItUHBEB 


77tC 226(78 


(«14( LIET4 


L^ 


(BUFFER) ,HL 


iEEEF TWlCr 


or POINTERS 










776F 325D7B 


06150 


L:: 


1 BUFFEB-ll .A 




7772 32SA7B 


(616( 


LD 


(BUFFEB-61 ,A 




7775 E5 
R 

7776 C5 


86178 


PUSH 


HL 


; PLAY POINTE 


B61H8 LIST5 


PUSH 


BC 


il*0. COLUMNS 


7777 3A5D7a 


86190 


LD 


A, (BUFFEl!-3) 




777A FEIA 


86211 


CP 


26 




7771; 287F 


86218 


JB 


^,BAC1 


; IF ALL COL. 


PRINTED 










777E 0602 


06228 


LD 


B,a]R 




77 60 2A607e 


06230 


Ll 


HL. IBUFFLF 




7763 7E 


8(^48 


Lu 


A , ' ;■! L ■ 




77 B4 FEFF 


06250 


^P 


eFFH 




~~Sb 2816 


06260 


JR 


:,Mov 


;8FF IE END 


01 GARE BYTE 










"786 CD8B4B 


86270 


CALL 


SPACES 




7766 3A5C76 


86281 


LD 


A, 1 B'JPFEB- 4 ; 




778E CDSBIB 


86290 


CALL 


043BH 




7791 CD277e 


B63(B 


CALL 


MOVHO 


.■GET ASCII N 


OVE WO. 










7794 8681 


06310 


LD 


B,B2H 




7796 CDBB48 


06328 


CALL 


SPACES 




7799 2fl6B7e 


86330 


LD 


HL, (BUFFER) 




779C 0602 


86348 
06)58 i 


LD 


B,B2H 






96368 ;PRINT 


MOVE SUBROUTINE 




779E C5 


86370 HOV 


PUSH 


BC 


;HHITE/BI.ACK 



Program contmueO 
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game to cassette, you could try 
different moves at different 
points in the game or see how 
Sargon would analyze that sit- 
uation. Then, you coutd reload 
the original game and compare 
what Spassky or Fisher did. 

The Manual Play mode Is ac- 
cessed from the Game mode by 
a hidden code. Shift M at the 
beginning of your turn. It re- 
mains in this mode until you 
enter shift G to return to the 
Game mode (lines 04300 thru 
04460). The program assumes 
that It Is then your turn to move 
to continue playing in the 
Game mode. 

A list of commands Is given 
In Table 1. All routines ac- 
cessed by pressing two keys 
are accessed In one or more of 
the playing modes; Game, 
Training aid, or Manual Play. 
The routines accessed by 
pressing only one key are ac- 
cessed from the title block after 
pressing Break. 

I hope that my modifications 
to Sargon II will add to your en- 
joyment of the game and 1 en- 



courage you to try them. After 
assembling the program, enter 
a published game using the 
Manual Play mode. Use the 
Training aid mode to analyze It. 

I don't know whether Sargon 
II Is compatible with the Model 
III. It looks as though It may be, 
since Sargon II uses Its own 
routines for everything. I tried 
to do the same thing except for 
the cassette subroutines. It 
may be compatible; however, 1 
don't guarantee it. 

It Is unfortunate that compil- 
ing the Assembly program 
takes more than 16K with Radio 
Shack's Editor/Assembler. 
Even more disastrous Is the 
fact that T-BUG (and other 
T-BUG-type utility programs) 
cannot be easily used to enter 
the machine code and record 
the program due to non-con- 
tiguous code. To help remedy 
this situation, I will make 
available a low-cost machine- 
code tape of MODIIB as listed 
In this article. Just send me a 
self addressed, stamped 
envelope with your inquirles.B 



!!NOW AVAILABLE!! 

I NDEX 

^^^V Sequential 
"^^—1-^ Access 
Method 

* Gel and Put Records to Disk File by "KEY" 

* Read File in Ksy Sequence Without Sorting 

* Delete Records Without Recopying File 

* Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

* Machine Language or Basic Subroutines. 

BUSINESS APPLICATION ADVANTAGES 

- knproved Disk UtUizatkxi 

- Easier Program Devek>pment 

- Improved Operating Characteristics 

- Reduce or Eliminata Sorting 

- Improved ParlormarKe 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette S90 00 



NEW! MACHINELANGUAGE^BASICSUBS — $140 

— PLUS — FrM Mailing List Sample Apptlcalion 
Add 6% Sales Tax for California Orders 

TRS-80 MODEL I, II, A III and CPM SOFTWARE FROM 

Johnson Asaoolotoo - or - Telephone Order Line 
P.O. Box 1402 ForBwikCvdStfas 

Rwlding. CA 96001 (916) 221-0740 

wmt ran hk catalog 



^ as 



Program conlinutO 












roiHTER 












7Tfr hi; 


18 381 




LD 


B.BSH 




77*1 7E 


•4398 MO VI 


LC 


A.IHL) 




77J»J FEFF 


•t4lt 




CP 


• PPH 




77h4 ]■■£ 


BttlB 




JR 


NI,HDV2 


I CHECK HID 


F GAME BVTI 












77Kt CI 


B(«2I 




POP 


DC 


ihbite/bum:! 


POIHTEH 












77*7 lAiB78 


B643B 




LD 


A, (BDPFEII-&) 




7TAA 3D 


•8 44B 




DEC 


A 


IPRIRT IN ON 


E LESS COLUHH 












77flB 11SB7B 


•<4SI 




LQ 


IBUFFEB-Sl ,A 




77M B7 


l«4(l 




08 


A 




nu 2B4C 


■«47« 




JK 


I ,BAC1 


r IF ALL COLU 


HHS PHIKTED 












77B1 CI 


•C4BI 




rop 


BC 




77b; 1B34 


8C4»« 




J* 


NOV3 




77B« CD3Bft 


•6St8 H0V7 


C*LL 


883BH 




77B7 23 


Be^ii 




INC 


HL 




77BB 1IE7 


BC!2B 




□JWi 


HOVl 




77BA 3E2I 


■8538 




LD 


A,2^H 




77BC CD3B(I 


■C^4B 




CALL 


8B3BB 




77Br CI 


•45 It 




POP 


BC 


lUHITE/BUlCI 


POIMTER 












77CI IIDC 


■C5B1 




DJNI 


NOV 




77CZ iiriii 


H57I 




LD 


□E,]48 




77CS IS 


•iSBB 




KDD 


HL,DE 


iHOVE BUFFER 


TO REXT 25 












77C6 21«I7B 


■t;9B 




LD 


(BUFFERI ,HL 




77 C9 3A5A7B 


IBBIB 




LD 


A, lBUFFEfl'8) 




77CC C«19 


i«81l 




ADD 


*,!« 


|G0 TO NEXT 


COLUHH 












77CE 32^A7B 


■8828 




LO 


(SOFFU-*) ,A 




77D1 FEt4 


■««]■ 




CP 


188 




77D3 2fll 


■ti4^ 




J> 


Nt.COL 




77D5 22^178 


**6bt 




LD 


tBOFFER-8) ,HL 




77DI 3llSC7a 


■««!■ 




LD 


A,(BDPrElt-4) 




77DB rE2l 


H(7I 




CP 


2BE 




77DD 2lf2 


■44 81 




JR 


HI.INCP 




77Dr 1E3I 


•44 9i 




LD 


A,3«H 




77E1 IC 


•4788 IHCR 


IKC 


A 




77E2 315C7B 


■871« 




LD 


(BUFFEII-4) ,A 


;SFT BUNDRCD 


S COUITTEII 












77E5 CI 


■«72^ COL 


POP 


BC 


;HC, COLUMIE 


77K6 IIBE 


•4 7 38 




lUNI 


LISTS 




77B8 )(15B7B 


■ B74i ltOV3 


LD 


A,(BUFFEB-S) 




7TEB 47 


■«7SB 




LD 


B,A 




771C JEBD 


H7£a 




LD 


A,8DH 




7TEB CD3MI 


■C77« 




C*LL 


■ B3BH 




7Trl 3*5D7e 


■87B8 




LD 


A, (BUFFEB-D 




77r* 3C 


•«7 9fl 




IMC 


A 




77r5 El 

* 

77P( IIIAH 


•888^ 




KIP 


BL 


iPLAi pomB 


■tsi^ 




U) 


DE.ll 




77r» IS 


■4 828 




WD 


HL,DE 


;«ECTIFt NOV 


e MIFFER 












77FII C3tC77 


■4B38 




JP 


LIST! 




77FO CI 


■tB<B 


SACl 


POP 


BC 


I HO. COLUHHS 


77fE El 


■ BBSi 




POP 


HL 


JPLAT POllfTE 


77Fr Fi 


IfiBB* 




POP 


AF 


[TT'TAL WD. « 


tms 












7Sfla FE64 


■ 6 871 




CP 


IBB 




Tail lei; 


■8BBI 




JF 


CBAc: 


J IF < IBB MO 


VES 












7aB4 D«(4 


It 898 




SUB 


IBB 


iCET NEXT 18 


1 MOVES 












7B» F5 


•49l^ 




PVSH 


AT 


; TOTAL HO. H 


DVES 












7aB7 lEBl 


■891 ■ 




LD 


A,l 


(REPEAT coaa 


T KITH NEXT 


1^^ 










7 BIB 12SD7a 


■t92^ 




LD 


(BUFFER-S) .A 




7BBC 2U87a 


■493^ 




LD 


HL,IB0FFEK-S1 




7MF IIIABB 


•4 94* 




LD 


DE,18 




1S12 19 


•4 95^ 




ADD 


KL.DE 




711] 22«i7e 


4t94( 




LD 


(BOFFEBl .HL 




7I1« C)1577 


■ 4978 




JF 


PLAISI 




7B19 3EID 


B8 9BI 


B*C2 


U> 


A,(Dtl 




7aiB cD3Bia 


e4 99« 




CALL 


8B3Bn 




781E Fl 


B7B** 




POP 


AF 


[TOTAL HO, M 


OVEB 












7aiP 32SD78 


■ 7^1^ 




LD 


(BUFrEa-3) ,A 




7812 3Eta 


■78 ]■ 




LD 


A,BBH 




7B24 C3424B 


t7«3^ 
• 7«4I 


J 


JP 


BACK 2 






•7«5« 


i*SCI 


HOVE NO. COMVEItSTON MXITINE ~ | 


7B27 3A&A7a 


»l%t* 


HOVNO 


LD 


A, (BUFFER-tl 




782* PE(4 


■ 7I7I 




CP 


118 




78:c 2II5 


■ 7 1 1* 




JB 


»i,rKiWvc\ 




7S2E 3E3a 


•7I9^ 




LD 


A,38H 


; ASCI I lEBO 


7B3I FS 


«71«^ 




PUSH 


AF 




7B31 IBID 


• 711^ 
■ 7t2^ 


1 


JB 


nOVMo: 






B7I3^ 


J TEN' 


COLUMN 


SUBROUTINE 




7833 ■«3« 


8714* 


novNo 


LD 


B,38M 




7B3t FEB A 


• 7151 


ASC 


CP 


BAH 




7837 DA3F78 


B71CB 




JP 


C.EWT 


J IF < ]• 


783* Bt 


B717I 




INC 


B 


jCOUHT TEN'S 


783B DCB* 

N 

7B3D 18F6 


B7ieB 




SUB 


BAH 


1 SUBTRACT TE 


37198 




JH 


ASC 




7B3F C£ie 


17 2^^ 


ENT 


ADD 


A, 3811 


lADD ASCII 3 


■ H 












7841 F5 


B721B 




PUSH 


AT 




7842 3fc5C7B 


B722B 




LD 


A,(BUFFEI)-4) 


I HUNDREDS CO 


LUHN 












784! FE2a 


87:38 




CP 


2811 




7847 78 

N 

784B 2806 


(7241 




LD 


A.B 


; TEN'S COLUH 


•72S* 




JH 


NiiHOVso: 


1 IF HUNDKCDS 


NO "SPACE- 












7B4A FE3B 


•7 261 




CP 


3lB 




7B4C 2ttl 


e727B 




JR 


HI,M0V1J02 


[IF NO TEN'S 


■SPACE" 












784E 3E2B 


B7;BI 




U) 


A, 281! 




78^8 CD3BBB 


87398 


«0VNO2 CALL 


■ 83BH 


IPHIWT TEN'S 


COLUMN 












li'^-i Fl 


i71Be 




POP 


AF 




7B;t CD3Blf 


B731^ 




CALL 


■ 83BH 


(PRINT ONE'S 


COLUHH 












7B57 C9 


B732B 
•7 3 38 


I 


BET 








■ 7348 


jSETUP FOB AUTO ST*RT OP HOOIIB 


»\tl 


■7]St 




OMC 


41E7H 




41E2 C3 


87388 




DEFB 


■C3B 




41E3 C«43 


r37a 




DEfT* 


HOOIIB 




43CI 


87 388 




END 


MODllB 
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Color computer owners 




Yes. that's right - for as little as 

$298.00 you can add 32K <>t dynamic 
RAM. and a disk interface, to your 
TRS-80 Color Computer! If you just 
want the extra memory it's only 
$199.00. and you can add the disk 
interface later for $99.00. 

Just plug the Color Computer In- 
terface (CCl). from Exatron, into 
your expansion socket and "Hey 
Presto!" ■ an extra 32K of memory. No 
modifications are needed to your 
computer, so you don't void your Ra- 
dio Shack warranty, and Exatron give 
both a 3U day money-back guarantee 
and full 1 year repair warranty on 
their interface. 

The ('(7 also contains a 2K 
machine-language monitor, with 
which you can examine (and change) 
memory, set break-points, set memo- 
ry to a constant and block-move 
memory. 

So what about the CCI Disk Card'! 
Well as we said it's only an extra 
$99.00. but you'll probably want 
Exatron's CCDOS which is only 
$29.9d - vmless you want to write your 
own operating system. The CCI Disk 



Card uses normal TRS-80 Model I 
type disk drives, and CCDOS will 
even load Model ! TRSDOS disks into 
your color computer so you can 
adapt existing TRS-80 BASIC pro- 
grams- 

.\s a further plus, with the optional 
ROM Backup adaptor, you can dump 
game cartridges to cassette or disk. 
Once the ROM cartridge is on cas- 
sette, or disk, you can reload, examine 
and modify the software. The ROM 
Backup adaptor is only §19.95. 

For more information, or to place an 
order, phone Exatron on their Hot 
Line 800-538 8559 (inside California 
408-737 7111), or clip the coupon. 




excellence in electronics 

exatron 




DEALER ENQUIRIES INVITED 



Kxatrun, 

181 Cinnmercial Street, 

Sunnvvale, CA 94086 



D Please send a 32K Color Computer 
Interface for $199.00 

r. Please send a CCI Disk Card for S99.00 

r^ Please include CCDOS and manual 
for $29,95 

3 Also imlude a ROM Backup adaptor 

fur siy.yo 

Please add S5.00 for shipping to all orders. 
and (i percent sales tax in California. 

Name 

Address 

City 

Stale Zip 

Charge my: 

[Z MasterCard Interbank Code 

L] Visa Expiration Date 

Card 

n Check enclosed for 

n Ship COD ($2.00 extra! 



Signature 



':12K KAM plus lliiik InlrrfHce 



tradi-Blurkiif T«nd> 



UTILITY 



A data-generating utility that's almost too easy to use. 



Cheater Poker 



Richard Dawes 

5233 Crossbridge Drive 

West Chester. OH 45069 



Have you ever had a fairly 
long machine language 
subroutine or program accessed 
from a Basic program, or a lot of 
bytes POKEd into the video dis- 
play memory to create a picture 
or a scene? I had a 300-byte 
machine language sort I wanted 
to use with a Basic program. I 
did not want to load the subrou- 
tine; executing and initializing a 
program should be just one step. 
I decided to PEEK all of the 
bytes in memory, put them in 
data statements, and POKE 
them in from Basic. Because 
this is laborious by hand, I wrote 
the program Data Maker. 

Execution 

To begin, load the data you 
wish to POKE in, whether it is a 
program, a machine language 
subroutine, or a picture dis- 
played on your screen. Protect 
memory size to allow for the ma- 
chine language program or sub- 
routine. Then go into Basic and 
type in Program Listing 1. 

Run the program; it will dis- 
play Start Address = . Enter the 
starting address of your pro- 
gram or subroutine in decimal or 
hexadecimal format. The deci- 
mal address can be positive or 
negative. Type the hexadecimal 
address followed by an upper- 
case H. Addresses 16536, 49000 
and BF68H are the same; the 
computer displays the address 



as -16536 in decimal or BF68H 
In hex. {It uses the formula ad- 
dress-65536 with addresses 
greater than 32767.) The com- 
puter will respond with END 
ADDRESS = . Enter the end ad 
dress of your program or sub- 
routine as before. 

The computer will display the 
starting and ending addresses 
specified in decimal and hexa- 
decimal. Now the Data Maker 
creates a program you can load 
and execute in Basic. Enter the 
filespec you wish to use, includ- 
ing tile name, extension, pass- 
word, and drive number (if 
needed). 



The program asks for the 
starting line number and incre- 
ment. Enter a line number to put 
your routine at the beginning or 
end of another program. Usually 
it is convenient to increment by 
ten. 

After the Data Maker creates 
your program, type NEW, and 
LOAD filespec to load your file- 
spec into memory. Run your pro- 
gram, and it will POKE the data 
elements into the addresses you 
specified earlier. 

The Program Created 

The first line Data Maker 
creates is a For. . . Next loop to 



DATAMAKE/BAS - 
by ; Rlchaid Z 



1 REM"*'"***' 

2 REM"*'****"**"* DATAMAKE/BAS - V 2.9 

3 BEH"*"****' 

4 REM*"**'*"** 

5 ' 

IB CLEARBeBiLS-STPIHCSf 6^,143) : CLS 

28 LINElNPUT'Stact addiesE = " ; SS: IFRIGHTSIES, 1 ) ''H-THENINS-LEFT 

S(SS,1-EN1SS1-11 :G0SL]B2BBaH:SD-D.SHS''SS:ELSED>VAL(SSl :GOSUHieHa0: 

SHS-BS;SI!-D:H)IS^SHS>"H" 

3B LINEINPIIT'End ariiirt-ss =■ " ; ES : E-VAL{ ESI : IFHIGHTS [ES,1 1 -"H*TH 

ENINS-LEFTS(ES,I.EN1ES) -1) :G0SUB2aaflB! BD-D; EHS-FSELSED-VAL( ES) :G0 

SUBieBeB:EHS-BS:E[>-D:EHS-EHS*'H" 

4i 1E5D>EDTHENPRIKT"ERH0B - Start addtcsa is greater then end ad 

dress":GOT02e 

45 IFSD>3 27 6 7THENSD-SD-65 5 36 

46 IFE0 3 27 67THENED-ED-6 5 53 6 

47 IFSD<-3276B0RSD>327670RED'-32767ORED>32767THE!iPRINT'ERRUH - 1 
nvalid addiE^SG(?s] ':(10T02B 

5B CI.S: IFSD<eTHENSS-STRSlSD) :GOT055E1.SESS'RIGIITS ( STRS I .SD) , LEN ( .'JT 

RS(SD) 1 -11 

55 IFED<BTHENES-STRS(ED1 :G0T06BELSEES-H1GHTS(STRS( EDI ,LEN(STRS(E 

0))-l) 

6B PRI^TTLS" start address -"SD"("SHS"1 End address =*ED"|*EH 

S") "iPRINTLSi 

7B LIKEINPUT'Entet fileapeO ' j FS: irFS-"'THEN7eEt.SE0PEN"D* ,1 ,FS 

Bl UlNEINPUT-Startinq line numbetJ ■ jLS : L-VAL ( [.SI -. IFL-'lTHENeB 

98 LlNEINPilT"Incrercpnt> ' ; 1 S : i-VALU SI ; IFKITHENSB 

95 AS-RlGHTSlSTHSIl-l ,LEN|STHSIL) l-l)** FOHX-'*SS*"TO"*ES + ' : READV 

:POKE)l,V:NEXTX":L-L»I:PHINTAS:PRINTIl,AS 

IBB F0RX-5DTOEDSTEP15 

IIB AS'RIGHTStSTRSlLl ,LEN(STRS(I.l )-l)*' DATA ■:[.-l.*I 

129 F0BZ-9TO14 

131 P-PEER(X-Z) rAS-AS'RIGHTSlSTRSlPI ,LEN|5TFS(P; ) -11 

14B IFI<>14THENAS'AS**.* 

159 IFED'Z*XTHEN16 5ELSENEXTZ:PRlNTAS!FRIKTtl,AS:tJElCTX 

IfiB CLOSE:END 

165 1 FRIGHTS! AS, 1] <>" , "THENAS'AS*" , " 

na BS-LEFTS(AS,LEN(AS)-11 iPBlNTBSiPRINTIl.BS: CLOSE: END 

1BBB0 AS-'el23456789RBCDEF":Al«Di :BS = "' ; FORI '1 T04 : B-INT( A 1/161 :C 

-Al-B*16:Al-B:BS-MinSlAS,Ctl,ll 'BS : NEXT: RETURN 

JBBBB IN-B.F0RI-1T0I.EN(INS1 : IT- ASC(KIDS 1 INS , I , 1 1 ) : IT-iT-4B : IFIT> 

9THENIT-IT-j!lN-IN*16*!T:NEXT!D-IN!RETURN 

2BBie IFIT>9THENIT-lT-7 

2a02B IN-IN*1 6*11: NEXT :D-IN: RETURN 



Program Ustirig 1 



POKE all the data into memory: 

Otarting line number> F0RX = <Slarl aO- 
dress> TO<end ad(lress> 
iHEADV POKEX.Y NEXTX 

You specified the starting line 
number, start address, and end 
address. The line begins at the 
start address, reads a byte of 
the data, POKEs that byte into 
the current memory address, and 
continues to the end address. 

To merge this program at the 
start or end of another program 
type MERGE filespec; Data 
Maker creates a Basic program 
in ASCII format. 

Data Maker 

Line 10 clears siring space 
and the screen, and sets up L$ 
as 63 CHR$<143)'s (a line of gra 
phic blocks) Line 20 asks for the 
start address and converts it to 
decimal if necessary. Line 30 
asks for the end address, con- 
verting it to decimal if necessary. 

Line 40 checks for a start ad- 
dress greater than the end 
address. If this is found, the pro- 
gram displays an appropriate 
error message and allows you to 
re-enter the addresses. Line 45 
converts the start address from 
a decimal address greater than 
32767 to a negative decimal ad- 
dress, if necessary. Line 46 does 
the same for the end address. 
Line 47 checks for addresses 
greater than 65535 or FFFFH 
and indicates the presence of in- 
valid addresses. Line 50 clears 
the screen, and line 55 puts the 
addresses specified earlier into 
a string for later use. Line 60 
prints the line of CHR$(143Vs. 
the start and end addresses in 
decimal or hexadecimal, and 
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another line of CHR$(143)'s. 

Line 70 asks for the filespec 
you wish to use for data. If you 
enter null or press Enter the pro- 
gram repeats the question. If not, 
the program opens the file for 
output in file buffer number one. 

Line 80 asks for the starting 
line number you wish to use. If 
the number you specify is less 
than one, you will be asked 
again. Line 90 prompts you for 
the increment; again, if you en- 
ter a value less than one it will 
repeat the question. 

Line 95 assigns "<starting 
line number> FORX - <3tart ad- 
dress> TO <end address> 
:READY:POKEX,Y:NEXTX- to A$. 
It then adds the increment to the 
current line number L, displays 
the line and sends it to the disk 
file. 

Line 100 executes a For. . . 
Next loop from the start address 
to the end address with a step of 
15 bytes. Line 110 assigns A$ a 
line number, a space, the word 
Data, and another space. 

The line counter is increment- 
ed again. Line 120 sets up a 



For . . . Next loop for 15 data ele- 
ments on each line. Line 130 
adds each byte to the end of AS, 
with a comma after each byte 
(data element) except the last. 
Line 140 checks for the last data 
element in that line. 

Line 150 checks for the end 



address. If it has been reached, 
the program branches to line 
170. Line 170 prints the last line 
to the video display and disk 
without an end comma and clos- 
es all files. 

The subroutine at line 10000 
converts a decimal address 



(variable D) to hexadecimal, re- 
turning with the hexadecimal 
string in the variable B$. The 
subroutine at line 20000 con- 
verts a hexadecimal address in 
variable IN$, to a decimal ad- 
dress, returning with the deci- 
mal address in the variable O.B 



LS Sixly-mree CHRS<l43]'s used for graphics ltn« and 3t8rtir>g line numMr without leading Olank. 

5S Stan address without leading blank. 

ES End address wllhoul leading blank. 

E End address with leading blank. 

FS Filespec ol Data Maker's output. 

L Slarling line number wlih leading blank. 

IS Increment witnout leading blank. 

I Permanenl storage ot increment with leading blank, used in number-converston subroutines. 

A$ Temporary storage lor current line number. 

BS Temporary storage lor last line number, used In subroutirw to convert decimal to nexadecimal 

P PEEK of current memory address. 

X Used in For. . Next loop lor each line. 

Z Used in For . Next loop lor each byte {data element). 

C Used m subroutine to convert decimal to hexadeclmal. 

Used in number conversion subroutines. 

EO Permanent storage lor the ending address In decimal 

EHS Permanent storage lor the ending address m hexadecimal. 

INS Used in subroutine lo convert hexadecimal to decimal. 

IN Used in subroutine lo convert hexadecimal to decimal. 

IT Used in subroutine lo conveM hexadecimal to decimal. 

SO Permanenl storage lor starting address in decimal 

SHS Permanent storage lor starting address in nexadecimal. 

A Used In subroutine lo convert decimal to hexadecimal. 

B Used in subroutine to convert decimal to hexadecimal. 

Table 1. Variables used by Data Maker. 




TRS-80 



M^IT 




TRS-80 MODEL II 

8 4 MEGABYTE HARD DISKS 

(PRIMARY UNIT) $4040 



TRS-80 MODEL III 

2 DISK RS-23? (Al L RADIO SHACK EQUIPMENT) 



FREE 

OUT-OF-STATE TAXES AND SHIPPING COSTS 

WARRANTIES HONORED BY ALL COMPANY OWNED 
RADIO SHACK STORES OR COMPUTOR CENTERS 

WE ALSO CARRY A FULL LINE OF PRINTERS. 
COMPUTOflS AND ACCESSORIES 




TRS-80 COLOR 4-K $3 1 5 

^^K $495 32 K $595 



COLOR DISK DRIVES 

•509 12 3*339 

— TM TANDY CORP 



WE ACCEPT 

CERTIFIED CHECKS, 

CASHIERS CHECKS 

AND MONEY ORDERS 



PERRY OIL & GAS INCORPORATED 



137 NORTH MAIN ST . PERRY. MICHIGAN 48872 
WE OWN AND OPERATE A RADIO SHACK 



PHONE (517) 625-4161, MICH 
DEALERSHIP R162 



FOR OUR PRICES. PLEASE CALL TOLL FREE 



1-800-248-3823 



■r See Dsr oMdvemsers on page 4 IS 
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GENERAL 



More on using this popular utility. 



The Ins and Outs of EDIT 



William L. Schrader 
1409 Espanola Streel N.E. 
Albuquerque, NM 87110 



If you seriously want to delve 
into the inner workings of the 
TRS-80, then the NEWDOS-80 
operating system produced by 
Apparat is probably the tiest in- 
vestment you can make. It in- 
cludes the Radio Shack ED- 
TASM Editor^Assembler as 
modified tor disk input/output. 
This is a flexible, easy-to-use 
and very effective tool for 
writing machine language code. 
If you can afford to invest in only 
one assembler, this should 
probably be the one. 

EDTASM has several advan- 
tages over EDIT. It edits with 
many of the same commands 
vi^hich are used by the familiar 
Basic edit routine. It Is co-resi- 
dent, which means that you can 
run a test assemblage of the 
source code you are writing as 
often as you like, and without all 
the nonsense of oft loading the 
text of your source code. You 
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must off-load with EDIT so you 
can assemble it with a separate 
assembler program. EDTASM is 
hard to beat in its ease of use, 
and if you don't have a disk sys- 
tem, it is available from Radio 
Shack as a cassette tape for a 
reasonable price. 

Your next step in an assem- 
bler is probably the Macro- 
Assembler package offered by 
Radio Shack. There are some 
major advantages in the Macro- 
Assembler, even if at the sake of 
simplicity and speed. This 
package includes several sep- 
arate programs, viz. EDIT the 
editor, M80 the assembler, L80 
the Linking Loader, and even a 
cross reference generator pro- 
gram. One major advantage is 
the resulting relocatable and 
linkable object code. Once a 
program is finished, L80 can 
prepare an executable object 
file which will load anywhere in 
specified memory. It is also link- 
able, so that your final ex- 
ecutable program can combine 
several suti-programs and sub- 
routines, and even combine with 
compiled Basic and Fortran seg- 
ments. It you need this cap- 
ability, then you need the Macro- 
Assembler. 



Another requirement which 
would dictate its use is file size. 
The EDTASM editor must load 
an entire file into memory to pra 
cess it. Thus if you have a very 
long source code, very lengthy 
comments and documentation 
or limited memory, you can find 
yourself out of space with ED- 
TASM. The EDIT editor actually 
leaves text on disk and pro- 
cesses it by records, calling 
in new records as required. For 
this reason the disk drive works 
continuously while using EDIT, 
but only on load or write when 
using EDTASM. It appears that 
EDIT is limited in size only by the 
capacity of your mass storage 
system. In fact I tried it suc- 
cessfully with a 385 sector, 77 
granule listing file, which I was 
able to load and review using 
EDIT. This represents over 98K 
bytes or characters of actual 
text— or more than twice the 
available RAM in theTRS-80, not 
to mention the memory that 
EDIT Itself was using. Another 
useful feature of EDIT is Its abili- 
ty to assemble both 8080 and 
Z-80 mnemonics, even in the 
very same program. 

Some of the subtle features 
such as Macros and Block 



Pseudos could have been ex- 
plained more clearly in the 
manuals. For example, the re- 
peat block pseudos REPT, IRP 
and IRPC often need to use the 
SET pseudo-op. However, you 
must be in the 8080 mode to use 
it, or else the assembler thinks it 
is a Z80 bit set operation. 

The Cross Reference Facility, 
CREF80, sounds like a super-frill 
but it is really kind of useless. 
When used it adds an addition- 
al second set of line numbers 
to your source code and the 
final pages include a listing of 
latiels and macros referenced to 
these new line numbers. EDTASM 
gives the same label reference 
with the line numbers you in- 
voked, which I personally prefer. 
CREF80 requires still more disk 
jockeying, but it is there if your 
tile is too long for EDTASM. 

Now let's talk about EDIT, the 
real object of my investigations. 
First I would like to take Tandy 
to task for not providing better 
support ot their software. I 
wasn't surprised to find some 
software bugs in the extensive 
package comprising the Macro- 
Assembler. However the lack of 
communication and/or interest 
concerning a customer com- 



plaint left me with a nagging 
negative impression, I called the 
Texas hotline only to get ac- 
knowledgement that "yes a 
problem did exist, but ... ." 
Thereafter, my first letter was not 
even answered and the second 
letter, a couple of months later, 
gave condolences. They were 
sorry atx)ut the bugs and maybe 
future releases vrauld correct 
them. Even if they do sell their 
software "unwarranted" and on 
an "as-is" basis, an investment 
of this size should Include an up- 
date or patch service when er- 
rors have been corrected. 

Problems 

The most annoying problem I 
found with EDIT occurs when try- 
ing to scroll through a long file. 
The CNTRL-S and CNTRL-0 
commands referenced In the 
EDIT manual simply do not work. 
And if you are using the 
NEWDOS three-key Debug with 
Break defeated, then the Break 
command does not viKtrk either! 
Then you are In limtx) until the 
entire file marches by— what a 
bummer! I If you use a stock 
TRSDOS system then you can 
exit the scroll with Break, but you 
still cannot stop and start the 
scroll — a feature which you real- 
ly need when writing source 
code. 

Another stilt more cat- 
astrophic fault was related to 
the "2-flle" or index file written 
with each file output, (except for 
very short files). Thus if you 
write a file called "FILESPEC/ 
ABC", then you also see a short, 
usually one granule file called 
"FILESPEC/ZAB". The index file 



has the extension shifted right 
with a leading Z Inserted. This 
index file supposedly provides 
the editor with information 
needed for file processing, so 
that it can open the desired file 
without having to determine file 
length and other parameters at 
load time. The purported faster 
loading time (I've measured 
seven seconds with Z-file as op- 
posed to 20 without) hardly 
seems worth the effort. But the 
zinger is the fact that more often 
than not this Z-flle seems to 
scramble EDIT's brains and the 
resulting line numbers get out of 
kilter. 

This problem seems to be ag- 
gravated when the file has multi- 
ple pages. It appears that the 
line number tracker gets even 
more confused if it has to jump 
page boundaries. The only way 
to recover is to delete out-of-se- 
quence lines, which doesn't 
always work, and off-load seg- 
ments properly numbered to be 
concatenated by some other 
means. The solution I got over 
the hotline was to kill each and 
every Z-file as soon as it is 
created. 

The last error Is much less 
twthersome. It occurs when try- 
ing to use the F and O com- 
mands while in the alter mode. It 
turns out you have to use the 
shift up-arrow rather than Break 
to invoke these commands. 

After disassembling the EDIT 
object code and studying it at 
some length, I have found a 
single byte causes the CNTRL-S 
and CNTRL-0 problem. When 
checking for keyboard entry, a 
RET NZ is specified when it 
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should have been RET Z. Don't 
they test these programs 
before (or after) selling them? 
You can correct this malady us- 
ing SUPERZAP by changing the 
byte at FILE RELATIVE SECTOR 
(FRS) 54, RELATIVE BYTE (RB) 
3F from CO to C8. The loaded 
EDIT file can be corrected by 
making the same change at ad- 
dress 8767. The 0/F command 
fault can be corrected by chang- 
ing FRS 19, RB CD from IB (shift 
up-arrow) to 01 (Break). The ad- 
dress for this change when 
loaded is 657D. 

Another change I have made, 
to scroll 15 lines instead of 20, 
involves changing FRS 24, RB 
IF from 20H to 15H (close 
packed BCD). The memory ad- 
dress is 69BF. The above 
changes are listed again in 
Table 1 along with a couple 
more. 

The EDIT editor is designed to 
expand tab characters before 
the text is loaded on a disk file. 
Consider the line of code: 

LD A,B". EDIT uses 19 
bytes or characters to store this 



data whereas it can be stored 
using only 7 bytes If tabs are not 
expanded. The assembler will 
accept either mode. Thus con- 
siderable savings of disk stor- 
age space can be made by not 
expanding tabs for mass stor- 
age. Table 1 gives the code 
necessary to accomplish this 
change. 

I have used the above 
changes at some length without 
problem. I have found that the 
Z-flle can be defeated by chang- 
ing the code at 7365 from CA to 
C3 as shown in Table 1 (the 
change at 732B Is also effective 
in defeating Z-files). I have not 
tested these Z-file defeat 
changes extensively, so use 
them with caution. 

You can get the best of both 
EDITand EDTASM. By changing 
seven bytes at the t}eginnlng 
and two bytes at the end of your 
source files, you can get them to 
work on either editor. EDTASM 
source files always start with a 
D3 byte followed by the first six 
characters of the filespec. Then 
EDTASM ends with a 1A byte 




COMPUTERWARE 



products for 






SOFTWARE 

Color Invaders • Color Pac Attack • Monitor • 
Adventure Games • Text Editors • Assemblers ■ 
PASCAL • Magikube • Finance Programs • Color 
Data Organizer • Graphic Games • Disassembler 

HARDWARE 

32 K RAM Expansion Board • 16 K HAM Set • 

Cables • Interfaces • Power Pack ROM Cartridge 

• Printers 

ACCESSORIES 

Books • Cassettes • Supplies • Service Manuals 
Shipping from stock 

Call or Write: ,.-472 

COMPUTERWARE 



Dept. C • Box 668 
6809 Specialists Encinitas, CA 92024 • (714) 436-3512 
Computervvare is a trademark of Computerware 




r- Sve List ol Adwartisers on page 478 
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following the last 00 carriage 
return. EDIT tiles start right off 
with the first line number and 
end simply with the last carriage 
return. Here's the recipe for 
changing: 

• If starting with EDTASM, 
make your first line the 
same as the filespec with 
the spacing shown. ;** 
FILESPEC/EDT " 

• If starting with EDIT, make 
a blank first line and put 
the above on the secortd 
line. 

• In either case, append a 
last line of all *"'s. This 
makes it easier to find. 

When looking up the first sec- 
tor of the file using SUPERZAP, 
the two versions appear as 
shown in Fig. 1 and Fig. 2. One 
can be changed to the other 
simply by modifying the first 
seven bytes, (zero through six). 
The second line of the SUPER- 
ZAP display will give the ASCII 
equivalents of the filespec. tf 
changing to EDIT you have to in- 
sert a line number, plus tab with 
bit seven set and a carriage 
return. If changing to EDTASM, 
overwrite the BOBO BOBO B089 
OD with a D3 first byte plus the 
first six characters of the 
filespec, which are also showing 
on the second line of the 
SUPERZAP display. At the end 
of the file, keeping the file length 
the same in eitt>er case, use "2A 
OD" for EDIT files and "OD 1A" 
for EDTASM files. 

I prefer to start a long source 
code on the EDIT editor. It has 
several additional features, like 



delete or move cursor over 
words, forward and backward, 
that offer some advantage. You 
can also replace a word or text 
with another viford or text as 
many times as desired in a fite, 
and all with only one command 
(good tor changing labels). This 
advantage is only realized if you 
use it often enough to keep 
familiar with \he commands. As 
with anything else, tt>e more so- 
phisticated it is, the nx)re com- 
plicated and hard to remember. 

When you have a substantial 
amount of code written and are 
ready to test and debug, you can 
then convert it to an EDTASM 
file and assemble, modify, 
reassemble and do whatever to 
it. To make it compatible with 
ttw M80 assembler, there are 
several disparities one must 
remember. First, the PSEUDO 
OPS usually are not compatible. 
Thus you cannot, at this stage, 
use the TITLE, SUBTTL, LIST 
ON, etc. PSEUDO OPS. One way 
around this is to go ahead and 
insert what you want, but use a 
";" to make it a comment line in 
the mode that won't accept it. 
Second, the EDTASM assembler 
must have an ORG statement, 
which you may not want in the 
MicroAssembler version. Most 
of all, for all labels you must 
place a ":" to end the label. This 
is compatible with EDTASM and 
required by the Macro- 
Assembler. 

If you have global or public 
labels for the Macro, then you 

cannot use the double "::" after 
the label in EDTASM. This may 



soufKl complicated, but you'll 
find that the bulk of your source 
code Is not concerned with 
tfwse frills, arxl this Is a work- 
able way to travel. In fact, using 
EDTASM, you can run a trial as- 
semblage and usually find only 
a few Items that you forgot to ";'' 
out for the test run. Do keep a 
note pad with what has to he 
changed back for whichever ver- 
sion you are using. If you use 
this a lot. It will become easy. If 
you use it once every other 
month, forget EDIT and stick 
with EDTASM. 

And here is a note on the SEQ, 
UNSEQ, and Basic switches 
used with EDIT. The source 
code file of concern can be pro- 
cessed with EDIT, EDTASM, 
Scripsit, and even Basle. TTie 
main problem is compatibility 
with the using program. EDIT 
and EDTASM both use line num- 
bers which have bit seven set, 
B7 = 1. Scripsit and Basic 
always use B7 = 0. In fact, Basic 
will think you are using Basic 
command keyword numbers If 
bit seven is set. Concatenating 
multiple files requires you to use 
EDTASM, Scripsit or Basic. 

An understanding of the EDIT 
switcfies is called for. If tfie first 



byte of a file is a line number 
with B7 set, then EDIT wlfl ac- 
cept Its numbers and load it 
okay even if later line numbers 
do not have B7 set. If the first 
byte Is a line number which has 
B7 reset, then EDIT will accept 
Its lir>e numt)ers only if you use 
the - Basic or - SEQ switch for 
kiading. Subsequent numbers 
will be loaded okay even it you 
have 87 set. 

Also ttwre is tfw question of 
which switch to use when sav- 
ing the EDIT files. IF - Basic is 
used on load and - UNSEQ Is 
used on output, then line 
numtwrs will have B7 reset to 
zero and a space will follow the 
line number. This saves a Basic 
file. If - Basic is not used on 
load and - UNSEQ is used on 
output, then the output file will 
have no line numbers. All of this 
takes a little playing with to 
determine what Is really going 
on. One way to check it out is 
to write some short test files 
and tt>en look at them with 
SUPERZAP. I hope this will pro- 
vide some help to those who 
have had the same problems 
with EDIT that I have had. It has 
some neat features but simplici- 
ty is not one of them.B 



1 . Corrocting tha tottowlng error enables CNTRL-f 


CNTRL-O 






a File FVUttve Sector (FRS) M. Relative Byte (RB) 3F. 






Addraee: Ctumee: 


Ta 






8767 OCOH RET NZ 


0C8H 


RET 


Z 


3- CofTvcllng the foltowmg error enables Break (or F & Cmds in Alter mode. | 


(otherwise Shift Up-Arrow m jst De useiJ) a FRS 19. RB CO 






JMMrBBB. CtMi^a: 


To: 






85 TO 1BH SHIFT UP 


01H 


BREAK- 




3. Following chw>oe will print 15 lines/page rather than 20 






m FRS24. RB1F: 








Addra«a: Ctianga: 


T« 






e9BF 20H 


15H 


BCD #8) 




4. Following change suppresses tab expansion before storage 


. 




a FRS 53, RB3 57inrue5 








OWCorie NwwCode 






Change: 


To: 






JWW 3E20 LD A,20H 


86B3 3609 


LD 


(HL).09H 


85 77 LD {HL).A 


85 23 


INC 


ML 


86 23 INC HL 


88 06 


DEC 


B 


87 D5 PUSH DE 


87 3E20 


LD 


AJOH 


88 Onwi CALL 0033H 


89 D5 


PUSH 


DE 


BB D1 POP DE 


SA CD33Cn CALL 


0033H 


BC 05 DEC B 


8D D1 


POP 


DE 


80 1D DEC E 


BE 1D 


D€C 


E 


8E C8 RET Z 


BF C8 


RET 


Z 


B68F CrWVK JP B680H 


WMO iaF7 


JR 


HfifWH 


5. Following ctiange defeats creation of ■ "Z-FUa' 








a FRS 33, RB ED: 








Udraw: Change: 


To: 






7386 OCAH JP Z 


0C3H 


JP 




6. Following change a(ao delvBts creation of a "Z-flte". but may not reset system | 


parameters (5 and 8 not thorough^ tested) 








e FRS 33. RB B3: 








Addraec Cttm^K 


Tie 






732B CA5A73 JP Z.735AH 


000000 


NOP NOP NOP 


Table 7 
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GRAPHICS 



Gain access to unusual graphic modes in your color machines. 



POKE A, Color Computer 



Richard Esposito 

University of Baltimore 
Baltimore, MD 21201 



The Key Box 

Color Computer 
Extended Color Basic 



The TRS 80 Color Computer 
uses the highly potent com- 
bination of the Motorola 6883 
SAM and the 6847 VDG chips. 
The Color Computer supports 1 4 
different display modes; in Mo- 
torola terminology, they are: Al- 
phanumeric internal, semi- 
Qraphics-4, semigraphics-6, 
semigraphJcs-8, semigraphics- 
12, semigraphics-24. graphics- 
IC, graphics-IR, graphics-2C, 
graphics-2R, graphics-3C, 
graphics-3R, graphics-6C, and 

0Taphics-6R. 

In addition to these 14 modes. 



there are two additional modes: 
alphanumeric external and DMA. 
The former requires an external 
ROM for up to 256 characters. 
These could include APL char- 
acters, lowercase, Kata-kana or 
any other combination. 

Level I Basic supports two of 
these modes and Extended Col- 
or Basic supports seven. If you 
wish to use any of the modes 
not supported by your version of 
Basic, you must either move up 
to a higher level of Basic or re- 
sort to POKE graphics. 

In order to enter any of the 
modes, certain addresses relat- 
ing to the two chips (SAM and 
VDG) must be POKEd. The ad 
dress of the VDG is $FF22 {the 
dollar sign indicates the number 
is hexadecimal). 

Since the SAM chip is not di- 
rectly connected to the data 
bus, it must be programmed one 
bit at a time by POKEing ad- 
dresses $FFCO through $FFC5. 
You can POKE the addresses 
$FFC1 , $FFC3, and $FFC5 to set 
the SAM signals or you can 
POKE the addresses JFFCO, 
$FFC2, and $FFC4 to reset the 
signals. Refer to Table 1 for the 
values to use for a given mode. If 
you have Extended Color Basic, 



it is not necessary to restore any 
VDG or SAM addresses when 
using graphics since the inter- 
preter does this automatically 
when your program stops or is 
interrupted. If you have Level i, 
this can be accomplished by 
pushing the reset button. 

If you do not have Extended 
Color Basic, you must also pro- 
vide additional screen memory 
for the different modes. Level I 
only provides .5K (512 bytes) 
while most graphic modes re- 
quire more. On power-up. Ex- 
tended Color Basic provides 
6.5K which is more than ade- 
quate for the graphics used in 
this article. 

All sample programs that fol- 
low assume that the user has 
Extended Color Basic. If this is 
not the case, see the section at 
the end of this article entitled 
"Level I modifications." 

Modes Supported by 
Level I and Extended Basic 

Alphanumeric internal and 
semigraphics-4 modes can be 
used by POKEing the screen 
memory (addresses 1024-1535). 
If you POKE the values 0-63 into 
memory, you get standard ASCII 
characters green on black. 



POKEing values between 65 and 
127 give you the normal display 
of black characters on green. It 
you POKE the values of 128-255, 
you get graphic characters that 
consists of zero to four quad- 
rants of a square filled in with 
one of the eight colors on a 
black back-ground (no more 
than one color can appear with- 
in the same square). You can 
display all 255 characters by 
running the following program: 



10 CLSO 

20 FOB I = 1024 to 1279 

30 POKE I, 1- 1024 

40 NEXT I 

50 GOTO 50 



You may recognize the semi- 
graphic-4 characters as those 
generated by the set and reset 
instructions. 

To use graphics-2R mode 
(Tandy calls it PMODE 0) you 
must POKE location $FF22 with 
$B7 and $FFC1 and $FFC3 with 
zeros. In this mode your screen 
is divided into a grid of 128 col- 
umns by 96 rows. This mode 
uses 1536 bytes of screen mem- 
ory, one bit for each pixel. Six- 
teen bytes are used for each of 
the 96 rows of the display screen. 
If your display screen starts at 
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1024, the byte controlling a pixel 
at row R. column C, would be 
1024 + 24. R + INT (C«) (0< R<95, 
0«;C<127) and the particular bit 
(counting from left) = C-8-INT 
(C/8). To illustrate, the following 
program draws a diagonal line 
running from (0,0) top left of 
screen to (95,95) right, middle of 
the bottom row. 

10 POKEiHFF22, iHB7 

20 POKE &HFFC3, 

30 POKESHFFCl.O 

40 FORB^ 1024 TO 2559 

50 POKE B, 

60 NEXTB 

70 FO«B=0lo95 

80 C = R 

90 B = l024+16.R + INT(C/8) 
100 V = 2t(7-(C-B-INTlC/8))) 
110 POKES, V 
120 NEXTR 
130 GOTO 130 

Modes Supported 
by Extended Basic 

If you have Extended Basic, 
you can obtain the same plot us- 
ing the following program: 

10 PMODEO 

20 SCREEN 1,0 

30 PCLS 

40 LINE(0,0)-(191,191),PSET 

50 GO TO 50 

The graphics-3R mode (Tandy 
calls it PMODE 2) is similar to 
the graphics-2R mode. The print 
matrix is composed of 128 col- 
umns by 192 rows. It involves 
twice as many points and uses 
twice as much memory {3K in- 
stead of 1.5K). 

Similarly, the byte (B) control- 
ling a pixel in row (R) and column 
(C) would be calculated as B = 
1024-(-16'R-(-lNT(C/8) (0<R< 



192, (KC<127) and the particu- 
lar bit (P) would be P= C - C* INT 
(C/8). 

The corresponding line drawing 
program is: 

10 POKESHFF22, &HD7 

20 POKE&HFFCS, 

30 POKE iHFFCl, 

40 FOR B= 1024 10 4095 

50 POKE B, 

60 NEXT B 

70 FOR R = 0TO191 

80 C = INT(W2 + .51 

90 B = 1024 + 16*R + INT(C/8| 
1X V = 2t(7-(C-a-INT (08)11 
110 POKE B. V 
120 NEXTR 
130 GOTO 130 

The corresponding Extended 
Basic program is: 



10 PMODE 2 

20 SCREEN 1, 

X PCLS 

40 LINE (0,01-il91, 191), PSET 

50 GO TO 50 



The graphics-6R mode (Tandy 
calls it PMODE 4) is also similar 
to graphlcs-2R and -SR modes 
except that you get a plot matrix 
of 256 by 192. This mode uses 6K 
of screen memory. 

As before, the byte (B) control- 
ling a pixel in row (R) and column 
(C) would be calculated as B = 

1024-F32*R-FlNT(C/8) (0<R< 
191, 0<C^255) and the particu- 
lar bit (P) would be P = C - C- INT 
(C/8), 

The corresponding line drawing 
program is: 

10 POKE&HFF22,4HF7 
20 POKE SHFFC5, 
30 POKE&HFFC3, 
40 FOR B= 1024 TO 7187 



50 POKE B, 

60 NEXT B 

70 FOR R = OIo 191 

80 C = H 

90 B = 1024 + 32-fl + INTlC'Bl 
1W V = 2t(7-(C-a-INT(Q8|)) 
110 POKEB, V 
120 NEXTR 
IX GO TO IX 



The corresponding Extended 
Basic program is: 



10 PMODE 4 

20 SCREEN 1, 

X PCLS 

40 UNE(0,0|-(191, 191), PSET 

50 GO TO 50 



The full color graphic modes 

allowfourcolorsat atimeon the 
screen. These modes require 
two bits of data for each pixel 
for color values ranging from 00 
binary to 11 binary. 

The first full color graphics 
mode that is included in Extend- 
ed Color Basic is Motorola's 
graphics-3C mode (Tandy calls 
it PMODE 1). In this mode our 
screen matrix consists of 128 by 
96 pixels with 2 bits per pixel. 
This mode uses 3072 bytes of 
screen memory. Since one row 
of graphics consists of 128 pix- 
els and each pixel uses 2 bits or 
one-quarter bytes, we need 32 
bytes per line. It our display 
screen starts at 1024. the byte B 
controlling a pixel at row R. col- 
umn C would be B = 1024 -t- 32- 
R-(-INT(G/4)(0«R^95,0<C^127) 
and the particular one-quarter 
byte Q controlling that pixel is 
Q = C-4*INT(C/4). 

To illustrate. I will again resort 
to the line drawing program but 



this time you have a choice of 
colors. 

10 INPUT"L|NECOLOR(1.2,or3l = ''.X 

20 POKE &HFF22. iHC; 

X POKE SHFFC5, 

40 FOR B = 1024 to 4095 

50 POKE B, 

60 NEXTB 

70 FOR H = 010 95 

80 C = H 

90 B = 1024 + 32-R + INT(CM| 
100 V = 41|3-[C-4-INT IC/4) II 
no POKEB, V-X 
120 NEXT R 
1» GO TO IX 

The equivalent program using 
Extended Basic: 

10 INPUT ■LINECOLOR(1,2,of3l=',X 

20 PMODE 1 

30 COLOR X+1, 1 

40 SCREEN 1,0 

50 PCLS 

60 LINE (Q,0)-(191, 191). PSET 

70 GO TO 70 

Rounding out the last of the 
seven modes supported by Ex- 
tended Color Basic is the graph- 
ics-6C mode. It uses a plot ma- 
trix of 192 rows by 128 columns. 
Similar to the graphics 3-C 
mode, this mode uses 2 bits per 
pixel and with double the verti- 
cal resolution of graphics 3-C it 
uses twice the screen memory 
resulting in 6144 bytes. 

If our display screen starts at 
1024, the byte B controlling a 
pixel at row R, column C would 
be B=1024 + 32.R+INT(C/4) 
(0<R<191, 0<C<127) and the 
particular one-quarter byte Q 
controlling that pixel is Q = C- 
4•lNT(C/4). 

Once again 1 shall illustrate, 
using the line drawing program 
and as with the graphics 3-C 
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mode, that you have a choice of 
colors. 



10 INPUT LINECOLOB(l,2.0f3)= .X 

20 POKE SHFF22, SHE? 

30 POKE AMFFCS, 

40 POKE AHFFC3, 

50 FOB B = 1024 to 7167 

60 POKE B. 

70 NEXT B 

80 FOR B = TO 191 

90 C^INTlR/2* 5) 
100 8=1024«32-R*INT(C/4| 
no V = 41(3-)C-4-INT(Q4)j| 
120 POKE B, V-X 
130 NEXTP 
140 GO TO 140 



The equivalent program using 
Extended Basic is; 



10 INPUT LINECOLOB(l,2,or3)=",X 

20 PMODE 3 

30 COLOBX+i. 1 

40 SCREEN 1.0 

50 PCLS 

60 LINE (0,0| -(191,1911, PSET 

70 GO TO 70 



The graphics-1C mode uses a 
plot matrix of 64 rows of 64 col- 
umns with up to tour colors us- 
ing 2 bits per pixel for a total of 
1024 bytes. If our display screen 
starts at 1024, the byte B con- 
trolling the pixel at row R and 
column C would be B = 1024 + 
16-R + INT{C/4) (0<R<63. (KC^ 
63) and the particular one-quar- 
ter byte Q controlling that pixel 
isQ = C-4*INT(C/4). 

A program to draw a diagonal 
line from the top left to the bot- 
tom right of the display screen 
follows: 



10 INPUT'LINECOLOfl(1,2,CK3) ,X 

20 POKE &HFF22, iH87 

30 POKE &HFFCl,0 

40 FOB B = 1024 TO 2047 

50 POKE B.O 

60 NEXT B 

70 FOHR = 0lo63 

80 C = R 

90 B = 1024 + 16. B + INT (C/4» 
100 V = 4tl3-|C-4. INT (0/4)1) 
110 POKE B, V-X 
120 NEXT R 
130 GOTO 130 



The graphics-2C mode has 
double the horizontal resolution 
as the graphics-IC mode. It uses 
204fl bytes of screen memory. 
The line drawing program rewrit- 
ten for this mode is: 



10 INPUT "UNE COLOR It. 2. or 3)" . X 

20 POKE &HFF22. iHA7 

30 POKE SHFFCa. 

40 FOB B = 1024 TO 3071 

50 POKE B. 

60 NEXTB 

70 FOB R = lo 63 

80 = 2. R 

90 B= 1024.32'RtlNT(CM) 



10O V = 4'i3 - iC -4-INT(C/4)| 
110 POKE B. V-X 
120 NEXT R 
130 GOTO 130 



The graph tcs-1 H is a 64 ro* by 
128 plot matrix and uses 1024 
bytes of screen memory. 
The line drawing program is: 



10 POKE4HFF22. &H97 

20 POKE 4HFFC1, 

30 FOB B= 1024 TO 2047 

40 POKEB, 

50 NEXTB 

60 FOR R = TO 63 

70 C = 2.R 

80 B= 1024+ t6.fl + INT(C«) 

90 V = 2'(7 - rC - a-INT (Q8) I 
1W POKEB, V 
no NEXTR 
120 GOTO 120 



SemJgraphlcs Modes 

Except for the semigraphics-6 
mode, the graphics can be inter- 
mixed with your standard ASCII 
characters. 

The semigraphics-6 mode 
takes a plot position and, very 
much like the graphics on the 
original TRS-80, breaks it up into 
six parts (three rows by two col- 
umns). Since the screen con- 
sists of 16 lines by 32 character 
positions, this gives us an effec- 
tive resolution of 64 rows by 48 
columns in 512 bytes of mem- 
ory. To print out all of the semi- 
graphics-6 characters, run the 
following program (no modifica- 
tions are necessary for a Level I 
machine). 



10 POKE65314.23 

20 FOB I = 1024 to 1535 

30 POKE (.0 

40 NEXT t 

50 FOB I =0 TO 255 

60 POKE 1024 + 1.1 

70 NEXT I 

ao GO TO ao 



The first four lines (POKEd 
values ot 1-127) are "garbage" 
characters because the external 
VDG ROM is not supplied with 
this system. The codes 128-255 
are much more interesting— they 
provide you with every combina- 
tion of blue/black and red/black 
in a 3 by 2 character position. 

The remaining semigraphics 
modes are not possible on a ma- 
chine that uses only the MC6847 
VDG. These modes are a result 
of the different ways in which 
the MC6883 SAM chip can ac- 
cess memory. 

The semigraphics-8 mode is 
similar to the semigraphics-4 



mode. The VDG generates the 
same set o( characters for both 
modes The difference is that 
the semigraphics-8 mode uses 
2048 bytes of screen memory in- 
stead of 512. Imagine a screen 
that is 32 columns wide with 
room for 64 lines ot display, both 
semigraphics-4 characters and 
the standard ASCII set- (It you 
POKE the values 0-255 into 
memory starting at 1024, you 
wiil see the characters under 
discussion.) 

Now take these 64 lines and 
divide each into four strips. The 
first strip from the first line would 
contain the upper quarter of 
each of the 32 characters on 
that line, the second strip would 
contain the next quarter of each 
character on that line, the next 
strip, the third quarter of each 
character on that line, and the 
fourth strip would contain the 
bottom quarter ol each charac- 
ter on that line. Assuming this is 
done with all 64 lines, the top 
quarter of row one would contain 
the top stripe from the first row 
of the imagined 64 row screen. 
The second quarter ot row one 
would contain the second stripe 
from the second row of the 64 
line screen. The third quarter of 
row one would contain the third 
stripe from the third row of the 
64 line screen The fourth quar- 
ter of row one would contain the 
fourth stripe from the fourth row 
of the 64 line screen After the 
first row is filled, the process re- 
peats: The top quarter of the 
second row contains the top 
stripe of the fifth row ot the 64 
line screen, and so on. 

To illustrate the graphics 
available in this mode 1 will fill 
the screen with random colors 
and print semigraphics-8 in the 
center of the screen. 

One fact regarding random 
numbers that Radio Shack does 
not mention in their manuals is 
that when you turn on your com- 
puter and print a random num- 
ber, you wilt repeatedly get the 
same random ?? number every 
time that you turn off the ma- 
chine then repeat the sequence. 
However, if you supply a nega- 
tive number as an argument for 
the RND function, that number 
will reseed the random numtwr 
generator. If you insert the 
statement 1 X = RND ( - TIMER) 



at the beginning of any program 
that uses random numbers, the 
problem is eliminated, (Note: 
TIMER is built into Extended Ba- 
sic. It gives the time in sixtieths 
of a second.) 
Now the program: 



1 X = BND( - TIMER) 

10 POKE SMFFC3, 

20 FOB I = 1024 TO 3071 

30 POKE I, RND (1281* 127 

40 NEXT I 

50 FOB I -. lo 96 STEP 32 

60 POKE 19X . I, ASC C'S") 

70 POKE 1931 * I, ASC r'E") 

60 POKE 1932 * I, ASC CM") 

90 POKE 1933*1. ASC CI"! 

100 POKE 1934 . I, ASC VG') 

1 1Q POKE 1936 • I, ASC ("fl") 

120 POKE 1936 t- I, ASC (-'A'') 

130 POKE 1937 + 1, ASC (■■?■■) 

140 POKE 1938+1. ASC (■■H') 

150 POKE 1939+1. ASC CT") 

160 POKE 1940 + I. ASC I C") 

170 POKE 1941 + I, ASC (■■S") 

180 POKE 1942 + I, ASC C - ") 

190 POKE 1943 + I, ASC I'V) 

200 NEXT I 

210 GO TO 210 



The semigraphics-12 mode is 
similar to the semigraphics-6 ex- 
cept each line consists of six 
stripes instead ot four. This 
mode uses 3072 bytes of screen 
memory. 

The equivalent sample program 
is: 



1 X = RND(-T1MEF^ 

10 POKEiHFFCS. 

20 FOR I = 1024 TO 4095 

30 POKE I. RND (1281 t 127 

40 NEXTl 

50 FOR I = TO 160 STEP 32 

60 POKE 2378 + I. ASC ("S'T 

70 POKE 2379* I. ASC (-E'T 

80 POKE 2380 . I, ASC (''M T 

90 POKE 2361 * I. ASC ('Tl 

100 POKE 2382. I, ASCC'G'T 

110 POKE 2383* I, ASC C'R") 

120 POKE 2384 . I, ASC CA") 

130 POKE 2385 * I, ASC rP") 

140 POKE 2386 + I, ASC fH") 

150 POKE 2387 + I. ASC I T't 

160 POKE 2388 1 1, ASC C'C") 

170 POKE 2389+ I, ASC (-S") 

180 POKE 2390+ I, ASC ("-"I 

190 POKE 2391 + I, ASC ("V) 

200 POKE 2392 + 1, ASC C^'l 

210 NEXT I 

220 GO TO 220 



The semigraphics-24 mode ts 
similar to the two preceding 
modes except each line con- 
sists of twelve stripes. This 
mode uses 6144 bytes of screen 
memory. The equivalent sample 
program is: 



1 X = RND (-TIMER) 
10 POKE4HFFC3,0 
20 POKE iHFFCSO 
30 FOR 1 = 1024 to 7167 
40 POKE), RND (128) + 127 
50 NEXTl 
60 FOR 1 = lo 352 STEP 32 
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New software system turns your TRS-80* 
computer into a complete office memager. 



Windham Software's Medical and Denial 
Oftice Systems economically manage 
flnancial and diagnostic oflice functions. 

H you're a physician or a dentist in a group of up to ten 
practitioners, you probably feel like you're spending 
more and more time on things other than raring for vour 
patients— like bookkeeping, insurance forms, billing, 
collections, record-keeping. 

If you consider computerization as a good solution, 
you're on the right track. We at U indham Software have 
your answer. We've developed two comprehensive soft- 
ware packages -the \I0S-2 for medical ofTices.and tlie 
r)0S-2 for dental ottlces — specifically for groups of up to 
ten practitioners. 

The M()S-2 and nOS-2 from VN indham Software are 
economical packages — priced at $499 — which include 
all the financial lunctions \ou'\e seen in other a\aila hie 
office management systems. But there's more. 

The MOS-2 and nOS-2 can handle up to rxOOO 
patient records — more than any other similar system. I p 
to 500 procedures and 'jOO diagnoses can be stored and 
retrie\ed on the M()S-2. \nd both systems pnnidea lull 
statistiial report on procedures performed. and number 
of patients seen per doctor each month. 

Designed specifically for groups of 
up to ten practitioners. 

Some software systems demand a change in vour way of 
doing business, or radical programming alterations- 
expensive propositions. The Windham M()S-2 and I)()S-2 
were de\ eloped by practitioners working with s\ stems 
specialists. They liave been using the MC)S-2 and l)OS-2 
on the Radio Shack" TKS-80 Model II to manage their 
practices for some time. The team also de\ eloped the 
Nh'dical Office Svsteni being marketed hv Radio Shaek 
torTRS 80Modelsl/lll (Cat. No. 26-1568). Their experi- 
ence and understanding have led to the development of 
a system ready to goto work in yourofilee.as vou now 
operate it. 

The most comprehensive soft^vare 
package for > our TRS-80 Model IL 

The past fi-w years have seen Tuimerous mjcroeompu- 
ters introdiLced to the market. We designed the \10S-2 
and [X)S-2 to operate on the Radio Shack TRS^O Model 
11 microcomputer The Model II is an economical hard- 
ware s>stem. fast. adaptable.and with a particularh high 
capacity. It is readi]\ a\ailablc and ser\iced through 
Radio Shack dealers i-\ cry where. The M()S-2 and l)0S-2 
perform more functions and have greater storage capac- 
ity by far than any other medical or dental software 
package available for this hardware. 



What Windham Software Systems can do 
and ho^v your practice can henefil. 

.^ wide range of financial and managemi-nt functions 
are performed b> the M(JS-2and DOS 2. Rilling, account 
aging. pa\nicnt recording — even insurance forms — are 
all completed automatically by the system. PaltiMil rec- 
ords can be quickh and easil) sorted to pnuide meaning- 
fu! practice profile information, heretofore nearly 
impossible to obtain. 

The MOS-2 and DOS-2 are so simple to operate — a n\ 
or all of your current staff can easilv l)e Iraincii to work 
with a system. No need for computer language — the sys- 
tem commimicates \\ith simple Ijiglish questions and 
answers. Recording errors are virtually eliniinateri with 
the system's verification system. Since many office func- 
tions are now completed aulnniatically. much lime is 
saved which can be devoted to other importatil tasks Iti 
your office, .\utomatic accoutil aging and stat<-rnent 
generation also improves collections. t".ach svstcm is 
priced at $499 — a comprehensive. ell icienl, economical 
ofilce management package that veiy cjuickly pavs 
for itself 

1\irn vour paperwork over to a specialist- the 
MOS-2 Medical Oftlcc System or the l)OS-2 Dental Office 
System. from Windham Soft \\ are. 

HOW to order. 
Orders nia\ be placed hv phoru' or [i\ nuiil. (lall toll- 
free 800-424-4520. Operator 20; or in \^a.shi^lgtorl.D.(:. 
202-822-9090. Operator 20. For further intorniation or a 
brochure. \ on ma> call 205-45(j-5 "i^O.Or fill out the 
attached coupon and mail it todav! 

Windham Software, Inc. 

29/51haiihUISt..\Mllimiiiitu,(;i Uti22U ^3,^ 

Please send me: G MOS-2 Medical Office System 

D nOS-2 Dental Office Svslem 
I enclose: D Check D Money Order for $499. 
Plea.se charge to my: ~! MasterCard D \ IS.\ D American Express 



Acct. No. 
Exp. Date:. 



Inter. Bank No. (for Master Charge) 



(Si^na1ur<>r(ircrcdll<-iird use) 
(Total: $499 cacli.Connerticul rcsidenLs. please add 7Vi% sales tax.) 



IBM and Ilewli-tt-l'ackant mum sysicms available soon. 

'TRS-HO iuiil Hiidic) Sli.irk iUf rcgislered trademarks of Tandy Corp. 

^S«e List ol AOvaetisers on page 4 18 



Cit>/S1ale/7.jp 



I'ype- itrPrai'tuf 

n I'm not ready to order, but please send mc >(iiir brochure. 
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70 POKE 3722 + 1, 
80 POKE 3723 + I. 
90 POKE 3724 * I, 
100 POKE 3725 + 1, 
110 POKE 3726 + I, 
120 POKE 3727 + I, 
130 POKE 3728 + I, 
140 POKE 3729 + I, 
150 POKE 3730 + I, 
160 POKE 3731 + I, 
170 POKE 3732 + I, 
laO POKE 3733+ 1, 
190 POKE 3734 + 1, 
200 POKE 3735 + I. 
210 POKE 3736+1, 
220 NEXTl 
230 GO TO 230 



ASC ("S-T 
ASC ff) 
ASC r'M'-) 
ASC i"\"i 

ASC r'G'T 
ASC {"ft") 
ASC ("A'T 
ASC C'P-T 

ASC ("H") 
ASCCT") 
ASC (-C") 

ASC rs'T 

ASC ("-■■) 
ASC I" 2") 
ASC ("4") 



Level I Modlttcatlons 

If you have a Level I machine, 
your Basic provides you with 
512 bytes of screen memory- 
This is sufficient for only alpha- 
numerics, semigraphics-4, and 
semigraphic5-6. It you want to 



use any of the other modes, 
steal a new screen memory from 
what is ordinarily used for your 
Basic program. 

If yours isa4K Level I system, 
you only have 2343 bytes free 
upon power-up. If you put the 
statement 1 CLEAR 100, 3071, 
into your programs, ycu are lim- 
iting your string space to 100 
bytes. You are also limiting the 
Basic interpreter: It cannot use 
any meriKiry beyond byte 3071, 
leaving 1024 bytes free in high 
memory. This modification al- 
lows you to use thegraphics-lC 
and graphics-IR modes. All 
screen addresses in the sample 
programs would have to be 
translated by 2048 bytes since 
the sample programs assume 



that the screen memory starts at 
1024, You must also signal your 
computer that the new screen 
memory starts at 3072 (the start 
of screen memory must be a 
multiple of 512). Next divide 
3072 by 512 to get six. Convert 6 
to a 7 bit binary number. This re- 
sults in 0000110, You must then 
program the VDG by POKEing 
the addresses 65478 thru 65491, 
the even values for zeros and the 
odd values for ones. In this case, 
you would need the following 
additional statements: 

2 POKE 6547B, 

3 POKE 64581, 

4 POKE 65483, 

5 POKE 65484. 

6 POKE 65486, 

7 POKE 65468, 

8 POKE 65490. 



Similarly, it you have a 16K Level 

I machine, you can croato a 6144 
byte screen memory by adding 
the following statements: 

1 CLEAR 200, 10239 

2 POKE 65478, 

3 POKE 65460, 

4 POKE 65483, 

5 POKE 65484, 

6 POKE 65487, 

7 POKE 65488, 

8 POKE 65490, 



You must then also translate all 
references to screen memory by 
9116 bytes. 

Regardless of the size ot your 
memory, you must also convert 
all hexadecimal numbers to dec- 
imal. For example, you must 
convert 10 POKE &HFF22, iH17 
to 10 POKE 65314, 23,H 



HACKJACK KATIIIS 

A YEARS INCOME IN 4 MONTHS, 

•o*k Sttstsyy Tuieii l<K itt* rqvic* 4 •ipw allli* 
Um ou> Tutwi I qutcKIr l*ern ho* <o b*<arTM A WINNER 
Earn 140 ham Lsoin Itx ••cati ot our •!»<•» Ow IuMki 
wiM itoch rou ho* to 

*■ HT VOUtMOMV* 

■■ PtAV lACH HAND " 

'■ NOT on tAMK) " 

■■M AMIUMU" 

"■• HWAM •••• 

Our Tulort or* rtol BlimotM I Thai O'S tariewt fOO't <0 
maka wmnari out of yov Tho ovihor* hov« «p«nf T irOOri 
ploying ft bamg nHinr^ort No* to eon you wtrh rtsa o+d 
<>< ov> Tu'ort Our Tutor! ora batad on >h« iica'a^tat 
daraiopad by Looranta Ravora Mora odvorKad (KotaffM 
or a oval labia cotl lor -nfo ContuHotion !■ avaOabIa 
lo' you by mail or phona from l]p<n >lam MSI 



rXG ) conla>ni 10 toti< Iwlori tor AHanrit City, ot 

Ruih !» for IbK Mod I or Mod III fa*. »30 tor 3M dxk 

Plaoia odd 11 OD lor thi[>ping 

^206 
MICRO HAJAK SYSTEMS INC. 
3MW NORTH ELLEN STREET 
FLAGSTAFF, ARIZONA UOOl 
(M3) r74-S73] or (Ma) r74-7S«l 



\ferbatim 

flexible disks 

Call Free (800) 235-4137 for 

prices and Information Dealer 
inquiries invited. C.O,D, and 
charge cards accepted. 




VTSA- 



PACIFIC 
EXCHANGES 

100 Foolhill Blvd 
San Luis Obispo, CA 
93401 InCal. call 
(ROO) 592-5935 ot 
(805t 543-1037 

^370 




EDUCATIONAL 
SOFTWARE 

For TRS 80* Color CompuKi, PtI. Apple II 
ELEMENTARY 
SCIENCE 
GEOGRAPHY 
ECONOMICS 
FOREIGN LANG. 
GRAMMAR 




MATH 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
f ARM RECORDS 
COIN INVENTORY 



Wnte for ^REE C <i t .i I oRut : 

MICRO LIARNINCWARE ^b9 

BOX 21 }4. N, MANKATO MN SfrOOl 
so; 62S 220S 



9i VISA «. MASTER CHARGE ACCIPTID 

Mcp«y I ^"o 'Oy^i'y ro' Itlutalion*! 

fro!|i*'r^'iM'«' *-'h ^J^ 

App*« •« « trademark ot Appl« Computer Co 



TIVM h a raslwarad l>*^a 



r«1 b ' Ira 



. of • 



I ol TANDT CO«r 



BIG CP/M* 

programs 

on TRS-80* 

MODELS 1 &3 



Pluggable Board ir^o soideririgi with 48/64K 
Operating System S'O Density S'^' on MotJ 3 
pljs 8" on Mod ' Memorv e»Danded by 
overlaying ROM wiin RAM Date/ClOCKw'balterv 

48K CP/M* (minimum tysKml t199 

e4K CP'M- M«mor> Acloch M90 

4BK CP/M* (It's expandable) S340 

C.O.O. Visa or Mastercharg* 



F.E.C- Ltd. 



PO Box 2368 Woburn, Ua 01888 0668 
(617) 944-5329 



^141 



'Tartdy Corp 
"Digital Hasaarch 



CampuCauEn 

COVER YOUR INVESTMENT 



- e«.:>K s*sja«'>* 




I cno* cowvtiA 



'■^ {>«i CMm ■>-* bt *A^ 



Ow 200 covffA. mri'.9 tot compftta fist 



UiH I*K> V «*i>*« •■■»■ ■ 



IWuCma 



QE4llHlH0Ul>i(iMViTED 



BUSINESS & 
PLEASURE SOFTWARE 

FOR TRS-8tf"^0D. I & III 



INCOME TAX ESTIMATES 8K 
No tables to look up. Pro- 
gram does It all. 



MAIL LIST (disk) 32K 

INCOME DEDUCTIONS A 
MILEAGE FILE SK 

STOCK CHARTING 8K 

RNANCIAL STATEMENT 16K 



$19.95 
22.95 

10.95 
15.95 
14.95 



?^ 



■THE WIZARD'S CfTY" 



*^ 



A Fantasy Adventure Game 12.95 
Add S4 for disk except Mall List 
Add $1.50 shipping 

BAP$ Software 

6221 Richmond.Suite 220 
Houston.TX 77057 713/783-3433 

TRS- 80 'S ii "<i trademark ot Tandy Corp 
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\jy If You've Written a 

\^^ Topnotch Program- 

We'd Like to Publish It! 
Programs needed for BUSINESS/ 
OFFICE Applications: 
WORD PROCESSING 
PAYROLL/TAX CALCULATION 
GENERAL LEDGER/ AR-AP 
ORDER ENTRY/INVENTORY 
Start collecting your royalty 
checks soonl Write for our free 
Programmer's Kit today. 
INSTANT SOFTWARE. INC. 
Submissions Dept. 
Peterborough. NH 03458 



JOE COMPUTER PRESENTJ WOBO GHINDER 

80,000 

WORDS! 



WORD GRINDER IS A DATA BASE OF OVER 
80,000 ENGLISH WORDS IN ALPHABETICAL 
ORDER WITH SPACES DELIMITING EACH 
WORD THE TRS-80t AND APPLE VERSIONS 
INCLUDE A BASIC EDITOR FOR DISPLAYING 
OR EDITING THE DATA FILES USING RAN 
DOM ACCESS WORD GRINDER IS AVAII 
ABLE FOR TRS-80 MODEL I II. OR III APPLF 
CPIM. RT-1 1/HT-l t OR ANSI TAPES PRODUC- 
ED ON A PDP-I I PRICES START AT S89 9b 
FOR MODEL I. Ill OR APPLE S I 24,95 FOR 
MODEL II, CP'M. RT-1 I OR ANSI TAPES 
MAKL CHLCKS f'AVAB:,E TO 
JOE COMPUTER - PMONL ORDERS AND 
INFOBV*.ION (/'IJI W,;-OSI'i SEND TO 
JOF COMPUTfR 2?n^ VENTURA BLVD 
SuiTF F ^OODl AND HILLS CA 91)64 

t^ 193 
LALIF KES/DtNIS ADD &1ALES TAX 
t TRS-80 IS A TRADEMARK OF TANDY CORP 



FLOPPY DISK DRIVES 

^275 

Famous make 40 Track drives, in grey 
texlured enclosure with power supply. 
Fully tested and guaranteed. 

ADD S20 FOR "FLIPPY." 

80 TRACK "FLIPPY" $395 

40/40 DOUBLE SIDED $395 

EPSON PRINTERS SCALL 

C. ITOH PRINTERS SCALL 

CORSAIR COMPUTER CORP. 
7952 Highway 80 West 
Fort Worth, TX 76116 
817-244-8051 ^^ 



Is your 
micro your 
terminal too? 

Then you already know Its hard to 
find a single source of information 
about microcomputer telecommuni- 
cations. The hardware, the software 
And what makes ir tick. 

That's what the On-Line Computer 
Telephone Directory is all about! 
News, reviews, and mere than 200 
listingsof free-access microcomputer 
bulletin boards throughout North 
America. 

Subscribe today. I year $005: 2 
years, SlS 05 Get the most out of 
your microcomputer with The On- 
line Computer lelephone Directory 
(a quarterly publication I, ^^^ 

The On-Line Computer 

Telephone Directory 

PO. Box 10005 

Kansas City. MO 64111 

816-756-1847 




Check 

our book pages 

for 

the 

latest books 

about 

microcomputers, 




'''4, 



{ 



COMPACT 232-\S 
INTERCONNECT SET 

• Easy, full configuration of line lignals 

• All 25 lignals paaied to headers 

■ Designed for wire-wrap or jumpers 

• Additional header tor break- in round cable 

• Made lor permanent installation 

LOW COST -on/y $35.00 

JIS - Jumper Set 6,50 

SYZYGY'' ^286 

'the interlace people" 

256 W. San Bernardino Rd. 

Covina. CA 91723 • (213)332-3320 



more . . . 

SPECTACULAR 
OFFERS 



^ BASF lyy WABASH 
MAXELL I OPUS 

We stock the complete line of BASF diskettes, 
reei-io-reei tapes, mag cards, disk packs and 
cartridges. We also carry MAXELL, OPUS and 
WABASH products. All are 100% cert'fled and 
fully guaranteed. 

Box of 10 diskettes: 5%" 8' 

OPUSss/sd $20 $21 

BASF ss/sd 23 24 

WABASH ssfsd 23 24 

I^^AXELL . TOO LOW TO QUOTE CALL 
5'.^ '-10 seclof-ro* availahle 
Sectoring must be specified 

5 "('ore" Vinyl Storage Pages 10/tS 

LIBRARY CASES tSf 

8 Kas-se1te/10 $2.9S 1T^9m 

5''« ' Mini Kas-seltenO . $2.49 \P^^ 



HARDHOLE DISK PROTECTORS 
Reinforcing rings 01 lougli mylar 
protect disk hole edge from 
damaae. 

Applicators $3 

Hardhole RmgsfM) .... S6 



DISK DRIVE HEAD 
CLEANING KITS 

Prevent head crashes and 
ensure error-free operation. 

S"4-or8' $19.50 



SFDC- 10 CASSETTES .... in't7 

lAii cassettes include box ana labels ) 



Gel 8 cassettes. C-10 
Some, and CasselieJS 

Library-Album, as illusirated. 
for only . $fl 




SNAP-IT POWER CENTER 

Turns 1 outlet into 6 Wall 
mount Of portable. Circuit 
breaker, lighted switch and 
UL approved. 
4'x3"«2" 



X'^ 



^ 



We also olter printer ribbons, pnnlwbeeis, 
type elemenls, equipment covers, power con- 
soles, paper supplies, storage and filing equip- 
ment, furniture and many other accessories 
tor word and dale processing systems Write 
for our free catalog. 



^See Usi of AOvtrtisers on page 4 f fi 



VISA • MASTERCHARGE • MONEY 

ORDERS • CERTIFIED CHECK • FOR 

PERSONAL CHECKS ALLOW TWO WEEKS 

• CO D REQUIRES A 10% DEPOSIT • CAL 

RES ADD 6% SALES TAX • MIN $2 

SHIPPING & HANDLING • MINIMUM 

ORDER $10 • SATISFACTION GUARANTEED 

OR FULL REFUND 



PRODUCTS 

8868CLAIBEMONT MESA BLVD 
SAN DIEGO. CALIFORNIA 92123 

Toll Free 800-854-1555 Order Only 
For Inlotmallon or Cililornii Order* 

(714) 268-3537 
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TUTORIAL 



The end of the line for computer simulations. 



Queue Theory 



Alan Neibauer 
11138 Hendrix Street 
Philadelphia. PA 19116 



Whenever I'm asked to 
defend my computer, I 
forget about games and adven- 
tures, household budget pro- 
grams and its lightning calcula- 
tions. I forget about the simple 
business applications, those 
that can replace a roomful of 
bookkeepers or file cabinets. 

My computer, I tell critics, 
Simulates real life and solves 
real problems. In fact, it is only 
through the simulation of hu- 
man activities that you can 
iudge the full value of a comput- 
er. My TRS-80 can look into the 
future, project probabilities of 
success or failure, and return 
with an answer in seconds. 

In computer time, a program- 
mer can represent years of 
human life and activity in just 



minutes. Almost any activity 
that invotves repetitive steps or 
mathematical probabilities can 
be duplicated by the machine. 

The Key to simulation is mea- 
suring time. Examine the loop 
structure in the following: 

10FORX = 1 to 500 NEXTX 

Each loop takes only 1/500th of 
a second. If each loop repre- 
sents just one minute of real 
time, we can sln^ulate over eight 
hours of human life in each sec- 
ond of computer time. 

Quaue Thvory 

Of course, the accuracy of 
any simulation depends on the 
efficiency of the program itself 
and the programmer's ability to 
find the proper method of repre- 
senting the activity in computer 
language. 

One such method of analyz- 
ing human activity includes 
queue theory. A queue is simply 
a line— a serial movement of 



people, events or data through 
time. Since time is a measurable 
quantity, any activity that in- 
volves a queue Is a prime candi- 
date for simulation. 

One of the best examples of 
using queue theory to simulate 
and solve a real problem ap- 
plies to cars backing up at a 
local gas station. 

At what point does it pay to 
hire that extra person or to open 
up that extra line? How can the 
business executive measure op- 
timal customer service, lower 
the average waiting time for ser- 
vice and employ the fewest at- 
tendants? 

By using a queue analysis, a 
programmer can focus his or her 
efforts on an easy-to-con trol, 
easy-to-visualize business day. 
If you plan wisely, you can simu- 
late a great number of variables 
in a short period of time. 

For Instance, this simple 
simulation tells the gas station 
owner the number of cars his 
station can handle in a day, the 



actual time spent working on 
customers' cars, how many cars 
might pull away from the station 
should the lines become too 
long and what effect more than 
one attendant would have. 

The gasoline line is a simple 
queue. One attendant working 
one line is a single queue. Sev- 
eral attendants serving several 
lines are parallel queues. 

This simulation allows the 
station owner to "observe" 
various combinations of time, 
attendants and probabilities. It 
allows the operator to select the 
number of workers on duty, the 
probability of cars pulling in for 
service every minute, the maxi- 
mum number of cars in the 
queue and the length of time for 
which the station is observed. 

You can divide the program 
into distinct sections. Lines 10 
to 57 Initialize some variables 
and give the user his instruc- 
tions. It is here that you can 
customize the queue for a par- 
ticular application or business. 
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Mlirt OUft ►*C»ei.i.iU'4«L CJUHI.JTV PLnNi. 
>ri; OET PUL;.v 0£rRiLEr> «ND DOCUMENlfcL' 

i.'.-t: H>f- ^'wt^Lfc .F TQ le '. t."" 



[*IVE HC'TUK'i. Hn:- SC'FTMHPt WN PS LiSEI' 

TftBCKlNC. C^VlCEi 
Mt'IION CCWTROL 

jincLE OUI ' -■ >IMTEMENTS CONTPtJ^ ■■_ ■ 

«<' I=. i*tl FC* iet Ul- IB PROUt^HMi WHItt 
I'*.liX>e? fLOTftMG Of SrrtMI^eftf' tjS''*";. 
M«i rPEfliiNti HUHBERS OP !>''.€<= PPOCiPftM 

TO Gtr YOURS, 
SEND CHECK OR MONf V ORDER TO 
P.M.W. 

7741 ALAeAUA AVE HB 
CANOGAPAHK CA 91304 

We ship kam« day on money orders, 

4-6 weeks lor checks 

no COD s oi charge cards 

*TRS'SO is a itademsfk ot the Radio Shack Olv. o< 

Tandy Corp 

"Foreign residents add SI. 50 poslaqe and handling 
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BUSINESS USERS! 

SAVE TIME & MONEY BY 

CONTROLLING YOUR LONG 

DISTANCE TELEPHONE COSTS 



r* LIWJTEI! 1V..3.rBl!9EK T> i.S5BrE» 



80 SPACE RAIDERS 
Starship Simulator 
and Combat Came 

This Is Ihe mosl realistic combat space simulation 
available (or any corii[)uter system anywhere' 
Operator is placeo T a rapldty rnovira sfiip lookmjj 
out tfifough a window ir>to the depths of space 
Thousands of stars appear m the Oisiance and pafl 
toward the screen edges as the ship (lashes past 
Forward arid at) views available at any time Ac 
curate celestial navigation usmg both XYZ and 
spherical Coordinatesi Comment (rom Aug '81 BO 
Microcomputing "May bo Ihe ultimate Star T»ek 
type game and, possibly . Itie most complei micro 
computer game ever allempled' ' Fast action 
graphics never stop' 

•"lUilimateiy Realistic'!" 

S24 9S (MasterCard, VISA, check, elc.) 
includes snippir^B COD OK 

Model f Level 2 16K 

Bosen Electronics 

445 E. 800 N. 

Spanish Fork, UT 84660 

(801)-798-9553 



LONG DISTANCE ANALYZER will 

• Sol your t^iiiec] calls 

• Idenlifv each party called ((rem your known 
list) or print locations of unrecogniied 
numbers 

• Total the cost o( calls to each numDef. to all 
numbers, and to all unrecognired numbers 

• Analyze calls arxJ tolls by area code state 
and WATS tone 

• Pnnt an alphabetcal directory ot recognized 
numbers 

• Save verification time 

• Create cost-co^sclOusr^ess 

• Facilitate cost accouniing and client biiung 

• Isolate personal calls and billing errors 

• Reveal inefficient use patterns 

• Help you perform WATS feasibility studies 

Heqijires f^odei I. II. or III TRS-eO* Level H, 16K, 
and 1 disk Prtnler IS opl'onai No connection to 
pborw system 



Model 



C«Mtt» : THSDOS* dltk 



Mk. 



Ill 



Jilk 
$95 



.il3§. 



SI 55 



$135 



Brochure on request 

Send model number and check or money order to 

^281 

TRS-aO aiiu ;HbDOS 
are trademark ^ 

Sarasota. Florida 33576 jt Tandy Co-poraticn 



Golden Braid Software 
RO, Box 2934 ^?si 





call (617)934-0445 
for faster delivery 



GRAPHIC 

SOFTWARE 

FOR MICRO'S 



GrSphIC Software for Micro's - Tnis$«lf-teach>nggu>dewilIshowyouhowIO 
write your own 2D and 3D graphics software Contains 61 programs 'or elementary to 
advanced graphics operaiions ■ translation rotation, scaling, ciipDmg stretching hidden 
line removal, shading, perspective, intersections, amiYiaiion and mor^ Also includes 
practice problems 'or class'oam use Program listings m BASiC ftiiiy e.piamed and 
presents alongside theory Perfect for students, professionals & software developers 

One of r')e most outstanding books on computer software - Aian Grund Universnv of 
Illinois Urbara 

A magniticem Doo* a ma/or coninbulior lo trie eoucalional literature to^ computers 
Philip Becker Christian Brothers College Memphis 
Booh with tlittrtgi-Si995 Dl*li-S<egs* 

Engineering Applications of Micro's - a collection of lechn.Ques and 

programs lo' applying micros and compute' graphics lo engineering - slruclufal 
mechanics, kiriemalics. heat ttansler. systems analysis. Fourier ariaiysis optimiialion. 
CAD CAM. and more Theory with listings in BASIC tuHydocumenteo Book vrith listing t- 
S28 50 Dlik-$19 95* 

Structural Analysis on Micro's - Theory and program nslingsn BASIC for 
rr.atr ■ s:ruc:urai a'la y&is o< 'igic ira-ties Graphical outpol snows displaced 
configuralion Member loads detcmirec Use software as is or modify for your special 
applications Book wllh l(illnga-S39 95 tXtk-iZiSb* 



Add S2 oer i 



am itiippiig.laUPSi'- US S3 50 OritQa 
rop« S C^nni ftm»ncii llfl eu*.mere 



^Disks contain all programs listed m me Ijooks in BASIC 
They are available for the Apple II PljsdSK DOS3 3 and the 
TRS-aO 32K Color Computer A tape for Ihe Color 
Cornputer is also available 



^ 25C 



KERN PUBLICATIONS •190 Duck Hill Rd • PO BOX 1029M • Duxbury, MA 02332 



■'See List ol Advetiisers on page d tB 
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Lines 140 to 320 generate the 
cars needing service, place the 
first cars at the pumps, and 
determine if any must be placed 
in the line or taken from it when 
cars pull out. 

Lines 400 to 555 print the 
report of the queue's activity. 

Lines 1000 to 1160 are the 
"Put" subroutine that places 
cars in a queue. Lines 2000 to 
2510 are the "Take" subroutine 
which withdraws cars from the 
queue. 

Lines 3000 to 3510 perform 
some bookkeeping service 
needed when more than one at- 
tendant is on duty. 

When the gas station opens 
for business, the attendant has 
to wait until the first car pulls in 
for service. If another car pulls in 
when car number one is being 
serviced, it either begins a line 
behind the first car or pulls over 
to another attendant. When all 
the pumps are busy, incoming 
cars are placed in line and re- 
main there until one of the cars 
being serviced has pulled away. 
This procedure continues until 
the gas station closes for busi- 
ness or. as in this program, the 
pre-determined number of min- 
utes elapses. 

In constructing a simulation 
of this type, the programmer 
must represent each section In 
computer language. Since the 
program operator can select 
any number of attendants, I 
used the WAIT (A) array to repre- 
sent the car tieing serviced with 
the subscript A being the atten- 
dant's number. The value of the 
array is the length of time the 
car needs service. 

If only one attendant is on 
duty, the subscript A would 
always be the value one, while 
the value of the WAIT (1) array 



would be some time from two to 
six minutes, an average time 
suggested by a mechanic friend 
of mine. 

Since the line itself holds a 
number of elements (cars), I se- 
lected another array, Q, to repre- 
sent the cars waiting in line. As 
the program adds a car to the 
tail of the line, it increments CHT) 
until it reaches the maximum 
number of cars. At this time a 
full flag is set. Further cars are 
frustrated by the long waiting 
lines. 

When cars are taken from the 
queue, the program removes 
them from Q(H). the head of the 
tine. This is also incremented. 
When Q(H) and QfTl are the 
same, the empty flag is set and 
makes no attempt to withdraw 
another car from the line. 

While all this takes place the 
program increments its counter, 
which represents the passage 
of time. As time passes, the pro- 
gram checks to determine if a 
car's service time is now com- 
plete, and so draws a new car 
from the line or generates an ad- 
ditional car in the queue. 

Once I had represented each 
of the major elements in the 
simulation, I needed to create 
statistical probabilities and a 
bookkeeping system. In this 
case, I designed the program so 
the operator inputs the prob- 
ability with which cars approach 
the station each minute. 

Finally, I created a report seg- 
met that takes program data 
and prints it in some usable 
form. 
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Timing Loops 

In this simulation, the loop 
established in line 140 repre- 
sents the passage of time. 
Within each of these are delay 
loops (lines 145 and 175) that 
keep the queue on the screen 
long enough to observe. Line 
170 prints this display with addi- 
tional information being gen- 
erated and displayed by other 
sections of the program. 

Lines 180 and 190 generate 
the cars. Let's assume the op- 
erator wants a 10 percent prob- 
ability that each minute a car 
pulls in for service. The program 
generates a random number 
from 1 to 100. If that number 
falls between 1 and 90, the pro- 
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To mcrease the speed of the pro- 
gram, delete the (ollowing delay 
loops, display commands and 
Pul-Take commenls: 
US 
170 
175 
1120 
2501 

Delete print command in line 222 
The program will run through the 
desired "lime period" and prinl 
the results on Ihe screen. 

Table 1. Speed Increments 



gram acts as if no car has pulled 
in. That is, the program decre- 
ments the wait time and loops 
back to the start. 

However, in 10 percent of the 
cases(from randomly generated 
numbers 91 to 100), the program 
acts as if a car has pulled in. 
Line 210 assigns a service time 
to the car from two to six min- 
utes. (The C = C -I- 1 is simply a 
counter.) 

From here you will notice sev- 
eral loops: 

For X = 1 to A 
1FWA!T(X), ,, 

These loops examine the con- 
dition of the pumps to see if they 
are busy (<>0) or empty ( = 0) 
and can either send the car arriv- 
ing to the Put subroutine or with- 
draw a car from the line in the 
Take subroutine. 

Let's follow a car pulling into 
the station. The car is assigned 
a service time. Since the pro- 
gram has just started, line 222 
finds that WAIT{1) equals and 
assigns WAIT(1) the value of the 
service time, say five minutes. 

The program prints a report 
on the screen and performs 
some counting functions. It 



then "decides ' if there are more 
attendants. It there are, it jumps 
to line 3000 which decrements 
the service time and loops 
around for the second minute of 
the counter. 

If only one attendant is on 
duty, the program loops back to 
find another car. With arrival of 
the second car, WAIT(1) is not 
so the program jumps to the Put 
subroutine and places the newly 
arrived car in line. Its service 
time becomes Q(1), the tail of 
the line increments to position 2 
and a flag is set stating that the 
line is not empty (E = 0). 

From there, the service time 
of each car is reduced by one 
minute, and if any lines are now 
empty the program either takes 
a car from the line (GOTO 2000) 
or loops around to generate a 
new car. 

Back at line 222, if all the at- 
tendants are busy, the program 
simply places the car in line and 
continues from that point. 

Subroutlnts 

The Put subroutine (line 1000) 
places cars in line (the array) 
and takes care of the program's 
bookkeeping. Line 1010 exam- 



Vaiiabie 


Relerertce Lines 


A 


54 220 222 260 280 3000 3020 


C 


200 420 620 530 


E 


30 281 1070 2010 2080 


F 


1010 1100 2050 


G 


222 440 550 2040 


M 


30 1100 2060 2070 2080 


J 


3020 3030 3040 3050 


K 


470 500 


L 


470 500 520 530 540 


M 


140 320 


MAX 


55 170 460 1030 1090 2070 


Ml 


56 140 


N 


175 180 190 


P 


170 


PER 


57 190 


0(A) 


55 170 460 470 1020 1040 1060 2020 2030 


R 


222 430 520 530 540 550 2040 


T 


30 1060 1090 1 100 20BO 


TAKE 


283 2020 2040 2501 


TIME 


210 222 10201120 


TK 


540 1040 1060 


WAIT(A1 


54 222 262 264 282 2B3 1060 3010 3030 3040 


X 


145 220 224 260 266 280 284 460 390 


XI 


10301050 


Y 


3000 3500 


260 


190 


2B4 


282 


320 


222 261 3060 3510 


490 


460 


540 


520 


1000 


250 


1160 


1010 


2000 


262 


2510 


2010 


3000 


222 


3500 


3010 


Table 2. Variable Cross Reference 



ines the full flag. If the line is full 
(FOO), the program skips 
around the subroutine and the 
car pulls away, frustrated by the 
long lines. If the line is not full, 
however, line 1020 places the 
value of its time into the tail 
position of the Q array, Q{T). 

For the first car in queue, the 
tail position is one. This is incre- 
mented as each car joins the 
queue. 

Lines 1030 to 1060 compile a 
total of waiting time, reported 
back at the end of the program. 
Waiting time for each car is the 
total of the service time needed 
by all cars in queue ahead of it, 
plus whatever time remains for 
the car currently being serviced. 

Line 1070 sets the empty flag 
at false. The next three lines in- 
crement the tail of the line and 
determine if the final position in 
line has been reached. 

Say that a car has just taken 
the last position in queue. Thus, 
T is greater than MAX. In this 
case, the line rotates. The pro- 
gram increments the tail around 
to the first position. 

We compare the new tail posi- 
tion with the head position. If 
they are the same, the line is full 
and the full flag is set. Line 1120 
reports the action. This is dis- 
played next to the queue posi- 
tions and values at the top of the 
screen. 

The Take subroutine works in 
the same manner. It checks the 
empty flag in line 2010 and if a 
car is in line it assigns its service 



time to the variable TAKE. Line 
2030 now clears that position. 

Lines 2060 to 2080 increment 
the head of the line and test to 
see if the head must wrap 
around to the first position or if 
the line is now empty. 

Finally, a report of the action 
is printed and the program re- 
turns to line 283 where TAKE is 
placed in the WAIT array, and 
the simulation continues. 

Expanding Time 

If you run this program as 
written, 100 minutes of real time 
is represented by about three 
minutes of computer time. De- 
lay loops require much of this 
time to print the line activity to 
the screen. If you let the comput- 
er try various combinations and 
print the results, you can greatly 
reduce the time the program re- 
quires. 

With the changes cited In 
Table 1, the number of working 
minutes of service time can be 
extended to cover days or even 
weeks. For busy stations, the 
timing loops can represent 
periods shorter than one 
minute; you can decrement ser- 
vice time in tenths or halves of 
minutes. 

For stations that want to ex- 
amine multiple lines, you can 
convert the WAIT and Q arrays 
into a two-dimensional array 
representing several parallel 
queues. 

While there are other meth- 
ods of writing computer enact- 



VirlabI* 


Comment 


A 


Number o( ■llvndania 


C 


Counter tor can B>n*ral#4 


E 


Ur>a-ampty (lag 


F 


Line-full (lag 


G 


Total- o(-Hrvlca lima 


H 


Haad-o(-lln« pointer 


J 


Loop counter 


K 


Time left In line counter 


L 


Number o< cars l«H In line counter 


M 


Loop (or minutes of program 


MAX 


Maximum numtier o( cara In the lino 


Ml 


Length o( program lime 


N 


Counter, random generator 


P 


Loop counter 


PER 


Percentage probability ol cars pulling in each mlitute 


CHA) 


Arrey (or the line Itaetf 


R 


Number-of -cars -serviced counter 


T 


Tall-of-iine pointer 


TAKE 


Withdraws value from Take subroutine 


TIME 


Time of service placed In wait array 


TK 


Total-waiting- time counter 


WA(T(A) 


Attendant's array of car receiving service 


X.X1,Y 


Loop counters 




Table 3. Variable Identifier 



COLOR COMPUTER SOFTWARE 



EDITOR ASSEMBLER 
DEBUGGER 



«6 



95 



CCEAD: This 8K Baste Program supports cassette I es has 'ull cursot cor- 
iro line hserl on ■ dPleiicn anc r'jcn more Two pass assemble' supports tuH 
6809 ihslruclion sel & aodress'ng -nodes, lisis to screen o' p'lhler DePuggf 
a'lows memory examine' modily. prograin execution At Ifiis price otteieo on 
an "as-is" bass, however we've used this extensively in house and believe 
yob'll be deligtited It nol return w^thirt 2 weeks lot a fui' refund You get fully 
commented Basic source & complete instructions Requires f_xl Basic & 
16K CASSFTTF $6 95 

DELUXE TERMINAL PROGRAM 

COLORCOM/E: This terminal program has evcrylh ng' PLUS it s n a con 
venient plug-in ca'Ir'dge LOOK at these 'ealu'es 



• ONLINL ana otllme scrolling 

• Selectable baud rale & parity 

• Full or halt duplex 

• Write to printer or cassette 

• Supports ANY serial printer 



• Automatic or manua capture 

• Selectable Capture characters 

• Lxchange Basic p'ograms 

• Woru mode means no spl \ words 

• And much, much n'.ure 



Use wilhCompuserve TheSource. etc Talk to otner Color Computers Works 
with any model Color Computer & full duplex RS232 modem 
CARTRIDGF S'19 95 

SECURITY: PrivaleLine tu'ns the color Computer into a secure corriinuni- 
calions terminal Acvanced encryption algorithm has b.llions o' combina- 
t'Ons lalk to any similarly equipped Color Computer in aPsolule security 
Requires tuH ouplex mooem CAR 1 HIDGF $99 00 

CUSTOM CARTRIDGES: Put YOUR Basic program nto a convenenl 
ROM Cartridge It's easy' Runs mstanlly at power-up 'rees up memory Use 
tor AD displays, schools, etc Call or write tor mfo FROM $^11 65 



PC Box 10234 
Austin. Texas 78766 
(5t21 837-4665 



Send c'leck money orfler or Visa MC Nunibo' 
trciutJe S1 'or poslagp anrJ handimg Visa Uf, fhnrp mr 'ssl sfriirr 




StatPacB IF YOUR TIME IS MONEY 




ANDYOU NEED DETAILED STATISTICAL 
ANALYSIS . . . 



then you need StatPac 

Because with SlatPac you won t need to sil at the com- 
puter for hours typing in each task StatPac is uniquely 
designed to perform batch processmg: You can specify 
several hundred tasks to be processed in a batch, then 
leave the computer alone to do the work. 

Your valuable time is free lo do other work. 

StatPac IS available tor Model I (requires NEWDOSi or 
r^odel III, 2 disk drives. -ISK PAM and a linepnntet Also 
available for other operating systems 

SlatPac handles all phases of research ana lysis mcludmq 
frequency analysis, descriptive statistics, crosstabs S chi- 
square. t-lest. correlation & linear regression, analys/s of 
variance, multiple linear regression and management 
reports. 

Buy the complete 3-disk package for $285 The extensive 
user's manual is included or may be purchased separately 
for $30 (the cost of the manual may be applied to the cost of 
the disks at a later date). MasterCard and VISA accepted 
Entire package includes over 30 integrated programs 

For more information and a free 16 page brochure write 
or call: 



612/866-9022 

Walonick Associates ^363 
5624 Girard Ave. So. 
Minneapolis, MN 55419 



^ S»« i./sf of Aitvmnisers on pag« 418 
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s(.)hT\\ ARt FOR \ Ot R I6K TRS^> COU^R 
MODLL 1. ill. Al ARI -KV 800, AlTLt II 



the 

programmers 
program 






Do \nM kmm ml\ ihr mntnin^ 
*i^^ ri( ijuna B«"f mm- 
mind(? Thr %ttii ai rhr Pt" 

ft mnntht drMpiing ■ *tT nf 
|m*ram* ripl. 
[Thr 



ihing r 
much I 



Anitak nmit And 



Thr Pr<»armnimrT % Prrt(Ef»m 
li^adr vcHi sirj] h\ \trj] ihrtiufh 
lh<- FtindamrnlaU <rf proEr*n>- 
minK vniir nniijmrFr Thrn m>i 
nplcirf ihr linrr points 
mulhple liHJ^Js. [jurur^. (Nrk\, 
ilamf im>tfTimmmK. \t)i1\. 

m(-m»rs u%rT« All rhAc 
mrthcid^ make mhit prnKram 
mine \tsk\ rm\trT vnd morr 
rfiicrml 

DiffKiill i«nd^rr^ iivfuTi 
pri*ffTam\ jrr ^nU brinrr vo^r 
^p^^ i'\r* and ri«JennJ «* \*Mi 
^jrn 4I vcmr uitn tpf^^ Thr 
Pro|[rBmnirr'i PrD|[rBm n ■ 
miBf for rvvn owner of « 
mkrocomfiirtrr 4f40l 



On cuwftr cw dukHtrV our mnnaiiTWi Art 
designed npiicifK for %oiir nimpiilpr incJudrd 
r\n\ riHinth irr fi- 10 rFad\ ii> Uud prunraiiK 
rmi^iTiK (rnm lairKi. bomr rnlrrtAinnirnl. and 
prrvHitl \trttnrv. to nMirr n( rair iinuiur- 
'^(rachintf" proKTims W> will iIhi krrp ^ciu 

piiblicatinni cnmpAliMr wilh MKir 
m K romcr ptitri 

Our Dm-mbr. ,«iM- mil include 

I CHECKEBSfl 

2. AlKrhri Trsl 

3 CtjfKTnlralHin CUrd Cimr wilh (riphlcs 

4 Cnmputrrtud TrJrphonr IJIr«'lcir\' 

5 ChrKtmA.« droJi pf^vftt h\ \init L-ompiirrTr 
fi TrM v™ir Trmi kr>nv.ln)Kr 

7 T»n mnrr lA rxir ^pvciil "Trachxng" pToj[ram^! 

H and u il^iM >ou gri inir 1U0-. commttmrnl 

li' ricT-tirntr Hnd vrMn- frtanj rhe 
PinKranimrii IihiHiiIf iHacd luun irr aiiailihlr! 
Lain luiiei «tI] includr backicamnxin. hotnr 
budffrt. ftirrratlini^. ^tuck markrt. and man\ 
ETtDrr Ttw pncT prr ^ubHrriptmn In TRC, AP- 
PI.ETBEK or MACATARI n IVl ,>f-r ^ri. 130 
prr ^ 1 ^rar, and 1 10 for a rnaJ ivMK- 
Don^t Hiia iHtl on our Dvcrnibrr wuv- 



If Mill iiidtT niiv. . \c)ii nill iHi-iir ciiir minjilele hiimr aomuntinn sulvni (Bpe •Stl.'fSl 
ABSOLL'TELV KHfcE with am J.W (Al (irifir Piirctiasi- Ix.lh almvr paikaK" anH v'"ir i 
l'<.^l IV imK IT.'i (Ml Th» IV our (:liriMiiia.s sjiH-iaL vi diin'I uaitl ORDER TODAY!! 



I? 



THE PROGRAMMER'S INSTITUTE 



k-241 



A KiitiinhiHivf C»in|iarn 

P O Box (141 

Chap-I Hill, \ t; 27S14 

MC & \ivj \\tki>mc 

['ruEfamrrH-n PrngjAiu 
5 0>m[»il<>r Mcidrl 



addrem 
citirrt _ 



Yrai Siihsi riplio 
Cavu-tli- 



txilh 
I>iskeltr 



Trial )•. 



I HC and Ih<> program nH-r t proeiam art- trademarliv of PutiirehiHiu' 

•All «ii(»aie aiailahli- im L-as%rtli' loi the 1 HIi-KI) MinW 1. (:i>lor Kxliml.-.) BaMC. Atari 4(X) HOU 

On divkrilt' liir llir Modrl 111. Applr M [add }5.{HI For raih dK^krttc >irdi-r| 



ACTION GAMES 

Ttw lastoat growing producar of computer garnvt for 
your MXX haa tha profkicta you hava wailad forti 



m^-\ Jif 1 COLOR ., 

NEW BEBSSRK 

AN APCADE GAME FOP THE COLOR COMPUTER 

Fast paced action ■ Super Hr-Res Graphics 
Dynjmite sound effects " One or two players • Huns in I6K ot memory 

Triis game will astonish you with its Detail arid Quality 
It sets a standard tor oiheiSi to loiiow 



— ADVENTURES — 

Calixto Island •iSlie iSlack Sanctum 

Hlghty scdalnwd by r»vt«wfi • Challenging dluationi 

Fatt, •Mctont nwctilnv language ■ Runs ki 16K ol mtmory 

Save game In progreu 



Adventuras on 5% TSC FLEX disc 
(specify 6800 or 6809) 
Both adventures on single disc 
Adventures for color computer 
Color Berserk tor color computer 

ShiDpea prBpaid in conlinonTal U S Califo 



ea S24 95 

S39 95 

ea $19 95 

ea S24 95 



iMidt'ili p^cair ir)(i G'l rii 



visr 



- MORE COMING SOON - 



ffBHHffij' 



MARK DATA PRODUCTS 



i'jaCi ba-qui'ia Mission Wieio CA 926S: 
{^^i T6B 1S5.1 E.eriinqi 

-IV B- ■■, f. -"snrWtOK "I TUNC ■ ■'OBP- 



ments of real situations, queue 
programs take advantage of the 
computer's natural logic— its 
program counter, a queue itself 
—the computer's speed and its 
ability to nest loops so that 
parallel operations can be repre- 
sented simultaneously. 



As with any simulation, don't 
run the program only once and 
draw your conclusions. Enjoy 
the luxury of the computer's 
speed. Remember, even if you 
wait hours for reasonable con- 
clusions, the hours can repre- 
sent years of tnal-and-error.l 



1 CLS 

5 DEFINT F.T.h.B.X.P.N.^.J 

IB REM GAS LIVE SIHULATIOM 

2i RE?) ALAN ^EIBAUER FHR SB « ICROtTKPUTIHG 

3B E-1;T-1:H=] 

lb RANDOH 

40 PHINT ?22,-GA£ LINE SIKULATIO>)" 

^2 PHINT 

*•> PRIHT -YOU OWN A GAS STATION, EVERY MINUTE THERE IS A CERIAIN 

CHANCE THAT A CAR WILL PULI. IN FOR SERVICE OF FROM 2 TO 6 HIN 
UTES . ■ 
48 PRINT 'BOK KANy ATTENDANTS tX) tOV NEED TO HANDLE THE LIKE? OR 

WILL CtMS PULL AliAV BE^CEE THE LINE GETS TOO LONG? HOW HANr' j 
5B PPIhT ■ KINUTES IX) VOCZl ATTENDANTS ACTUALLY WORX? 
52 PR1NT:FRIBT -OBSERVT; THE ACTION OF YDOR GAS LINE, EVALUATE TH 
E EFFECTIVENESS OF A NUMBER OF ATTENDANTS AND LINE LEIiGTH. FIRST 
.ANSWER A FEW QUESTIOHE TO CUSTOnIZE THIS PROGRAM F3i YOU — " 

54 IHPUT 'aOW HAHY AlTaiUAWT do you WAJ»T-jA:DIH WAiT{A*lB) 

55 L..i;:IN!>riT "KAXIHi.-H NTIKBEP OF CAilS IN LINE" ;MAX; DIM Q[KAX) 

56 C[.S: liJPUT "1 Qt HIKLTES TO OBSERVE THE LlNE'iHI 

57 '.l:-: INPl'T "PSXCENT PROBABILITY OF A CAR EACH ^CVL'TE" : PER 
14P KUK H-1 TO ai 

145 FOR X-1 TO SDB: NEXT X; CLS 

17B FOR P-1 TO MAXiPHIHT QIPlj" "iiNEXT p 

'175 FOR N»l TO •JBHtNEXT 

i8B N'RHDllaa, 

ISB IF N>1BB-PER GOTO 26B 

ZBB L-{..I 

21B TIKE-RNDi:) »i 

22B FOR X-J TO A 

222 IF KA1T[X).B THEN WAITIX) -TIME : PH:NT?525, "LINE IHPTY.TOOIl CA 

R NEEDING -;TIME:" H I NUTES" ! G-G»TIHE : P.-R- 1 ; I FA J 1 GOTO 3BBfl ELSE3 

2a 

224 NEXT Ik 

25B UJfil-B IBBS 

26[ lOR X"I 7<j A 

262 WA1TIX).WAIT(X)-1 

i64 IF WAIT1XK8 THEN WAIT(X1-D 

266 NEXT X 

2tlfl FOR X'i TO A 

281 IF EOfl GOTO 32fl 

292 IF WAIT[X)"e GOSLB2eaB ELSE 2B4 

2B3 WAIT1X)=TAKE 

284 NEXT X 

32B NEXT H 

399 FOR Xl-1 TO 5BB.-:iEXT XI 

4BB Cl-S 

41B PRINT " REPORT* 

428 PRINT 'TOTAL CAHi GENERATED WERE ■;C 

43B PRINT "TOTAL CKRs SERVICES WERE "jR 

44B PRINT -TOTAL TIMZ SPENT SERVICING CARS WAS -jC;- MINLTES." 

46B FOR K-1 TO MAX: IF Q(X1-B GOTO 49B 

47B L-L*l : K-K*0(X1 

49B NEXT X 

bbs pbintiprint "you had "jl;" cahb left in link needing a total 
of "jk;" minutes of service" 
52b if c-(r+l1'b goto 54b 

53b phint 'of the cars generated"; c-[b+l1; " did not get in i.in 
e because it was too long" 

54b print "your average waiting ti!1e was "; t!!/[r*l1;" minutes" 
55b print "your average service tlfle was ";g/r;" minutes' 
55 5 e:jd 

999 HTOP 

IBSB REM PL'T SUBROUTINE ALSO TOTALS WAITING TIME 

IBIB IF F' >B GOTO 116B 

1820 OlTl-TIME 

lB3fl FOB Xl = i. TO MAX 

1848 TK-TX»0(X11 

185B NEXT XI 

1860 TK«TK-0(T)*WAIT(X) 

1B78 E^B 

1BB8 T-T+1 

IB9fl IF T>M«I THEN T"l 

IIBB IF T-H THEN K-1 tLbt F-fl 

1128 PRINT "PUT CAR IN LINE NEEDING ";TIHE;" MINUTES" 

116B RETURN 

1999 STOP 

2BBB REM TAKE SUEBOliTINE 

2fllB IF E-1 GOTO 2S1B 

2828 TAKE'OIH) 

2830 O(H)'0 

2048 G-G'TAKEtH-R'! 

285B F'B 

2868 H-H*l 

2B7B IF H>MAX THEN H'l 

2B8B IF T-H THEN E-1 

25B1 PRINT TOOK CAR NEEDING "jTAKE;* MINin'ES" 

2518 RETURN 

2999 END 

3888 FOR Y=l TO A 

3811 IF WAITIYIOB GOTO 35BB 

3B2B FOR J'l TO A 

383B WAIT(J)-HAITIJ)-1 

3848 IF WAIT(J|<8 THEN WAIT|J]-B 

3I5B NEXT J 

3Se8 GOTO 328 

358B NEXT Y 

3518 GOTO 328 



Program Listing 
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STARK SOFTWARE 

introduces 
TIME-TABLE 

A NEW CONCEPT IN 
MICRO-COMPUTER SOFTWARE 



^-?a> ^ *»t*»«*#»o«>M • 



TIHB-TABLM is a tested, inieractive lime manage- 
ment program developed (or me TRS-80 Models l/lll 
by a leadino designer of decision aiding software 

TNH-TABL> provides the t3usy manager pro- 
fessional, protect planner, peisonal user, among oihers . 
witfi a versatile tool lor mainiaining tiles oliime-reialed 
activities TIHB-TAM.I includes features tradition 
ally associated with computer mainframes, sucfi as 

• Simplistic user customization - requires no 
programming 

• Conversant menu-driven displays 4 controls 

• Eiflensive data entry, edit A updating capaDilities 

• Convenient data review, search & documenting 
controls 

• Automatic on-line time sorting 

• Extensive error trapping & user p'ompling 
functions 

• EHicient data storage & tile management oper- 
ations 

TMB-TABLI versatility can De illustrated by the 
following list of ' designed-fot" applications 

• Business 4 personal calendar maintenance 

• Project planning 4 control 

• Construction planning 4 control 

• Transportation scheduling 

• Production planning 4 control 

• Professional appointments management 
TNM-TAHil was exhaustively tested and cerli- 

lied and includes a comprehensive user s manual 

Minimum system requirements include TRS-80 
Model l/lll Level II or Model III ROM. 3?K RAM. 
cassette recorder, and an optional printer 

TNM-TABLM is available on a premium program 
cassette comolele with users manual for an intro- 
ductory price Of t2S.K.* 

To place an order mail to the below address or use 
the order phone 



^-255 



STARK SOFTWARI 

P.O. BOX 695 
RICHBORO, PA 18954 



ORDER PHONE (2t 51 493-51 1 1 

Orders can be placed using Dank check, money 
order, personal check (Allow 2 wks to clear) or 
^C.O.D. Include $1 .50 Postage & Handling 

■PA Residents include 6% Sales Tax 
•TRS-8C IS a trademarx of Tandy Corp 



^n^ 






TRS-80' Model III 
operating Systam 



Tip* O^tltint STdvn tv ONLY tls: 



JmI ClOAD OH •n*anrfk*n( S i llim tnl jov » *t 

griW pnianni*. 'ouBna* iM mtmi MJ — d yaw 



Had ana cuMOfiHM 



yotf r m oi- 



n«*l ilm* cloch control 
Msfnary Dontanta 
SpaolAI ft o'^ap'^tcB char* 
Oraphloa aynlhaala 
LIna ranumtiar (tllacralal 
im appanillna 

CBAVI » CLOAD? 
data son 



BA91C pragri 



Faai 

no rouil 



Iqua aldi 



:k tor 



> K hM •how r«j wfui your HodM in un rwihi <*dI 

• N wtll K<ni)*nll» youi wrrting >nd SM |rou mtiri hour* 

04 aobugamt tna raanUng utiMt Iwicbon*. 
■ n Ma haip reu Mruaw* rOUfl Own «n>gn>iii. 



'O/ict roa'¥t uttd it, you'll nmrmi 
taolhmr p/o^Mtn without H!' 



■'II* 



OH aUMJTt CASSETTC 1 K>-f*aC lUMML 



Moumt uooCL m msk ihk mm ovcnHEAD) 



BWtCUM AT ttn MtCC. rTS VNmMU.* A OFT tT • 2 S 



SEND CHECK, MOHCr OnOCA OR NM»ER AND 
OPNUTXM MTt or YO«l C«Wt CAM) TO 

1 

M*0 aw m AVIMUC, BKAVERTOM, OREOOM STDOr 



[/^ 



i/.<(l™/M' & f-^^'/fr. 



^ 



UNCOMMON 



SCREEN ARTIST — turn vour screen inio a drawmg 
board Create com pie » screens with simple com 
mands Store screens as 8ASIC statements on tape 
Of disk m any □' 4 (ormats including ultra 'ast 
packefl Strings or imes EOit the screens you create 
easily Makes ultra fast graohics a snac Merge 
compteled screens wittA your program A powerful 

tool great for schools Soecifv Taoe Disk Model I 
111 117.00 

WSCOMETEH — disk drive tachometer tor ihe 
Model I Real lime anak>g display of rotation speeO 
of your drives Save $ in Qiagnosmq disk problems 
and making simple motor adjustments II 4.00 

DUPLICATOR — copy virtually any tape with ease 
BASIC, system, or data Includes verify feature 
Model I only tS.OO 

SUBPACKEn — pack machine code in BASIC lines 
or strings Execute tliem easily from BASIC Simple 
to use. stunning results Specify Model I. III. 

Tape'Disk ~ S9.00 

LANGUAGE ARTS - reading ftuertcy. ctoze 
reading, comprehension drifts, tachistoscope In- 
eludes 4 programs A complete program (or tlie 
educator or concerned parent Specify Model I III 
Tape Disk MO. 00 

MIGHTY VVORD CANNON - eOucational dnll with a 
touch of fun Create (iiii?zes on any sut)|ect Word 
cannon does ttie rest Specily Tape Disk 19.00 

Tape versions require 16K Level H 
Disk versKxis leouire 32K t drive 

MONEV BACK GUARANTEE 
SEND CHECKIU.O. TO: 

smallsystem 



design 



Box 268. New Hartford, CT 06057 



Mill ll 1 IN tt TtllT Ctir. :., 



PPODUCTS FOP YOUR PADIO SHACK 



i^ 



>H'- 




MICPOTEXT COMMUNICATIONS VIA YOUP MODEM! 



Now you can use your printer with your modem! Your computer can M an 
intelligent printing terminal. Talk to timeshare services or to other personal 
computers, pnnt simultaneously through a second printer port; and re-display 
text stored in memory. Download text to Basic programs, dump to a cassette 
tape, or printer, or both. Microtext can be used with any printer or no printer at 
all. It features user-configurable duplex/parity for special applications, and can 
send any ASCII character. You'll find many uses (or this general purpose 
module! Available in ROMPACK, ready-to-use. (or $59.95. 



SOFTWARE DEVELOPMENT SYSTEM 

The Micro Works Software Development System (SDS80C) is a complete 6809 
editor, assembler and monitor package contained in one Color Computer program 
pack! Vastly superior to RAM-based assemblers/editors, Itie SDS80C is non- 
volatile, meaning that if your application program bombs, it can't destroy your 
editor/assembler. Plus it leaves almost all of 16K or 32K RAM free for your 
program. Since all three programs, editor, assembler and monitor are co-resident, 
we eliminate tedious program loading when going back and fortti from editing to 
assembly and debugging! 

The power(ul screen-oriented Editor features finds, changes, moves, copys and 
much more. All keys have convenient auto repeat (typamalk:), and since no line 
numbers are required, the full wklth of the screen may be used to generate well 
commented code. 

The Assembler features il of the following: complete 6809 instruction set; 
comptete 6800 set supported (or cross-assembly; conditional assembly; kical 
labels: assembly to cassette tape or to memofy; listing to screen or printer; and 
mnemonic error codes instead of numbers. 

The versatite ABUG monitor is a compact version ot CBUG. taik>red for debugging 
programs generated by the Assembler and Editor. It features examine/ change of 
memory or registers, cassette toad and save, breakpoints and more. SDS80C 
Price: i89.95 



THE 




QAMES 



Stir BI»tor — Blast your way through an asteroid field m this action-packed 
Hi-Res graphics game! Available in ROMPACK: requires 16K. Prica: $39.95 
Pac Attack — Try your hand at this challenging game by Gomputerware, with 
fantastic graphics, sound and action! Cassette requires 16K. Price: $24.95 
Bwserk — Have fun zapping robots with this Hi-Res game by Mark Data 
Products. Cassette requires 16K. Price: $24.95 

Adventure — Biszk Sanctum and Calixto Island by Mark Data Products. Each 
cassette requires 16K. Price: $19.95 each. 



ROMLESS PAK I — is an empty program pack capable of holding two 2716 or 

2732 EPROMs. allowing you up to 8K of program! The PC board inside comes 

with sockets installed, ready to go with the addition of your custom EPROMs. 

Price: $24.95 

2-PASS DISASSEMBLER — with documentation package 16K: cassene SOC 

Disassembler Price: $49.95 

CBUG — Machine language monitor. CBUG Cassette Prtce: $29.95 

CBUG ON 2716 fPROM: Can plug into flomless Pak 1 CBUG ROM Price: 

$39.95 

PARALLEL PRINTER INTERFACE — serial to parallel converter allows use of all 

standard parallel printers. PI80C Price: $69.95 

Assambly Languigt Pngramming, by Lance Leventhal Price: $16.95 

MEMORY UPGRADE KITS: 4-16K Kit Price $39.95. 16-32K (requires soldering 

experience) Price: $39.95 

PARTS a SERVICES: SAMs, 6809Es, RAMs. PIAs Call (or prices. 



r r^ « n ^ ,— N ^ /LJ~^ ^^ SH/P FROM STOCK! 

^D©[^^ "" W^^ GOODSTUFF! Master ChargeA^lsa and cod Accepted 

M®[^[J$^ P.O. BOX 1110 DEL MAR. CA 92014 714-942-2400 



^ Se€ List ot A<Jvertisers on page 418 
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APPLICATION 



LOAD 80 



An old saw says organization can get you out of the woods. 



The Logger 



Russ Kelly 

103 Ridgesprings 

Taylors. SC 29687 



There's nothing like a few lost 
programs and data files to 
rearrange your priorities! When I 
purchased my TRS-80 in 
December 1979, I was deter- 
mined that my first software 
effort would be a tape logging 
program. 

But a year of "'urgent" re- 
quirements passed, before the 
confusion of 200 programs and 
data files pushed my tape log to 
the top of my priorities list. 

Tracks 250 Programs 

Log It {Program Listing 1) 
keeps track of up to 250 pro- 
grams or data files on a Model I 
Level II in 16K. It eliminates old 
files and programs and has 
reduced the number of files I 
keep track of by 25 percent. It 
tracks cassettes as well as 
Stringy Floppy tapes. 

To maximize its record han- 
dling (250), I wrote Log It with com- 
pressed multiple statement lines 
and simple prompting. Input val- 
idations are also minimal. For ex- 
ample, on date entries the pro- 



gram checks that the date falls 
between January 1, 1979 and 
December 31. 1982, but the test 
can't detect a 13th month or a 
32nd day. 

I used very few report headings. 

The program maintains a data 
file, produces a report of pro- 
grams and files (each in 
alphabetical order) and prints a 
media report of all programs 
and data files on each tape or 
Stringy Floppy. It reports in se- 
qunce by medium number and 
file number or location (see 
Sample Listings 1 -3. It also pro- 
duces a list of all deleted 
records 

After each report, the pro- 
gram automatically advances to 
the head-of-form. 

The program has blank print 
lines, printing a space rather 
than a control character, 
because they are not always 
compatible between printers. 

A machine language version 
of Shell/Metzner actually sorts 
the data. This version, devel- 
oped by Allan Emert of Odessa, 
TX, sorts over 200 34 byte 
records in seconds. 

If the volume of data exceeds 
200 records, the TRS-60 uses a 
considerable amount of string 



POS 


LEN 


CONTENTS 


1 


1 


Record Type (A = Prooiam, B = Data h\e) 


2-11 


10 


Proflram or File Name (Special names = Avail, @Ne*, Full) 


12-ia 


7 


Date (YYUMDDS). The dale is enlered and displayed as 
MMDDYY, and alored as YYMMOD In addition, a SBqiience « 
(1 -9) IS appended lo Indicate the chionological seQuence dur- 
ing the day. 


19-25 


; 


Media NumDer BeginninB letter "E" indk:ales an Exat'on 
Stringy Floppy. Ail Others are considered tapes 


26-27 


2 


File Nurnber: Applicable only on Stringy Floppies 


28-33 


6 


File Location. Applicable only (or tapes First three digits 
denote start location, last three digits reo'eseni end location 


M 


1 


File Code: Applicable only lor tapes 

Table 1. Record Formaf 



space. When this happens, the 
computer likes to pause occa- 
sionally to rearrange the strings. 
This doesn't happen too often 
and it lasts only a few seconds. 



The Key Box 
Model! 
Level II Basic 

16K RAM 



15-40 


Housekeeping 


50-110 


Read Input 


1000-1040 


Update Function Controller 


2000-2050 


Print Prograrns & File List 


3000-3050 


Print the Media List 


4000-4110 


Write Output File<s| 


5000-5110 


Record Update 


6000-6120 


Record Input Routine 


7500 


Dale Forrnat Convefslon tor Pnnting 


7600-7620 


Tape Input & Unblocii 


7700-7710 


Tape Block & Output 


7800- 7810 


Tape Close Routine 


8000-8040 


Machine Language Shell/Metzner Sort (Allan Emert) 


12030-12200 


Load Machine Language Sort (Allan Emerl) 




Table 2. Program Structure. 



Variabla 


Comment 


A 


Integer 


Used by Sort, 


AS 


String 


DIM 250, record string area. 


AA 


In lege' 


Update & additions field length indicalor. 


AD 


Integer 


Count of deleted records. 


DJ 


String 


Date, any tormat, used in report tieadings. 


1 


Integer 


For . . Next counter, general function irtdicator, pnnt lab 
values. 


11 


Integer 


For, , .Nexl counter m update 


tR 


Integer 


Number ot records. 


IX 


Integer 


Current record Indicator during update and additions. 


N 


Integer 


Used by Sort, 


OS 


String 


Current record program/tile name. 


Tl% 


Integer 


Number of input tape logical records 


T2% 


Integer 


Number of output tape logical records. 


TBS 


String 


Tape InpuiyOutput physical record area. 


TL"/. 


Integer 


Logical record length tor tape I/O. 


TRS 


String 


Tape I'O logical record area 


X 


Integer 


DIM 2, used by Sort, 


Z 


String 


File input type (S, T. or Ottwl, also update function (A. C. D, or 
DONE), 


ZA 


String 


Updale general wort< area 


ZC 


String 


Curranl record file code 


ZF 


String 


Current record file number. 


ZL 


Siring 


Current record file location. 


ZM 


String 


update media number. 


ZN 


String 


Current record prograrrVtilB name. 


ZS 


String 


Update (lie number or starl location. 


ZT 


String 


Current record type (A, B. PROG, or FILE), also update 
general work area. 


zz 


String 


Record input h output area, general work area, output tape 

indicalor 

Table 3. Variables Identified. 
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Buy Products 
By Computer. 




Need Computer 
Accessories? 
We've got you 
covered. 

• VERBATIM DATALIFE DISKETTES* .... $ 24.95 

• TDS (TAPE DOWNLOAD SYSTEM) $ 37.95 

Will turn your non-disk TRS-80 into a smart terminal. 

• MtCROCONNECTION— FOR MOD 1 . . . . $235.00 

• RS232 CONNECTION $185.00 

• CHRISTMAS GREEN SCREEN $ 17.95 

For models I, II, and III. 

• 80 TRACK DRIVES-COMPLETE $419 00 

• FORBIDDEN PLANET 
TALKING ADVENTURE $ 39.95 

The first in a series of new talking adventures 
from FANTASTIC SOFTWARE Written by William 
Demas. All machine language program, vocabu- 
lary of 40 words. We're sure this will stump you, 
but hints are available from Bullet-80 Headquarlers. 

'MINIMUM 2 BOXES 

If you don't see what 
dial up and ask. 

COMPUTER SERVICES OF DANBURY ^^ 

P.O. Box 993 

Danbury, CT 06810 

Voice Line 203 744-5516 

Bullet-80 203 744-4644 Headquarters 

COMPUTER SHACK 

2119 South Broadway 
Tyler, TX 75701 
Voice Line 214 595-4216 
Bullet-80 214 595-4217 

TERMINAL SETTING: 300 Baud, 8 



you want. 



MclNTYRE DESIGN 

RD 1, Bridgetown Pike 
Langhorne. PA 19047 
Voice Line 215 322-1895 
Bullet-80 215 364-2180 

FELDMAN ENTERPRIZES INC. 

1276 East Archwood Avenue 
Akron. OH 44306 
Voice Line 216 724-5583 
Bullet-80 216 645-0827 

Bits, No Parity. 1 Stop Bit. 



Three special names do not 
print on the program/tile report, 
but will print on the n^edia 
report. @New is used when a 
tape is erased or on a Stringy 
Fioppy. 

Avail Indicates that no pro- 
grams or files are on a tape and 
ensures that the medium is 
listed on the media report. 

I use Full when a "too short" 
error occurs on tape or Stringy 
Floppy so that you don't try to 
write an additional tile. 

When these special names 
are used for Stringy Floppies, 
file number 00 indicates @New 



and Avail, and tile number 99 is 
for Full. This provides the proper 
sequence on the media list. 

You can read an input file 
from either Stringy Floppy or 
tape. Data records are 34-byte 
fixed length strings (logical 
records) (Table 1). The Stringy 
Floppy automatically blocks the 
physical records to contain the 
maximum possible logical rec- 
ords. The tape record is blocked 
and unblocked by Input/Output 
(I/O) subroutines. 

Eliminates Parity Errors 

I reserve a 35' Stringy for my 



ftRITHMtllC 


06-02-aO ] 


ISODl A 


OaO-D9'j 


A 


ftftlTHMl TTi: 


06-DT-aO 1 


15O01-E. 


oso-09e, 


A 


CALENOfiR 


l?-2^-B0 1 


I&OIO-A 


065-111 


L 


CALENOAR 


01-03-Bl 1 


lAOlO-A 


IIS-IAZ 


C 


CALENDAR 


01- 03 -Bl :■ 


E50- OO'^-Oo 








Sample Listing 1. Programs 







data file, with a file number ot 
one. Since I use the same physi- 
cal Stringy, the program per- 
forms an ©New while running 
to erase and verify the file before 
writing: otherwise, frequent 
parity errors can occur on 
subsequent reads. 

If you are using tape instead 
of Stringy Floppies, remove the 
output Stringy commands and 
the ©Clears. The input Stringy 
commands don't have to be re- 
moved since the program already 



offers you the cassette option. 
The ©Clear command is at 

line 15, and the Stringy output 
commands are at lines 4005. 
4010. 4060, 4080, and 4090. 

The only problems I have en- 
countered in running this pro- 
gram are parity errors on the 
©New using Stringy Floppies 
as output, or a "tape too short" 
error when writing the output 
file. The parity errors are 
generally caused by forgetting 
to clean the read/write head. I 



l--\U i.1i-'L 




Vl, -L-l 


lil- 


I 


1 |■yuo;:■^ 




0". L-9VV 


tALi ^a^'^ 




OA-e 1 


fcij 


b 


1 :9aa:-t 




Oi)i'-y?w 


1,1 h B' 




III - , 1 


!■! 


Ir 


1 1' ti i; i 1 


-at 




(.■ o-PKI.'j 




( 1 L. 


!- 1 




r ,'ii- I'!'. 


-'J ij 




i llrj;,ijl 1 


h 


U/ ! ' 


in 


1 


J . 1 'VI 




I] 1 li - i! J -1 


L'ifjSUI I 


!- 


1;, • ■ 


-,-■1- 




: j\\ ■ . 




1 -■,.-: 7; 



Sample Listing 2. Files 



10 ' LOG- IT 

11 • BY liU^S KELLV, l-l-Ul, T.^i'LORi; ,;;c 
1^ Klem; 

:o CLEAF,B9DB:i:Lb:PPi:(1-Cl,H5U31 : PU(:L16526 ,0 : P<.i1;e16527 , 127 : P01;E164 

2S,liPOi:tl6 4 26,66:PI.i:iT-LOC-IT " .-IlE:: : IriPUT'D/iTE" ;DS: FBI NT'LOADIN 

G 30RT-:DEFn;VA,I,H,X:D£Fi,TH = ;DI.JiS(:5tl ,X ( 2) :7KS = -- :TGS-- " :TH- 

3J;GOSUB12030 

30 lUPUT-UUCDTE, 2rPI:G LET, 3-!.E3IA l:;t-;I 

All IFI<lOBI>3THL:;30LLi;LIili'UT-lSr.!<l:»GY, (TIAI'lJ, (IJIO I/P FILE'iZ 

:CLa!PRINT"l;E:ADIlH;":lFK-';i"Vlli:t]lD0(;CL^EIt-Z-"7"THL;iGll 

bU tOPENl 

60 IFZ = -T"THLIIc;oSULl7bO[!;ZI«TnS:COT07U 

61 yiiiPUT zi 

Hi ifsz-'ilof"thf.;iif:-"i--yhe:iiidslgliijj 

Si- iFi = 3'ntE;.^siii;(.::iES(:i,l'Ji.LEFvS(zi .13) ll;;i:/.si iR) "Si 

91. IH-lK»l:G0TO6C 

100 INCLOSE 

110 PRlNVIh,-- .tECi-:a:.I^aTOlJL.!:,20Cl,3UL'L':E:;^ 

ItOO PRi;i-:':l:Ji'i|-i--(fi)EO, (ClLi'i:, 13)LL, OK [DOUH'-.Z 

lUlil Ifl-'UOl.L'TIII.H-iliOO 

lU2u IFi-*C"CjRZ»"D"VHtN5[JGlJ 

1U311 iFi;-"A"THLiiii-iH>25[iTHErilu[JOE;Li;LiX'iL(:(;o;;jutiaotiin-iR*i 

11)4D tXlTOlUOiJ 

2i;L't. zi--pkix;RAi;s/FiLt.s-:i'(d',}-iLEriizii) '2) )/2!Li'ki;ivvnF,( ii ciib5(2 

7) i Chins 1 14) i-;-;i:i = " VLPrniT'.-AL^IiJ) lil-I;" RECOKIjS' : LPPi:nTAB( 361 

L-S:LPKi;r.-" •zLpt-.i--.:- ■ ::t-',->" :LPLi:n'CHP.!{27i ;Cmh;(H) -.'fvijCPS^KS- 

■;LPHi;r.'" ■ 

2iiii) FOBi-i;".'ui.i(-: 

2U15 :jS-;inis(Ai(i),2,Si:iFLi;-- '::e-.: -urvs-'full "oros-'avail'the!: 

21i5LELSE:F-- ■::[: = ■ VZL-- ":IFIyID5[flS(ll , 19 ,1 1 ''E-THEIiZ 

r-"--<-!iI3S(AilI) ,2t,2):LSE2C-i;iCliTS),-iSII) ,i) : ZL-MIDS(flSU 1 ■2a, 3) 
• ■-■•:iIDSlAiU) ,31i31 

ii.2u lFi;T<>Lt.FTS[Ai(ll ,l)rHLIIZ.T--D-:ZU-- VLPHJin-CHRSdll :LPRItIT 
■ -iLPRi;;'." VLlT^IIiTfllUSia?) ,l:iiH!;114) ;-FlLEK--:Li'klIlT" " 

2*1311 if:iiu:. i;,S(i| ,2,1Q| o'/r-niiuiLPwiin-" •izti^riiDJtASH) ,2,10) 

20 (J ZI-:iU'i(r ill! ,12,7) :i;0:i',:[:7 5Ju:LPMlrri'ZM;" "j^Z;' ■;;-lIDS( 

ASdi ,19,jij:f;- -izi-i- -izc 

2'. i-^ ::exvi:UOTC.;i^j 

3GiiL' GOiiuat.oij;;: ;:.= " -:::; = ■:. :. :; i ,\ l. i s :' : i^ii2-{Li.'i[zz] 'Zi 

)/;:LPaiiiT7AE(:)(.ii;'i(:7i ;C!ii!V(l4j ;:_ 

3^1J FORI-JTCJlP.-l 

3C15 rF:,IDS(,^b(l) , 17,1) =-A-T)ILIlZT = -PE:ut.-ELSLZT. -FILE- 

3J211 if;iius|as(ii ,1,71 <>z:mii:;iLPBifJT- ■ : Zli»i;ius(asii) ,1,7) 

3U3U ZZ-;;ni;MAS[n ,2W,7) :GO^llH7iD0:ZF-" VZL-- -jZL^" ": 

IFLLFTSIASI I) ,11 -"L"Tl!LIIZF-"-"*:iIL!S(A^U) , 8 , 2) ELllEZC-lllDS ( AS( I ) , 
It, 11 iJL'MllSlASl I) ,l:i,3) f---:;tDS(AS| 1) ,13,3) 

IJifl LPPl;JV-i:;,IF,- •;3L,-- "r^T;" -r.'.lD^KASfl) ,10,lll);■ 

";^C,■■ ■;:£ 

4i)ju Go:iULtjSi;:i:.pi:7"!j,'? FILL iDY (;,i:.i. ht Li'A;;tui -; zi :iz-" :i;ip 
U7"TAP£ f.i.^o (Y/;.) ■;:l:z:>" • 

4t,lj5 3:.L1.- 
i<Jl\l XPLM 

iC2j FOnii-i;vuiii-i 

4(;3L iFLEFTii,\ri(iii ,i)-"r/'Tiii,.iLP]n()T"D::L[:-rLD ■:a<;(iii ;ad-ad+i -go 

'.XJ iiL;7l,' 

<i".^ iF:L-'Y"'.-riL:rT;: ;.=;,'.( 11 ) :iiM:;i:ii77 0^ 

■.K.U.' ,-Pki:r.' ;l:>iiii 

4.7J :.t::;Til!.-Hiirt-ii(-AU;- ntca" 

4Q7i IFIZ-"Y'THLIiG0SUE7fatt 
4tLi; iPFI.IV 'lEOF" 
i^iii. ."CLOSE 

nail iFA,n>aoi(i<>iVH;.;iLp;.!:.Tcii;ic[ii| 

41 IJ PRl;;-'"LijJ' !Ei;u 

5O110 zii---;i:;pgT':LLniA f.-z!.! iFzii."TH[;i!50Ciiit:L;iKAA.LtN(z:'i -ifaa> 

6™Ei;ZI,.LEFT>(Z;i,7)EI,Gi;zn-Z;,tSTKItKS<7-AA,' ■( 



SDie zs-°': iiJPUT'FiLK ; (>;x) ui; st/irt loch [xxKi^-.i-j 
^a4(j Fomi^UToiR-i 

bL^i ZT-": 1F;;IDS( Ail 11) .19.11 ^"l-"".TiENiV-i:iDS(A5l 11) ,26,21 LLoEZY 

':,1Q5(A^111) ,2a, 3) 

SOiil IFi;iDS(ASlIl) ■l'),7)-ZIlAHDZVZS?HEIlPHi:iTTiIUGlA51Ill ,2,11:} :' 
■iZ;i,-" •:ZT:Z^-" zlllPUT—lUlS ')!IE (Y/I) ' ; ZA: IFZA'*Y-n:L:;S10Lj 

506B :.T/-.ii:i;o7ui;iii: 

blO'J iFz="o"Ti!E;.A:( III -■:.••:.:; Ji/.i( 111 ,.1 ; !'}'i.;7-LJLLr?LD- il-.u-.-cihh 



illU IX^Il :GUGUE61JCU: Pia;;T"UPI>ATED TU "; AD( I);] :GU"01!liJG 

6UL)U PRI1JT°MX :"; i;;!ZZ = "-:ir;pl>T"(P)POL OR (F]11.L";ZZ 

CD IB IFZZ-"P"Tlli;HAS(U) ""A"EL:iLlfl.Z = "F"Tll[;[lr,S |IX) ''Q-ELfallfiUlir 

602O ZZ = "": INPUT'liWIL" J ZZ : IFZl,-""THC:i6u2U 

603U ,\A'LEt:[ZZ) :IF,V.>9Tlir.i;;i5(If,| ■•■.SI IX) 'LEFYiU^i.K'lELyE/.SlIXl-A 

SdXl 'Z:*S7KltlCS(lU-/'Jl,' ■) 

604B ZZ«'*: l:IPUT"D/,7E (IIUUDYY:;) ■ ; ZZ : 1 FLL!! ( ZZ) (>7THE1.6C4CtL^tZZ'':; 

IDS( ZZ,5,21 tLEF7S(ZZ,4) tKIGllTSIZZ . 1) : IFVAL(ZZ) <ES01lll30PVflL( ZZ| > 

6212319THt:;6U4EELSC AS (IX) =A5{ IX) »:Z 

bubv zz-"":iNP'j7":,EaiA » ■iZZ:iF;:z-'-TiitM6a60 

607 AA^LErMZil ! ifaa>ijtiil:iaS(i.-.) -/.si i:;i 'Llft5(;.. , 7) ll:;E(.:. ( i\i =Ai 

|IXl*ZZ + ETRIilGSi7-AA," ■) 

60 BD IFLEFTS(Z3,1) <>'E"7!ILIlAr. I IXl -AS(IX1 • "LD" :ClJYnt lllU 

609U ZZ=^"' : IIIPUT"FILL t [CI TO OO] " ; ZZ ; It LLi; ( Z7 1 <>2THLt]6D911t;L.SRA 

StIXl-ASllX) 'ZZ + 'bDLIOUUD'iGO'lljel^K 

6100 ZZ-"": i;,"PUT"FILl. UiGII (iltlC-^991*:^!.: IFLFMi;! <>7T:ii:rl6 1 ^CLLE 

tA!iixi=ASiix) •LLr7;izz,3)»i!ir.n7S(zz,3) 

6113 ZZ-"":l[.PL'T"FlLt CODE (A Tli Z) "jZZtIFLEIUZZ) <.'lTHL;:t.llL'E:L3F 

AS(IX)=AS(IX1«ZZ 

6128 IZ'" : INPUT"OF ( Y/Ii) ";ZZ: I F2ZO" Y"THriJ6PBiiF[.::t.lil '.'UT'' 

T.IZ' .Z-:-,lliS(Z:,3,21 *--"*t;iDS|72.5,2)t---.LLFVS(z:,2).- -.Rir.l'TS 

U:..ll :>;lvuh!; 

7blilJ IFTflS-""TllUIIIIIPl!T!i-l,TLi!,: Il'VHS="lEUF"THr,NFl'lNT"I/P TAl'l-. REC 

E''";Tl'i:GOTU7620 

7G1U TKS-LEFT5|TUS,VL". 1 : TE3=;;il)S (IB^.Tl," • 1 ) :TH-TU«i 

7b2u liETUl;:! 

77 U^ TUS=Tlr;*T;-b:T2--;2i--l;IFL-.,;. (TBjI •,[.■ ■ 2 4 BTHEriPH 1 KT» - 1 , 73S : Tb 

77iy f^^Tu:;!) 

7i)uiJ IF7L';<>*'VHL:iPi;Ii.7j-I,7Li;j:7E)S="' 

7B10 PRi:.7t-l,*iErJF":PPILT*0/P VAP." f H.;i-' | T21 ; rtilTUFi:! 

793U • M,u-!ii:.L l,-.:k,lagl vef.sil:; of smell/, 'ETZJiEn :iOiiT 

791LI ' DEVELOPED !1Y ALLAl. CiEfTV, ODEaWi, TLXAS 

uouu pRiti-r-^onTitir," 

bUlU X(D)'I)I 

i;c2B x(ii =vAnpT[i(A^(ij)) 
ccia A-usK(VAr.p'rE(x(u)i ) 
ae*c KETUPM 

12i'3a DATA 2u5.127.1ll,»4,35.e6,237.ci,l'.,127,3i,';4,j3,- 

12B^l' DATA 213. 127. 33, U,U, 34, 211, 127, 23;, il, 211, 127, 2t2 

12i)"jt DATA 2U],5ti. 46, 2, 303, 251, 237. 81,^11, 127, 122. 179,; 

12ki6C DATA 127,237,L2,34,2:!7,127,3J,iJ,!i,14,2iJ5.1i7.42,: 



:,237,63 
^i>,42,19 

12i:7tl DAT,, 2l3, 127, 42, 211 3, 127, 237, y 1.211. 127, 2 'j, 3", 2['!:', 127, 23^, 3 



12fcJHU DATA ll,0,2b,2^,2S,229,237.91,2U3,127,33,B,:!,2S 
12090 DATA 79,213,127,9,235,225.9.229.213.14,0,126.7 
121U0 DATA 3, 14, 1.71, 175, 176, 41), 25, 197, 19, 35, 78, 3^, 7 
1211H DATA 215,7e,35,7J.197.22'j,;93,26.15i;,56,U',37, 
12120 DATA 246, 2C3, 6-, 32, 31. 2:'*, 225, 6, 3, 78, 235,1.16.1 
12130 DATA IS, 19, 16. 24',, 42, 211, 127. 235. 42, 233. 127. 17 
12142 DATA 2ti3. 127. 48. 144. 24. 2, 31"j, 225. 42, 205, 127, 17 
12150 DATA 34, 265, 127, 237, 91, 21'7, 127, 237. 82,218,58.1 
7 

1216D :i=u 

1217 FOHl = lTU2U3:BLADArN-tl*AjPUKLI*3 25Il.A:t;nXTl 
121BB IFN<>2239]THEIIPknJT"EHH IN SOF.T LOAD':EIIU IXSi: 



.25, 
1,26 
C,19 
39,1 
13.2 
S,2J 
,1,0 
27,1 



25,237 

,lH4,4e 

7,225 

9,35,16 

3 5,119 

7,B2,3; 

,175,25 

95,24,12 



Program Listing 1. Logic 
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♦SPECIAL** SPECIAL 

TRS-80 TANDON ADD ON 

IMMEDIATE DELIVERY 



SIMGLE SIDED $215.00 
DOUBLE SIDED S335.00 



COMPLETE SYSTEMS 
SINGLE SIDED $330.00 
DOUBLE SIDED $450.00 

INCLUDES 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ^»6 

20932 CANTARA ST 
CANOGA PARK. CA 91304 
(213)341-7914 

VISA AND MASTER CHARGE ACCEPTED 



INTERFACE EXPANSION BOARD) 



For the TRS 80' 



MD 



MiCRO-De';iGn ^--l 




jjK 



The Interface Expansion Board gives 
your computer these features 



MDX-1 



Phone Modem 

2K E'PROM OPTION '" ^'ock Now 
32 K Memory ^^ Board 4 user manual 

Real-Time Clock 

Parallel Port 

RS232 Port 

Dual Cassette Line 

Floppy Disk Controller' MDX-2* 

On Board Supply 

Silk Screen 

Solder Mask 

Exparysion Port 

Marjual 



64.95 



74?5 



Add 5.00 toi sfiippmg 
& Mandltng Teaas les- 
ide"l5 add b°". sales 
lai 



MANUALS $7.95 

■FREE PAMPHLET AVAILABLE^ 
Call or write 



^ 



^ MICRO-OG'^IGn 

M P.O. Box 748 

HtanchBca, TX 78652 
512-282-0225 

TRS BO IS a Tradematli ot TanOy Corp 



^yf% 



RELATIVITY '-''-'—' ^ '"^ 

Travel thfougfi a space lime continuurii to distant 
stars Undefstand the concepts of time and 
dimensional changes, mass energy 'elationship5 
Quasa's — the ultimate m mass energy conver- 
sion Conicute yOur own reiatfvistic lime, dimen- 
sions, mass, kinelic energy and energy per unit 
mass "A fascinating and educational adventure 
ILII, ytK] $16 95 






CALENDAR 

computations 

Compute ine number ot days De f I I t t !"m 
tiveen any t*o dates Fmd an un 
known date in rlie past or future given the Starling 
date and a number of days Tens you the day ol Itie 
*eek for any given dale 'For any date a'ter 
^a^b ^bii2 iLii i6Ki S995 

SIDEREAL TIME , 

Computes: local sidereal time given I tli»ia» [ J 

tile date, local time and coordi 

nales, Greenwicfi sidereal time for IXnjf U T given 
the date only, and Greenwich Julian Date (or any 
given date Accurate to -30 seconds 'Fast and 
easy lo use. complete instructions ILII. 16K) S14 96 

CLOUD v;p 

sltituda A lomwlion -^ ,"' 

Pfog'amrr.ed learning. ,^^ 7, 

HOA and why clouds 

form, Lig'ilning and lighlnirig rods. Temperature 

Relative Humidity and Dew Point relationships 

*ithout the need o( tables. Cloud allituOe compula 

tion includes e'perimenl (Lll 16K) $1295 



Home Mortgage 

Analyze an eiisting 
loan Delermine pay- 
ment size 01 number ot 
payments lo suil your 
budget includes ex- 
amples (LII.16K1 16 95 



BIORYTHM 

Compule Intellectual, 
Physical and fcmo- 
lionai cycles for any 
dale Analyze 

liislorical figures, and 
friends (Lll t6Kt %* 95 



BECKER ELECTRONICS^ 290 

108 West Fratiklin Street g-v-q 
Chapel Hill, NC 27514 5S2! 

(1.50 shipping & handling Ph 919-9678299 



Do vour own taxes like an expert 
with TAX/SAVER. 



tax/saver:^ The tax help program 
for the laynian and the professional. 

• Privacy - 

• Built-in tax aids. Answers questions like "Is my father my 
dependent?" and "Are my deductions reasonable?" 

• Tax regulations programmed in by our team of accountants. 
Type in your figures and you've done your own tax return. 

• Output to video or iineprinter. (Overlays available.) 

• Tax deductible. 

• Optional text; help tor novices speed tor professionals, 

• Manual: Tax information, lists of deductions, tax glossary. 

• TAX/SAVER'" I: completes long and short forms, itemized 
deductions, interest, dividends, income averaging and 
maximum tax, tax calculation, 

• TAX/SAVER'" II: all features of TAX/SAVER'" I plus 
business income and capital gains, 

• Discount on yearly updates. 



^^ 



^'- 



TAX/FORECASTER" converts TAX/SAVER- 
tc) ,i tj>. pidnner Lets you see how financial decisiuni 
wHI affet-t your taxes TAX/ FOR t CASTER" .an 

be used alone 



Orders will be tLJIed in IrtteJanuiirv in allow int. lu sum ol new la.*. laiAis 
TO ORDER: 



.^3U 



Review's: 

"Well designed and easy to use" D Luhar, Creatine Computing Maga/ine 1 81 

"TAX/SAVER'" may very well live up to its name" 

M, TanntnbaLim. CPA, 80 Micrtxromputing Maga2ine 2,81 

•kvijistsred trademark ol Radio Shach *'Ci)t>v'i9'il 1981 



Call collect 203-324-3009 ..t 203-544-S777 oi mail this 
coupon to Microm«tic Programmina Co. 

P.O. Box 158. Gvors^lown. CT 06S29 

Please enroll me m member s service and send 

D TAX SAVER'- ! (q- $79 95 Manual included 
□ TAX SAVER- M ■■■ $119 95 Manual included 
D TAX FORECASTER- 'a. $49 95 

(wilh ctlher TAX. SAVER- $29 951 
a Tax Form Overlays '" $39 95 
D Please send me more mlormalion 

Please check one: 

D TRS 80* Model I, 32K with 2 disk drives 
D TRS 80' Mr>de! Ill, 32K with 2 disk drives 

Add $3 SO lor pifctdgc and h^rxllint) CT residenis ddd 1'- j . sjIps ijn 



Ne 



Address 
City 



Stale 



-Zip. 



n Check 
Cdrd No 



Zj Master Charge D Visa 



. fcxp date_ 



^ S9* List ol *dv»rHs»rs on page 418 
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The Captain 80 Book of 

ADVENTURES 

This "first of Us kind" book includes I'ne listings of 18 
currently popular BASIC Adventures Introduction by 
Scotl Adams Programs by Boner, Kepner, Powers. 
Micklus, Hasseti and others Individual cost of these 
programs would exceed S200' Also contains a unique 
Adveniure Program Generator and six chapters on 
Adventures m general - how to write, ptay, market, get 
ideas for Adventures etc 

AllprogramsarewrittenforTRS BOModellSilllbutare 
easily converted to any other machine using Microsoft 
BASIC 

Over 250 pages' SVj X 11 ", Semi Hard Cover. 

A perfect Christmas gift idea! 

Only S19.95 + S2.05 Postage/Handling 

80-Northwest Publishing inc. 

3838 South Warner Street 

Tacoma, Washington 98409 

(206)475-2219 

VISA/MC accepted 

Foreign orders please add appropriate additional amount for 
postage and specify air or surface mail. 

TRSW IS a trademark ot ttie Tandy Cofporahon 
Mtcrosoll BAStC Is a product ot Mlcrosott, Incorporated 




ORDER YOURS TODAY f 



avoid the "too short" problem 
by reserving a Stringy Floppy ot 
sufficient size for the output file. 

You can recover from either 
problem by entering GOTO4O00. 
This takes you to the beginning 
of the output routine. You can 
also use this statement to 
create additional copies ot the 
output at the program's end. 

The program's structure is 
shown in Table 2. I have in- 
cluded variable definitions m 
Table 3 

Running the Program 

To use the program, perform 
the tollowing steps: 

• System (Enter). 

• 10 (Enter). 



• Respond to MEM SIZE? with 
32512 (Enter). 

• System (Enter). * " ' Omit if not 
using Stringy Floppies. 

• /12345 (Enter). ' ' * Omit if not 
using Stringy Floppies. 

• @LOADx (Enter). Load Log It; 
use CLOAD if Irom tape. 

• ®LOADx (Enter). Load Exa- 
tron Data I/O program. Omit if 
not using Stringy Floppies. 

• RUN (Enter). 

After completing the run, 
restore the memory size with 
System (Enter), /O (Enter), and 
Enter on MEM SIZE?. I hope you 
find that this program not only 
saves time, but also avoids the 
frustration of "lost" files and 
programs. ■ 



l-lDOi-B 


n a - 1 .■ ;' 


Uli 




tir [ p, 1 r 




1 1 1) G 6 - B 


030 -Old 


I- It ( 




!-uhtn> ']■•,. 


O.s-u.'-t'l.' 1 


itl)07-fi 


000 -vvv 


m ( 




fi.A;. 


lift- v: -f'p 1 


1 -• U C 7 - .- 


00lJ--i'',>V 


^ n ( 




I'.Vi .1 


iiti -U. -tu 1 


lHOi)d ■!:■ 


00lj-VV¥ 


Hi. t 




.w,,l, 


Uti - li.' "filJ i 




Sample 


Listing 


3. 


Media List 





CO-DIR, BLINKING 



# CURSOR ORIENTED 
^ DIRECTORY! 

KILL! EXECUTE! COPY! LIST! 

BLINKING CURSOR DOES IT ALL RIGHT ON THE DIRECTORY SCREEN! 



riXSIT48/Clffi 
AQMCS/INS 
|GAi€/CHB I 

mum 



mm 
srai 

SKYRAI 
SCREH/fttP 



Never type a program name again! 

Access to any program on any directory page! 

Very very easy to use! 



TO ORDER CG-DIR' (R); Specify DOS and Model l/IH. 
Available for DOS PLUS* NEWDOS/80" 1.0 and 2.0 



95 



•Trade Mark of MIcro-Systema Software, Inc. "Trade Mark of Apparat, 



19 



PICOTRIN 

TECHNOLOGY. INC. 



Dealer inquiries Invited. 



Fl, res. add tax PH ; 30S— 586-2377 3531 San Castle Blvd Lantana, Fl. 33462 ^474 
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Ever tried to read computer sales literature? 

Ever tried to talk to a computer salesman? 

Ever tried to make a decision about 

which computer to buy? 



Yes . then you know what frustration is. 
Help is on its way. Desktop Computing pre- 
miers this fall. The first and only computer 
magazine written in plain En g lish . Preposter- 
ous? Not at all It is possible to explain com- 
puters without all the "computerese." That is 
what Desktop Computing will do each month. 
Send the card today for a no-risk subscription 
that will give you the kind of understandable, 
useful information on computers you've been 
waiting for. 

Why do you need a plain-En g lish explanation 
of desktop com puters? Because they have Just 
come of age and are saving thousands of busi- 
nessmen like you an amazing amount of 
money. They not only save money, do things 
faster, provide access to more information, 
allow a smaller staff to do more work, they also 
allow you to get into services for your custom- 
ers which were not practical before. You can 
provide more services at lower cost. To get in on 
the savings and expanded customer services, 
you need Information. Desktop Computing will 
bring you that information. Desktop Com- 
puting will cut through all the technical 
hocus-pocus. 

In this time of high interest rates, a truly low 
cost desktop computer system (usually a micro- 
computer system) is a welcome event. Let Desk- 
top Computing explain what these systems can 
do for you. The subscription price is 825 a year 

but as a charter 

subscriber you can 

get the first year 

for only $17.97. 

totally tax 

deductible. 

CaU toU-free: 

(800) «sa-B479 

or mail the 

coupon below. 




Here's a look at some of the articles $17 97 will 
bring you; 

• When a small Business Computer 

Arrives, What Happens to the 
Small Business? 
•Letter to Hemingway RE: Word 

Processing 
■Professional Se Small Business 
Microcomputers: Buying, Using 
and Fixing a System. 
•Adequate Backup: Protecting the 
Data m Your Computer. 
Wayne Green, the publisher of Desktop Com- 
puting (and also of Kilobaud Microcomputing 
and 80 Microcomputing — both successful 
computing publications) has gone through both 
the agony and joys of working with computers. 
He has lost a quarter of a million on a mainframe 
big boy computer only to come out on the othei' 
side with all the frustration necessary to run a 
i200 employee publishing firm on several 
TRS-80's. 

Wayne has a reputation for being honest and 
unafraid. He'll make sure you get the truth. In 
the meeting Introducing the idea of Desktop 
Computing to his staff Wayne said. 

"Our objective is to be the only com- 
puting magazine written in plain 
English." 

So that is what you'll be getting— honesty and 
directness. Desktop Computing will give you all 
the information you need on computers in plain 
English, 

This charter subscription is available for a 
short time only. Send the card today for the 
premier issue— October 1961— and get the infor 
mation you've been needing for only $17 97 



Relief is here for only $17.97 

I I ■/ L," ...: Sign me up as a Chaj^r Subscriber to Desktop 

'■'--'' Computing I will get one year of the only compul 
ing magazine written in plain English for tl7. 97 (a savings of 50% 
off the newsstand). My subscription will begin with the premier 
issue — October 1961. 
Your [irat issun will b« arriving by mid Odobor 1961 . 

Canadian 1 yr, only/US funds 119.97 Foreign 1 yr. only/US funds S29 97 



NAME 



ADDRESS 










CITY 






RTATE 


ZIP 


SIGNATURE 








RXPTRR DATE 


CARDtf 




INTERBANK # 




Desktop Computing 
ao Pine Street PetertxvouXh. NH 034Sa 



^S»9UalolAdiMftl»mnorpmgm4l§ 
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TUTORIAL 



The uses of loopses. 



FOR My NEXT Trick 



Alexander MacLean 
18 Indian Sprint Trail 
Denville. NJ 07834 



Given any two values, you 
can find the third. 11 you 
need only one answer, pencil and 
paper will do, but suppose you 
know that the voltage (E) is ten 
and you want to know what the 
current will be through a range of 
resistance values froni one to 
ten ohms. It's still possible to do 
by hand, but we are now talking 
about ten separate catculations. 
Program Listing 1 lets the com- 
puter do the work. 

Line 10 prints the three 
variables as column headings: 
voltage, resistance and current. 

Line 20 creates a blank line 
between the headings and the 
columns of data that will be 
printed on the screen. 

The For...N«xt Loop 

Line 30 is the first of the high 

power computer instructions. It 



Is called a For.. .Next loop. In- 
stead of our having to give the 
computer the ten values of 
resistance, this instruction tells 
the computer that it is to vary 
the value of R from one to ten. 

Line 40 tells the computer the 
value of our fixed variable, volt- 
age. In mathematics we refer to 
a variable, even though its value 
IS fixed- 
Line 50 gives the computer 
the formula It needs to work with 
our data, t have taken our 
original equation E = 1R, and 
solved it for 1:1 = E/R. We know 
what the voltage and the resis- 
tances will be, we want to know 
what the current will be. 

Line 60 tells the computer to 
print the values of E, R and I. To 
print these values, the computer 
must find the values for E and 
for R, find the formula, compute 
the value for I and print the re- 
sults. The instructions to do all 
this are built into the computer's 
internal code. 

Line 70 sends the computer 
back to the start of the loop at 
line 30, the next R. The first time 
through, the computer assigns 
the value R-1, works the for- 
mula and prints the result. When 
it hits the Next R line, it goes 
back to line 30 and assigns R the 
value of two. 



The program keeps this up un- 
til it reaches R = 10, the highest 
value that you assigned for R. At 
that point the loop's instruc- 
tions are completed, and the 
computer will go past line 70 to 
the next part of the program, in 
this case the end. 

Let's add another element to 
the program. If you know the 
voltage and the current, you can 
calculate the power with the for- 
mula Power (?) in watts equals 
Voltage (E) in volts times Cur- 
rent (I) in amperes. 

Since the computer already 
has given us the current, it can 
now find the power. Program 
Listing 2 adds only a few simple 
lines. 

We add the new heading to 
line 10: Power. 

Line 55 gives the computer 
the new formula to calculate the 
power, P = El, but written as the 
computer wants it, P=E*I. We 
could add it to line 50, but let's 
keep things as clear as we can. 

To line 60 we add the variable 
P for power. Make sure that the 
order in which the computer 
prints your variables is the same 
order in which they are listed in 
your headings. 

The four headings and vari- 
ables are separated by commas: 
E,R,I,P. This tells the computer 



to automatically tabulate the In- 
formation in the four-column 
feature built into the computer. 

If you need rrxxe than four col- 
umns use the Print Tab feature. 

Our program now gives us 
twenty calculations; ten values 
of resistance and ten values of 
power. A few additional changes 
will liven things up even rrxjre. 

Step FunctkNi 

Let's explore the Step function 
of the For.. .Next loop. 

Retype line 30 to read For R = 
10 to 100 Step 10. This tells the 
computer to vary the resistance 
value from 10 to 100 in steps of 10 
(ohms); thus 10, 20, 30. etc. We 
can use any convenient whole 
number value; Step 2, Step 5, 
Step whatever. 

Run the program with a few 
different step values and see 
what it looks like. It will come in 
handy for our next project, the 
nested loop. 

A nested loop is a For.. .Next 
loop used within another For... 
Next loop. It's simple to use. 
Let's apply it to our program. 

Suppose we want to know the 
current (I) and the power (P) 
when we vary both the resis- 
tance (R) and the voltage (E). The 
computer can handle it easily. 

To make life easier on our- 
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selves, we'll limit some of the 
values. We'll vary the voltage 
from 10 to 100 in steps of 10 
volts, and the resistance from 
five to 25 ohms in steps of five 
ohms. 

Next, let's look at the mathe- 
matical functions the computer 
will be doing, (tt will be easier for 
\be computer to do all this, than 
for us to follow.) 

For each value of voltage, the 
computer must figure ttie current 
and the pov«f for each of the five 
resistance values. This means ten 
calculations for each voltage 
value; five for current and five for 
power. Since there will be ten 
values in the voltage steps, this 
means a total of 100 calculations, 
ten times ten. Program Listing 3 
gives the details. The early lines 
just set up the basic headings 
that the computer will print. For 
clarity, we add line 20. This recalls 
for us the measures of our vari- 
ables—volts, ohms, amperes, 



watts. Line 30 now prints a blank. 

The fun Ijegins on line 40. This 
sets the values for voltage at 10 
to 100 volts in steps of 10. 
However, notice the next line. 

Line 50 is the same type of 
statement as line 40 and sets 
the resistance values at five to 
25 ohms in steps of five. This 
loop is nested to the first. 

Line 60 and line 70 then repeat 
our formulas. 

Line 60 tells the computer to 
t>egin the calculating, and prints 
the answers on the screen. 

Line 90 sends the computer 
back to the next value of re- 
sistance. This is most impor- 
tant. The computer was told to 
give E {voltage) a value, and then 
start working with the different 
values of R (resistance) as ap- 
plied to that first voltage value. 

Keep in mind that the re- 
sistance loop is the nested loop. 
It comes inside of the other 
loop. When the computer goes 



10 PRINT ■VOLTAGE' 

20 PRINT 

X FOR R = 1 TO 10 

40 E = 10 

50 I = E/n 

GO PRINT E.R.I 

70 NEXTR 

80 END 

RUN 



■ RESIST ANCE- ."CURRENT" 



Program Listing 1. 



10 PRINT ■■VOLTAGE"."RESISTANCE'',"CURRENr',"P0WEH" 

20 PRINT 

30 FOR R = 1 TO 10 

40 E = 10 

50 I = E/R 

55 P = E-| 

GO PRINT E,ai,P 

70 NEXTR 

80 END 

RUN 



Program Listing 2. 



10 PRINT ■■VOLTAGE"."RESISTANCE",-CURRENr'."POWER- 

30 PRINT -IN VOLTS .''IN OHMS ■."IN AMPERES","IN WATTS" 

X PRINT 

40 FOR E = 10 TO 100 STEP 10 

50 FOR R = 5 TO Z5 STEP 5 

60 I = E/R 

70 P = E-| 

80 PRINT E.R,I,P 

90 NEXTR 

1M NEXTE 

110 END 
RUN 



Program Listing 3. 




Pal »4 259 70^ 



DISK DRIVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 
ERRATIC OPERATION? 

Don't 

Blame The 
Software! 

Power Line Spikes. Surges & 

Hash could be the culpnl! 

Floppies, printers, memory & pfocessor often interact! Our 

patented ISOLATORS eliminate equipmenl interaction AND curb 

rtamaqing Powei Line Spikes, Surges and Hash 

• ISOLATOR (ISO-1) 3 (liter isolated 3-prong sockets: integral 
SuToe'SpIke Suppression; 1875 W Maximum load. 1 KW load any 
socket t6295 

• ISOLATOR (ISO 2) 2 tiller isolated 3prong socket banks; (6 
sockets total): integral Spike/Surge Suppression; 1675 W Max 
load. 1 KW either bank S62.9S 

• SUPER ISOLATOR (ISO 3). similar to ISO-1 except dout)le 
filtering & Suppression $94 95 

• ISOLATOR (ISO-4). similar to ISO-1 except unit has 6 
individually fillered sockets $106.95 

• SUPER ISOLATOR (ISO-1 1) similar lo ISO-2 except double 
filtering 4 Suppression $94.95 

• ClflCufT BREAKER, any model (add-CB) Add $ 8.00 

. CKT BRKR/SWITCH;PIL0T(-CBS) Add $16 00 

Master-Card. Visa, American Express 
Order To(l Free 1 80& 225-48 76 
(except AK, HI, PR & Canada) 



AT YOUR 
DEALERS 



/^^ Electronic Specialists. Inc. ^^ 

171 South Mam SirHl. N»uck Ma%% 01760 

Technical & Non-800: 1 617 655 1S32 



AT LAST! 

Mass procluclion prices lor high gvialily software Buy duecl and save 50 Alsrs 
available lor CPM and HDOS 

DATA BASE MANAGER Mod I & 111 S69. C1J9 l48Kl Mod ll S199 

Maintain a data base and produce reports, all without user programming Oetine 
tile parameters and report lormats on-line Key random access, fast mulli-key 
sort, (leld anlhmetics. audil log label No time-consuming overlays 500 happy 
user-s m one year Mod-ll and 48K versions have over 50 enhancements, including 
40 fields maximum "IDM-M? is greati" - 80-US 

A/R Mod-lS69 Mod-ll S149 Mod-Ill S69 

Handles invoices statements, aging sales analysis, credit checking, forms input, 
and order entry Unlike oilier accounts receivable programs, ours can be used by 
doctors, store managers, elc 

WORD PROCESSOR W9 

Centers |ustiiies indents and numbers pages Mod-I version (eatures 
upper/lower case without hardware modilication' File merge opiion available 

MAILING LIST Mod I & III S59 S79 i48Ki Mod-li S99 

The best' Compare and be selective includes lorms input 5-digit selection code 
/ipcode extension sort on any tield and mulliple labels Who elseotlersa report 
wnler and merges with word processor'' 

IMUENTDflY Mod I & III S89 S109 iJ8K' Mod II S149 

Fast key random access Reports include order into performance summary EOQ 

ana user-specified reports Many people riave converted to our system' Nest to 

impossible to damage the tile 

GL A/R. A/P. PAYROLL MoOH S129 each 

Integrated accounting pacl<age 100- page manual As opposed to Osborne s slow 

binary search and 64 column screen we use tasi ISAM an0 80columns Diialdisk 

and TPSDOS reguired 

L2I6 Sb9 

A cassette oaci<age ol 10 business programs lot Level II 15 K syslems Includes 

word processor and data base manager Poker game S19 

Most programs are online interactive random-access, bug-free documented 

and delivered on disks Modi programs ieouire32KTRSDOS We re "1 in business 

sotlware — don t let our low price fool you' Ask tor our tree 20-page catalog if 

you re slill not convinced Compiled versions are available 



E^ 



MICROARCHITECT. INC. ^54 

Dothan St., Arlington, MA 02174 



■ See Lisiot Advertisers on page 418 
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Word Processing? You need a 

SPELLING CHECKER 



This IS n txwli ot t Uxt biir« checke<l t» 
tCffiftLL, Tf» text scrolls i* the screw is it ii checkrt. »»n 
Vi error ii detected, yw have three ctntces. 

1) ISfiMX the incorrect word. The replxtncnt word 
IS INBTANTLir RE-OCCKS) for correctness, theri irnerted m the 
tert. 

2) The word is correct, leave it as it »• 

3) ler/c the word » it is, AND UU itKPVX to 
LEWtl this wrd for futwre reference, »ith fKt one keystroke. 

Your docjMTit IS re«d4 U print «s soon as ^CXSPCU 
IS finished. The word in error e.g- * 



HQRD n OSSJR: msstike 

COHTDWriDN : IS shmet in cantcA. including conttnuatian 

mss: R) (CFUCE hqrd s) lem as is l> lemw uoh) 



HexepeLL 

zaps those.snaeKy typos 

HEXSPELL lihow^ you tht.' unon. tiyhr wlieri; i1 tiiiJs Ihem, 
then instantly checks your coireclions to make suit; Ihey ARE 
correct* When HEXSPELL ts finished the corrected docu- 
ment IS ready tor printing HEXSPELL comes with a 20.000 
word list, with room tor 8000 morei Jusi one keystroke 
Itaches HEXSPELL a new word You can even clear Ihe 
memory and tuach HEXSPELL ;i complele new lanfiuiiy,- 
Programs, wordlitl t manual S69u& Manual only SI2. ^S^ 

ni^uu'>e«4HK ?«bi«M(i(ii •.in2(j>i«'« 'HSOOS 

li'MM sgarnat Stfliml » Etatl"!. PBncii, stmulit wn-* wiin fiKal woiiJ pip 



A^.HeXAGON 



PO. Box 397. Station A 
VtafKouver. BC Carwda V6C 2N2 
Telephone (604)682 7646 



through all of its values for R, it 
will proceed to its next instruc- 
tion (Line 100) to pick up tfie next 
value for E. 

It will then take the new value 
for E and solve the equation for 
all the changing values of re- 
sistance- 
Loop Format 

The format of a nested loop is 
critical, but simple. 

FOR A = X TO Y 
FOR B = n TO s 

NEXTB 
NEXT A 

You can also next more than 
one loop. For example, look at 
this form; 

FOR A = X TO Y 
FOR B = n TO S 
FOR C = W TO Z 
NEXTC 

NEXTB 
NEXT A 

It is a simple form to use, but 
if we don't follow it correctly we 
get an invalid nest. The form 
below might seem to be the 



same, but the computer won't 
follow it. 

FOB A = X TO Y 
FOR B = R TO S 
NEXT A 
NEXTB 

These loops are nested im- 
properly. Test them yourself. In 
a large program with many 
nested loops indenting our 
loops might help us avoid 
trouble. 

I used a minimal numt>er of 
calculations to make it easy to 
watch what was happening in 
the program. Now let's add a 
few changes to Listing 3 and 
show what the computer does 
with a great many calculations- 
Change line 50 to read For R 
= 10 to 100 Step 10 This cre- 
ates 200 calculations. Then 
make E = 2 to 100 Step 2 and R 
- 2 to 100 Step 2 for 5000 cal- 
culations. If you really have 
some time, make both E and R 
= 1 to 100 without the Step 
function for 20,000 calculations. 
Don't try these changes if you 
are running a printout There 
isn't that much computer paper 
in anyone's budget! ■ 



Z8 BASIC 
COMPUTER/CONTROLLER 




As featured in 
Byte Magazine, July and August ^98^ 

•On board liny BASIC Interpreter. 
•2 on board parallel ports. 

• Serial I/O port 

• 6 interrupts 

• Just attach a CRT terminal and 
immediately write control programs 
in BASIC. 

•BAUD RATES 1 10-9600 BPS 

• Data and address buses available for 
124K memory and I/O expansion. 

• 4K RAM, 2716 or 2732 EPROM 
operation. 

•Consumes only 1 'i WATTS 
Z8 Basic Microcomputer/Controller 

Assembled & Tested $195.00 

Complete Kit $165.00 

Universal Power Supply 

(+5, +12,&-12v) $ 35.00 

Z8 IS a iraflemark ol Zilog Inc 



SWEET-TALKER. 
IT GIVES YOUR COMPUTER 

AN UNLIMITED VOCABULARY. 




As Featuied In 
Byte Magazine, September 1981 

•Utilizes VORTRAX SC-OIA speech 

synlhesizerchip, 
•Unlimited vocabulary, 
•Contains 64 different phonemes 

which are accessed by an 8-bit code. 
•Text IS automatically Iranslated into 

electrically synthesized speech 
•Parallel port driven or 

Plug-in compatible with APPLE II. 
•On board audio amplifier. 
•Sample Program tor APPLE II on 

cassette 
SWEET-TALKER 
Assembled and Tested 

Parallel Port Circuit Card $139 

APPLE II Plug-in Card $149 

VORTRAX IS a iraOemark o( FeOeral Screw Works 



To Order: Call Toll Free ■ 1-800-645-3479 
(In N.Y. State Call: 1-516-374-6793) 
For Information Call: 1-516-374-6793 



DISK-80 

EXPANSION INTERFACE 

FOR THE 

TRS-80 MODEL I 




As Featured In 
Byte Magazine, March 1981 

• Disk controller (4 drive^) 

• Hardware data separator 
•Buffered TRS-bus connector 

• Real-time dock 

• Prmter port (optional) 

DISK 80-ASSEMBLEO & TESTED 

with 32K RAM $329.95 

Centronics Printer 

Port add S 50.00 

DISK-80 pc board $ 48.00 

Printer/Power Supply 

pc board $ 16.00 

Complete Kit with 32K 

RAM and Printer Port $275.00 

TRS'80 IS Irademark ol Tandy Coip. 



MICROMINTINC. 
917 Midway 
Woodmere, N.Y. 11598 
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NOW AVAILABLE FOR THE TRS-BO 

THE nnST COMPUTE SIZED CHURCH HECORD SYSTEM 
AT AN AFFORDABiE PBICE FOH YOUB CHURCH 

OEVELOPEO EXCLUSIVELY FOR CHURCHES TO. 



MECOHD WEEKK 

CONTKIBUTIOHS 
PKf P4flE mOIVIDUAi 

r»> STATtmCHTS 
PKCPtKl PI KIOOIC 

SUMMAnifS 

Of INCOME 



■ M4INTit/M PCRSOHAI. mCOKDS 

• PMB<BE TfPED OOCUMEWrS 

• kiAinXAm im/iNJonics 

■ PRIMTW4ILING LAtlLS 

• Ni)INr:)IH GENERiL lEOGER 
4ND MUCM ktORE 

Give us ine special requiremenis *o: your 
clurcfi We will seoO you delaileO mtormalion 
and a *riiten quote tor a complete system 
custom designed tor your ctiu'cfi Complele 
system tor J5000-$8000 wilh soH*are, instruc- 
tions & ne* Radio Shack equipment 

OTHEft PROVEN BEST SELLERS FROM MTS. INC. 
OEYELOPEO BY OB. S.W TURNER 
FOR STUDENTS AND ENGINEERS 

LrU HVh IT Determmes coefl'cienls lor 
all polynomials up to i*th degree througii 
large no of data points (limited by memory 
size) Data points may De input in any order 
Piogtam tabulates correlation coefdcients 
lo' selection of best fit 

CUHVPLOT Rapidly plots nearly any 
user defined function User controls range ot X 
& Y and program labels both a>es 

jL/L ToLfLv Solves any polynommal 
ol any degree for all roots, including real and 
imaginary Program uses iterative procedures 
*nict^ automatically vary starting point to nan 
die any equation 

ANY OF ABOVE PROGRAMS ON: 

CHHItI to. IS" LWIi l«»i' I lor »n 

'Q<n>ttiK 3,u lo' U> UK il.m '9 tV! Is' 17 H 

BONUS PACKAGE .n i-.» ",,-r. p,c 



MT»<7 iJilk 



39 00 
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This graph was produced wilh less than two 
dozen keystrokes on a TRS-80 Model I with 
EPSON MX-BO printer plus GHAFTRAX 

VOU CAN DO IT TOO WtTH AUTOPLOT. the 
sensational automatic cufve plotter nvntten in 
BASIC ■ fast machine language 

Plot functions y"f<ii). «-'(¥), or K=f(v]. ¥^3(*) 
Plot data from keyboard or drsk file 
Linear or logarithmic presentation 
Numeric integration or ditferentialion 
Automatic scaling and labelling of axes 
4 different print sizes and formats 
Many more features 

AUTOPLOT lor TBS-80 

(Model I or III with AS*. 1 disk drive) 

on disk witn 40 page manual S79 50 

AUTOPLOT tot LNW-BO 

('Hi-fles video graphics) S99 50 

CA residents add &\ sales tax 

Phont? orders VISA and MAST FRCARD welcome 

MENLO SYSTEMS 

3^90 El Cajnino Real, Suite 221 
Palo Alto. CA 94306. Tel (415) 327-7424 

■"BS-BO TM of Iinay CtKO M«-«C ORAFTHAl IH ut EfiOMnc 

^262 



HARD DISK FOR 

TRS-80* 
MODELS I & III 

The PSM-W5 

FEATURES: 

•Seagate ST506 5 25" drive 
•5.0 Megabytes formatted 
capacity 
■Full block buffering 
•Winchester controller 
■Error accommodation 
■OEM-style packaging 

PRICING: 

PSM-W5 (open frame) $2300 

Additional 5MB drive 1500 

Multiuser interface 500 

Cabinet 250 

LDOS operating system 149 

for more into contact: 



PSIM 



fKOfirannnwiy 
and s\¥*^ms 
nianc^Hemt'iitux- 



P.O. Box 1877 
Kettering. OH 45429 

(513) 426-8644 
■TRS-aO IS a trademark of Tandy Co 



Introducing 




MAYDAY»+ 



dy Co J 



Mayday 



tromaa* 




%A^ 



60 Cycle 

Sine Wave 
U.P.S. 

(Uninlerruplibe Power Supply) 

• ••••••for those systems that 

need 60 cycle sine 
wave keeps computer & 
disk systems on when 
the power goes out 

• ••••••rated for 150, 250 and 

600 watts continuous 
operation * 

• ••••••provides up to 30 min- 

ute operation time for 
Model II TRS80with4 
disk drives 

• Standard MAYDAYS available 
starting at $195.00 for 150 Watt 



Box 210 New Durtiam, NH 03855 
(603)859-7110 TWX 510-297-4444 



^Smm LiatotA^vanisen onpBg»41B 
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GENERAL 



A real-life account of a man, a boy and 

the computer that changed their lives forever. 



Lenny's Story 



David D. Busch 
515 E. Highland Ave. 
Ravenna. Ohio 44266 



Once upon a time there was 
a software connoisseur 
and TRS-80 owner named Len 
who had 60 disks full of pro- 
grams. Well, almost full. Ac- 
tually, because he owned just 
one 35-track disk drive, each 
disk was partially occupied by 
System files that hogged a lot 
of space. 

Len was smart enough to be 
using a DOS that allowed Kill- 
ing unwanted System modules. 
so he was able to eke out 50 
free grans on every disk. More 
than 500 programs of every 
description were crammed on- 
to those 60 disks. 

Then Len purchased his sec- 
ond disk drive, and converted 
a\l t^is programs to data disks. 
The new configuration pro- 
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vided room for nearly 90,000 
bytes of data per disk— 67 
grans— and pared his disk 
count down to 44 jam-packed 
5%-inch segments. Not only 
did Len feel as if he had been 
given 16 disks for free, he found 
it a lot easier to access pro- 
grams on the smaller number of 
disks. There was a great deal 
more room to group like pro- 
grams together. 

DIscoveftes 

Less than a week later, Len 
made two discoveries. The first 
was NEWDOS 80, which al- 
lowed him to access up to 44 
tracks on twth his disk drives. 
He then found that by punching 
extra holes in the disk jackets, 
he could use both sides of the 
disk. 

The results were impressive. 
A 44-track, two-sided disk could 
hold 225.000 bytes, and Len 
was able to put every program 
he owned onto just 17 disks. 
This latest progess inspired 
him to do further research. 
Within a few weeks he had pur- 
chased a double-density disk 
controller and converted his 
programs to 10 disks, each with 
a capacity of 405,000 bytes. 

But Len wasn't satisfied. He 
found a friend who was in the 
market lor disk drives, and sold 



him the 44-track drives. Len im- 
mediately purchased four 
BO-track drives rated for double 
density operation. Using both 
sides of the disk, he found he 
could fit more than 700,000 
bytes of data into the double- 
density sectors. With some pru- 
dent Basic program packing 
and discarding some useless 
software, Len reduced his disk 
library down to five. Each was 
so packed with data that Len 
had to use two hands to insert 
them in the 80-track drives. 

At last he was happy. Len 
knew he could never afford a 
hard disk drive for his TRS-80, 
but felt his current configura- 
tion was the next best thing. 
The NEWDOS 80 system disk in 
drive zero had every utility 
available for the TRS-80 some- 
where within its sectors. With 
three of his five data disks per- 
manently stashed in drives one, 
two, and three, he sometimes 
went for two or three weeks 
without having to swap or flip 
disks. It was great. 

The Accident 

Then the accident happened. 
Len was making one of his bi- 
monthly disk swaps when his 
oldest child came racing into 
the den, shrieking like a ban- 
shee. 



"Michael hit me!" the 10-year 
old wailed a few inches from 
Len's ear. But Len Ignored the 
plea. HIseyes were riveted on the 
floor. His rotten kid was stand- 
ing on the disk which Len had 
dropped when startled by the 
cries. It was folded in half, and 
slightly crumpled, and Len 
knew in his heart that this par- 
ticular disk would never revolve 
again. 

Newspaper accounts of the 
event reveal that after running 
amok through seven neighbor- 
ing backyards, Len was cap- 
tured and taken, incoherent, to 
the police station, allowed to 
cool off, and released a few 
hours later without being 
charged. All his lamentation 
failed to bring the injured disk 
back to life. 

Today, Len is a well-adjusted 
computerist, although he is 
back to 60 disks full of pro- 
grams. Still dedicated to 
60-track double density, dual- 
sided operation, he keeps his 
five diskettes available for 
everyday use, and 12 backups 
of each stored in safety deposit 
boxes around town. 

Moral: Less is more. Those 
with fewer disks usually have 
more need for a backup than 
those with many, for they have 
a great deal more to lose. ■ 



Years of conquering, years 
of victory and \A/hat do 
people remember Napoleon 
for? Waterloo. You've got to 
have. . . 

STRATEGY 

It's an acquired skill. And 
now, Instant Software has 
three programs to help you 
sharpen your tactical 
thinking. Don't make the 
same mistal<e Napoleon 
made — practice first, with 
Instant Software. 



"NOW they tell me." 

/.■■■ 




OIL TYCOON 

Whai wouid it be like to be one of the world's biggest oil pro- 
ducers? You and your friends can find out with this actlon- 
packctl simulation as you compete to become one of the oil 
industry s wealthiest tycoons 

The game involves elements of both strategy and chance. 
Whether you wind up as one of the world's wealthiest men. or 
the bankrupt victim of too many oil spills, blowouts, and dry 
wells, you're sure to fmd Oil Tycoon both challenging and 
exciting. TRS-80 Model i and III Level II. 1 6K RAM. 
0023R-A66TltS-SO* tape $9.95 piv^i n so stiipp.n^ 

MASTER REVERSI 

Master Reversi is a tournament-winning game program that 
has more features than any other reversi program on the market 
It will challenge and teach you no matter what your degree of ex- 
pertise 

What makes Master Reversi really special is its ability to allow 
in-depth analysis of moves and games You may examine the 
computer s evaluation and choice of moves You can save and 
replay interesting moves and games You will be able lo study 
and manipulate dozens of tournament-level games which are 
provided in the programs vast library. 

Master Reversi will enable you to overcame any barriers 
standing between you and a world championship Model I, Level 
II, 1 bK, expansion interface, I disk drive. Not Mod III compatible, 
037SRD'A67 TRS-SO* Dhk )29.95 ptu.s2 so ^hppng 

SANTA PARAVIA AND nUMACCIO 

The year is A.D. I 400. and you are the ruler of a tiny Italian 
city-state You are ambitious by nature and intend to build yout 
little city-state into a powerful kingdom 

So begins Santa Paravia and Fiumaccio, where you and your 
fellow players compete as rulers of neighboring cities You con- 
trol the grain harvest, feed your people, set tax rales, exercise 
justice, and invest in public works 

Life was short back then, and you'll have only a limited 
amount of time in which to build your kingdom. The lives of your 
serfs wiil depend on your decisions. If they are wise, then your 
city-state will grow and you will acquire loftier titles If your rule 
is incompetent, your people will starve and your city-state may 
be invaded by your neighbors. 

How will you rule your kingdom? Will you become 
unscrupulous and (oilow the examples set by Niccoio 
Machiavelli in his book on government. The Prince — or will you 
be a benevolent ruler— an iron fist in a velvet glove? Only you 
can answer that question — with the Santa Paravia and Fiumaccio 
program 

Level 1 &. 11, 16K 0O43R-A68 TRS-80* tape $9.95. 
Applesoft in ROM. 48K 01 74A-A69 Apple tape $9.95. 
Applesoft in ROM, 48K 0229 AD- A70 Apple" dbk $I9.9S. 
Tl 99 4. I bK 0273TI-A7 1 Texas Instruments tape $9.95. 



Our Guarantee 

Defective sollware may t>e retufneO 'or 
exact replacemenl at no cost lo you, or for 
full credit, wittiin thirty days ot trie irmoice 
date You MUST enclose dated proof of pur 
cfiase for any replacement to tw maae, so 
please keep your invoice 

Sriould a dish or cassette become defec- 
tive alter lf>e *arranty period. Instant Sod- 
*afe will still protect you You may return 
the delBclrve cassette alonfl witri 1* 00. Of 
any disk with SS 00 tor a replacemenl 
Again, you must provide us Willi a copy of 
your invoice for any return lo t>e made 



Instant Software 



TO ORDER: 

See your local 

Instant Software dealer 

or call toll-tree 

1-800-258-5473 

orders only 

In New Hampshire 
1-603-924-7296 

Mon -Fri 6 00am-4.30 pm E S T 




Peterborough, N.H. 03458 



A division of Wayne Green inc. 



'TRS-80 is a trademark of Radio Shack division ot 

Tandy Corp 

""Apple rs a trademark o1 Apple Computer Co 



''Se« Uil at Advertisers on page 4 18 
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APPLICATION 



A calendar program for all you moon-eyed 80 owners. 



Sheer Lunacy 



Alan Harris 

6 Birchwood Court 

Aurora. IL 60538 



The following calendar pro- 
gram offers you a graphic 
representation of the moon for 
centuries past and centuries to 
come. 

The program finds dates and 
days of the week from as early 
as January 1, 100 A.D. and will 
project the same well into the 
future. The program uses to- 
day's calendar system, extend- 
ing its calculations backward 
and forward from the present. 
{In the eighteenth century cal- 
endars were revised, resulting 
in some panic over the loss of 
several days.) 

It takes Into account all the 
leap years, on the following 
schedule: every year that is 
evenly divisible by four {exam- 
ple: 1904) is a leap year except 
those evenly divisible by 
100. For example. 1900 is not a 
leap year. 
However, every year evenly 



divisible by 400 (example: 2000) 
/5 a leap year. 

Flva Opttf>na 

The program gives the user a 
mwiu of five options. 

• You can display a calendar 
lor any month. The computer 
combines numbers and graph- 
ics to create an accurate wail- 
type calendar, with the correct 
number of days In the month 
(inctuding February). 

■ Given any two dates, the 
computer can calculate exactly 
how many days there are be- 
tween them, allowing for any in- 
tervening leap years. 

• It can tell you what day of 
the week any date you give it oc- 
curred or will occur on. 

• Given any date, and then a 
positive or negative number of 
days to add to it, the program 
will display the resulting date, 
again allowing for leap years. 

• It tells you how many days 
past a new moon any date you 
enter was or will be, using noon 
of that day as a reference point. 
This is accurate to within a few 
hours. It Is Inaccurate only 
because of the elliptical orbit of 
the moon. The moon's cycle Is 
figured at 29.530567963 days. 

Further, the menu offers you a 
key that shows you a graphic 



VartBbI* 

APO): 



D»<7): 

MS(12): 

GR(24): 

A; 
AS: 
C: 
D: 

F: 

J 

K; 

L; 

M: 

N: 

NO: 

NM: 

►4Y: 

Q: 

S: 

V: 

W: 

X: 

Y: 

Z: 

R1: 

Ml: 

XS: 

RY: 

FW: 

M1*: 

MD: 

MH: 

MM: 

01t: 

Rir 

Zl: 
Z2: 
Z3: 



Ftomarli 

A(1)-A{12) contkln th« normal l«ogths ot each of the months 
A^^)-A^4Z| (lalar) contain t^fl day numtwrs of t^ calendar Oisptay (6 

possible rows of 7 days sacfi) 

Contains tfta nairws of Iha 7 days of th« week 

Containa tha names of the 12 months. 

Table ol numbers of width ot eac^ oraphics llr>e m drawing a full 

moon. 

Day number of first date (from day 0), than difference. 

Used In INKEYS to break out of calendar display 

Day of week (SuFKlay = 1) 

Day of month 

Absohjta day number (from day 0) 

Subscript used in printing calendar array. 

TM Y coordinate, used In setting the calendar s vertical lines 

Lengtti of month (In days) 

Month numtwr (January = 1) 

Number ot days lo be added to the first date 

New day 

New month 

New year 

The Y coordinate, used in setting the calendar s horizontal imes. 

(a) A counter used In setting up the calendar array 

(b) Subscript tor new rTwnth 
Choice number from the menu 

The X coordinate, used in selling (he calendar's vertical lines. 

Utility variable 

Year 

The X coordinate, used In setting the calerKlar's horizontal lines. 

Single-precision number ot days into moon's cycle 

single-precision length of moon's cycle 

Used to INKEYS a response on whether to display moon. 

Counter used as subscnpt for GRO and Y coordinate for selling 

graphics points. 

X coordlrwte for setting moon display graphics poinis 

Moon's period of revolution In days (lo several decimal places) 

Days past new rrwon 

Hours past MD 

Minutes past MH 

Number of moon periods since rK>on on day □. 

Work variable tor days, boors ar>d minutes past r>ew moon 

Temporary variable used In calculating new year. 

Ditto 

Ditto 

Table 1. Program Variables 
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display of the moon's phase on 
any date. Another option lets 
you see how the moon will look 
from one to nine days later, with- 



out requiring a new date. 

Table 1 lists the variables I 
used and Table 2 breaks down 
the program into sections.H 



LlHM 


RwnarkB 


10-40 


initlaHie. display instructions and menu; 0° 'o one ot live possi- 




ble subroutines. 


45-120 


Dilterence between dates, main routine 


200- 2X 


Day ot «eek main routine 


400-895 


Calendar display main routine 


1000-1030 


Input month, day and year, and validate each. Vear can be input 




as two Olfllts i( in the 1900s. 


1500-1520 


Input month and year, and validate each. 


2000-2040 


Calculate absolute day number trom month, day and year. 


3000-3020 


Calculate day of week (rom absolute day number. 


3600-3690 


New dale main routine 


3800-3840 


Data statements tor arrays 


3850-3880 


Read data statements into arrays. 


4000-4230 


Arrive at month, day, year from absolute day number. 


5000-5100 


Print instructions. 


9000-9230 


Calculate age of moon (number ol days past new moon) ot a 




given dale. 


9230-9580 


Display a graphics representation ol the moon on thai date. 




Table 2. Program Sections by Lines 



Program Listing 1. Date Handler and Moon Display 

IB REM ' CALENDAR PROGRAM * 

11 CLEAR 150 

12 CLS 

15 DIM AI50) ,DS(7) ,MS112) ,GR(241 

i« cosuB seefliGosuB izte 

29 PHINTiPRINT "TYPE NODE: l^CALENDAR, 2-DAYS BETWEEN, 3-DAY OF 

WEEK,- 

25 INPUT ■ 4-NEW DATE, 5-HOON'S AGE";V 

3B IF V<1 OR V>5 GOTO 2B 

4B ON V GOTO 400,45,289,3600,9888 

45 PRINT "FIRST DATE" 

50 GOSUB 1B00 

68 GOSUB 2800 

7 8 A-F 

B0 PRINT "SECOND DATE" 

90 GOSUB 18 00 

100 G05UB 2000 

110 A-F-A 

129 PRINT "DIFFERENCE IS" ; Aj "DAYS" :GOTO 20 

288 GOSUB 1888 

218 GOSUB 2880 

220 GOSUB 38B0 

230 PRINT DS[C):GOTO 20 

400 GOSUB 1500 

410 D"l Program continues 



Program contmued 

428 GOSUB 2000 

438 GOSUB 3000 

490 L-A(H) 

58fl IF M02 GOTO 550 

518 IF IMT(V/4)<>V/4 THEN L-28:GOTO 551 

528 IF INT(Y/4B0)-Y/400 THEN 540 

538 IF INT(¥/Ifl0)-Y/1B0 THEN L-28!GOTO 550 

54B L-29 

550 FOR X-B TO C-liA(X) -B:NEXT X 

560 S-B 

570 FOR X-C TO CtL-liS-S*! : A(X) -S :NEXT X 

580 FOB X-C+L TO 42; A[X) -0 :NEXT X 

590 CLS 

G0B PRINT TAB(14) ,H$(H) ;¥ 

740 PRINT 

758 PRINT TAB(3) "SUN MON TUE WED THU FRI SAT" 

760 FOR J-0 TO 35 STEP 7 

7 70 PRINT 

788 PRINT TABOl AlJ + 1) ;TAB( 9) A( J*2) j TAB! 15] A IJt 3) ; 

7 98 PRINT TAB1211 AlJt4) ;TAB( 27) A(J + 51 jTABl 33] A[ J + 6) j TAB[ 39) A(J + 7 

) 

800 NEXT J 

810 FOR Q-4 TO 46 STEP 6 

820 FOR Z=2 TO 87 : SET! Z ,Q) :NEXT:NBXT 

84B FOR W.2 TO 86 STEP 12 

858 FOR K-4 TO 46 

868 SET (W,K) iSET (W+1,K) 

878 NEXT:NEXT 

898 AS-INKEYS;IF AS-""GOTO 898 

895 HUN 

1800 INPUT ■MONTK";M:lF M<1 OR M>12 GOTO 1800 

1010 INPUT "DAY";D:IF D<1 OR [D>29 AND M-2) OR (D>31 AND M02) G 

OTO 1010 

1028 INPUT "YEAR"jY:IF Y<i00 THEN ¥-¥+1900 

1038 RETURN 

1588 INPUT "MONTH'jMiIF M<1 OR M>12 GOTO 1500 

1518 INPUT "YEAR";YiIF Y<1B8 THEN Y=Y+190e 

1520 RETURN 

2000 IF M>2 GOTO 2030 

2010 F-36 5«Y+D*31»1M-1)*INT( 1 Y-11 /41 -INT ( . 75' ( INT( ( (Y-1)/1B0) +1] 

)) 

2028 GOTO 2840 

2830 F = 36 5*YtD*31'lM-ll-INTl,4*M*2.3)+INTlY/4)-INT( . 7 5- ( 1KT( Y/10 

81*111 

2 8 48 RETURN 

3888 C-F-t(INT(F/7) •-?) 

3B10 IF C-a THEN C-7 

3020 RETURN 

3600 PRINT "FIRST DATE' 

361B GOSUB 18BB 

3620 GOSUB 2888 

3630 INPUT "NUMBER OF DAYS TO ADD (MAY BE -f OR -)"!N 

3640 A>F<N 

3658 IF A<1 PRINT "UNABLE TO HANDLE B.C. DATES":GOTO 28 

3660 GOSUB 4000 

3670 F-F+N:GOSUB 3000 

3680 PRINT "NEW DATE IS ";D$(C);", " ; MS |NM1 ; STBS (ND) ; " , " ;NY 

3690 GOTO 20 

3808 DATA 31,28,31,30,31,30,31,31,38,31.30,31 

3810 DATA SUNDAY, MONDAY, TUESDAY, WEDNESDAY, THURSDAY 

3820 DATA FRIDAY , SATURDAY 

3830 DATA JANL'ARY, FEBRUARY, MARCH, APRIL, MAY, JUNE, JULY 

3840 DATA AUGUST, SEPTEMBER, OCTOBER, NOVEMBER, DECEMBER 

3 843 DATA 16,24,30,34,37,40,43,46,48,50,52,53,54,55,56,57,57,58, 
38,59,59,60,60,60 

3650 FOR X-1 TO 12;READ AlXl :NEXT 
3660 FOP X = l TO TtBKAD DSIXItIiEXT 



Program continues 
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I l",ill«il!'ilMH;illl».flffil i 
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T e SINGLE SIDE N 

R DOUBLE DENSITY eoiMlOi«teO e 

§ 8 DOUBLE SIDE R 

8 DOUBLE DCMSITV toioflOfcM i70 A 

S'l'MtHI Be. or 10 (w 180 ^ 

, DVSAir DISKS I 

g 9'^." MINI eo. o< S 10' 129 M 
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coo 1100 Addilionai 



I (^0LUom^tuinatUeA 



"U 



238 EXCHANGE STREET 
CHICOPEE, MA. 01013 

413-592*761 

MtaMltlwcl 1MO . cloMd mandayi 
I ATARI^MHB^HTI.aS 4Hai^^H 







dlirli!:EKlii:i;| 
■m\it wiiMil 
3i|]:p^:i:i:i:' 



HI|iP;'i:i:JP;|:M| 



Turn trw tlt>lv> un aiini^lL 
%mt an convjmir^ tt>« Qotoblt^' 
enonier wiltvn by tn« Author ot M.L I 
IMMWFRS >oli) by BBI. mill levEls Ir 
twqlniwr to aupcrt. MtIIIvk in •DChl 

vdtronal (ound to MM to tt>« Hcit*aa 
at 9iAb1 



'X' 



■ tarm. 



QOttbl inQ b4tgi 



nOOEL I fc 3 IAPE-*lfi.<n 01Si.-alV.V3 




'^UPERiOR 
•■ OFTWARE 



rrv 



HlSSOum KftlMNti 
FlIASE AM 



HI fci Inrorailltn «t>ou 



™TRS80 color 

Frc-m the January '961 ssue ot tde CbHA CoTVule' 
Cljt) npwsletlef 

Th«e was some a^iusemept a1 rhe Novem- 
Ber rnoellog i**ie'i ihe RaOiO Snart 'epre- 
seriiaiives staled Ihal me soTware in me^ 
F*OM cartiiOg*s could not M cooiM This 
-nonih s 68 lAcfO Journal ruponed ffiey t\aa 
disassem[}l«d ttt* praswm o<i ROM by 
ccFvenrtg sonw ol tM coniwctar pmB Mth 
i^>e Ttity pi a wm a Wi li n wt monti. H p»« 
tell a noMyW MoMNnQ am M dOMl This 
•nagaz>r)e aaoms » M tM omy num M to 
o( te<^nicai 'frfonnalon* on ffMTR&40 color 
computei ' DvvoWd to 8S>S0 MOO and 
6809 rnatfWnes up to now. SB Micro Journal 
plans 10 include Ifie THS 80 6809 unit in 
luiure issues _ 

V N^^V, 



To gal Ihe MOST trom ^our 6809 CPU - This U »iB 
BEST SOURCE' The ONLV Maaazin« let the 8809 

Compulor Montns AfioaO n* Al Otners' 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 
Hixson. TN 37343 
us« 

I 1-1 -JIB 50 JVi-iMM 3¥. .t48M 
■faagr, Surfaca AOd |tl Yr lo US* P™:a 
i.™.w,,.«,.MW*lM WSYl loUS* ""(» 



^Sm List ol AtJvwtisvrs on psg»41B 
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LOAD 
80 

LOADS 
EASY 



(WmS) 



LOAD 80 



ELIMINATE HOURS OF 
TYPING AND 
AGGRAVATION 




In the April, 1981 issue of 80 Microcomput ing, we 
introduced LOAD 80 to save you the time and trouble of 
typing our programs yourself. LOAD 80 cassette tapes 
contain dumps of the major program listings in 80 
Microcomputing . 

If you have not yet ordered any LOAD 80 tapes and 
wish you had, don't worry. We are now offering a "back 
issue" cassette program. You can order any LOAD 80 
cassette from April, 1981 to date for $9.95. Back issues 
of 80 Microcomputing are also available with the LOAD 
80 cassettes for $3.50. With the complete documenta- 
tion found in the companion magazine issue, you 
should have no difficulty loading any of 80's major 
programs. 



Please send me the following: 

month year 
Tapes Magazines 



month year 



ITEM 


COST 


QTY. 


TOTAL 


LOAD 80 Tapes 
overseas, add S1 00 


$9 95 






BO MicrocoiTipulina 
add S1 00 per magazine for postage and 
fiandting if ordeiing magazines 


$3.50 








T 


OTAL 





Check Enclosed Bill my: G MC L] AE [ ! VISA 



NAME 

ADDRESS 
CITY 



STATE_ 



CARD# 

SIGNATURE 



ZIP. 

EXP. DATE 



INTERBANK#_ 



Please allow 4-6 weeks for dallvefy 

LOAD 80 • 80 Pine Strwl • Peterborough NM 03458 

Attn DeDra Boudrieau 



Program confnuM 

3fl7i FOn X-: TO 12:REM) MS1X)!NEXT 

3872 FOR X-: TO KiREW) GRIX1:NEXT 

3 see RETURN 

4fllli tfi-i-.lf A066 THEN NY = -1:G0T0 4190 

4005 A>A~365 

4IIB IF fc>l«6H97 THEN A'*-l«6097 : NY^SY4-400 : COTG iai0 

4B2B Z1>B 

4038 IF Z1-3SB GOTO 4B^a 

4348 IF A>3e524 THEN II -Zl tlBB : A-A-36524 : r.OTO 4338 

4051 KV-HY*I1 

4161 Z2-0 

4B7B IF Z2-96 SOTO 4B9B 

4BSe IF A>H61 THEN Z2-7.2'4 :A"A-H61 :GOTO 4879 

4B99 NY'NYtZ2 

4108 Z3-B 

41ia IF 73=3 GOTO 413B 

412B IF A>365 THEN Z3-Z3 + 1. : A-A-3fi'i : GOTO 4118 

4111 Ny-N¥*Z3 

4J48 IF I3':3 GOTO 419B 

415B IF Z2<96 GOTO 41SB 

4168 IF Z1-3BB GOTO 4180 

4178 GOTO 4198 

41BB A(2).29iCOTO 4200 

419B AI21^2S 

42BI S-1 

4218 IF A>A(S) THEN A-A-A IS) : S-S*l :GOTO 4211 

4228 NH-S:ND-A:H¥-H¥4^1 

423 B RETURN 

B8BB PRINT TAB(141 "CALENDAR AND OATE PROGRAR* 

581B PRINT TAB(191 'BY ALAK HARRIS' 

5B2B PRINT 

5038 PRINT "THIS PROCRAK DOES AMY OF THE FOLLOWISC:' 

5048 PRIST "1, GIVEN A HOKTH AND YEAR, DISPLAY ITS CALENDAR." 

5BSB PRINT "2. GIVEN TWO DATES, FIND THE NUMBER OF iJAVS HRThFEN 

THEM." 
S86B PRINT "3. 
5878 PRINT "4. 
5B75 PRINT " 
5B77 PRINT "5. 
T QA¥." 

5888 PRINT "NOTE: 
TES." 
589B PRINT "YOt' MAY OMIT FIRST 2 DIGITS OF YEARS IN THIS CENTVRY 



GIVEN A DATE, FIND ITS DAY OF THE WEEK." 

GIVEN A DATE AND AN INCREMENT, FIND NEW DATE." 

EXAMPLE: 2/28/72 -t 2 DAYS - 3/01/72" 

GIVEN A DATE, FIND THE MOON'S AGE AT NOON ON THA 

PRESENT CALENDAR SYSTEM IS ASSUnED FOR ALL DA 



5181 
9BBfl 
9B1B 

9828 

9838 

9848 

9858 

98 5 5 

9868 

9878 

9BSB 

9B9B 

91IB 

911B 

912B 

9138 

9148 

9158 

9155 

9168 

917fl 

91 BB 

9198 

92B8 

9218 

9228 

923B 

NISE 

924B 

9258 

9268 

927B 

9280 

929B 

9388 

P -1 

931B 

932B 

9338 

914B 

9358 

9368 

P -1 

9378 

91BB 

939B 

9488 

9418 

9428 

9438 

1 

9448 

9450 

9468 

9478 

9488 

9498 

1 

958B 

9510 

9528 

9538 

9532 

9533 

953S 

9548 

9558 

9568 

95S8 



PRINT:RETUHN 

GOSUB 1088 

GOSUB 2888 

GOSUB 3808 

nit-29. 530587963 

Oil- (F-21. 88431398883912) /Hit 

Rll-(01l-INT(Qlt) ) 'Mil 

ni-Rll:Hl-Mll 

KD-INT(Hll) 

Rll-RH-INTlRll) 

R1I^R1I*24 

MH.IHT(R1I1 

Rlt-Rll-INT<RII) 

Rlt-Rll*68 

nH-INTlRl»l 

MM^HH-18 

IF HH<8 THEN HH-HH-l iHM-KM t-tB 

IF MH<e THEN MD-KD-l ■.KH=MH + 24 

IF HD<B THEN KD-29 

CLS:PHINT"AT NOON ON ";DS(C1 ; ", ";«$(«) jSTRSlD) j'.'jY 

PHINT"THE AGE OF THE MOON IS" ;ND,- "DAY " ; 

IF MDOl PRINT"S"; 

PRINT" ," ;MH; "HOUR" ; 

IF MHOl PRINT"S" 1 

PRINT",-[Wi;*NINUTE*! 

IF MM->1 THEN PRINT'S" ELSE PRINT 

PRINT: PRINT"TO SEE A PICTURE OF THIS MOON, TYPE AN X; OTHER 

TYPE A Y." 

XS=INKEYS:IF XS-'"GOTO 9248 

IF X$<>"X" GOTO 20 

CLS 

IF Rl>Hl/2 GOTO 9418 

FOR BY-1 TO 24 

IF INT(Rl/lMl/2) 'GRIRY) •21 -8 GOTO 9338 

FOR RX-62tGfttRY) TO 62*GR IRYl -INTl Rl/ (Ml/2| 'GB ( PY) "2) tl STE 

SET1RX,RY-1) 

NEXT 

NEXT RY 

FOR HY-24 TO 1 STEP -1 

IF INT(Hl/(Ml/2) ■CR1HY)"2)-B GOTO 9398 

FOR RX-62-.GH(RY) TO 62+GH ( RY) -I NT [ Rl/ (Ml/2) "GR IRV) '2} -tl STE 

SET(RX,48-RY) 

NEXT 

NEXT RY 

GOTO 9 53 8 

FOR RY-1 TO 24 

IF INT( [M1-B1)/(M1/2)'GH(RY) *2)=8 THEN 9460 

FOR RX-fi3-GB!RY; TO 6 3-GBt RYl »INT ( {Hl-Rl 1 / (Ml/21 •GH( RY) • 21 - 

SETiRX,HY-l) 

NEXT 

NEXT RY 

FOR RY-24 TO 1 STEP -1 

IF INTl (M1-R1)/(M1/21 •GR(fiY] '21 =B THEN 9529 

FOR RX-63-CR1HY) TO 63-GR (BY) . IKT( (Ml -Rl ) / (Ml/2 1 'GR ( RY) • 2) - 

SET (RX,4e-RYl 

NEXT 

NEXT RY 

PRINTS8,"EXIT-X"! 

PRINT864,"ADVANCE-I-9"; 

PRINTP12B,"DAYS"| 

XS-IHKEYSilF XS-"" THEN 9538 

IF X$<"1" OR XS>"9" THEN RUN 

Bl-RltVAL(XS) 

IF R1>H1 THEN Rl'Rl-Ml 

GOTO 926 8 
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SICK 



OF PROGRAMS THAT TREAT YOU LIKE 
AN IDIOT, WASTING TIME & MONEY?' 

RANDOM ACCESS PAYROLL VER. 1.1 

• No complicaied imliaiiialion 

• EDITi LIST 

• NO SPECIAL CHECKS 

• USES NEB 9020 cfwcks 

• PAY any employee anylime 

• SALARIED or hourly 

• SPECIAL PAY-special hours 

• TWO SAVINGS — including RIA 

• CLASSED by occupation o' dept 

• PAYSTUH shows Year lo-Date 

• STATE-FICA — FED TAXES- SAVINGS 

SEND YOUR STATE TAX SCHEDULE- 
FREE— cuatomizad to your statfl tax 

Ddcu mental ion JIO 00 
Disk S Oocumenration S95 00 

RANDOM ACCESS DEPRECIATION 

• LISTS any one yeai s deprecialion 

• OR compleie iisl ot all p'operly 

• PRINTOUT shows — I D Numbei — desc rip lion — 

• Yr pu'cftasea- life— method— 
isl y aOdilionai Oepfecialion— 

• Reo deprec — depiec prior yrs —balance 

• SUMMARY — total value prop —additional 1st yr 

• REGULAR deprec — Oeprec prior yrs 

• PERMANENT records tor your laies 

Documenlalion $1500 

Disk * Dor.umenlalion 1195 00 

MIN 32K-1 DtSK — PHINTERI132 CPI 

TERMS Parsoral checks require 3 weeks \o clear 

USE — VISA — MASTER CMARGE-MONEY ORDERS 

TEL7PM 930 PM EASTERN-f6ir) 359-2364^6370 

SEND SASE tor additional mtormation 

MEDFIELD ""' 
COMPUTER SOFTWARE 

39 GREEN ST , MEDFIELD. MA 02052 




Sungcon^srnpc 



A Super, real lime game wriri a Dungeon anO Dragcn 
Ttieme Grapnirs. sound and rnore (14.9S / 19. M) 

Scarfmsn 

Clase to \he Packman arcade game 114.11 / II Ml 
Close to the ParHman arcaOe game 1114 M/ II t8| 

Alien Defandsr 

• ' *'cade game ol [he year It you do" 1 r>a«e it get 't 
now available Igr modei and III II1I.M / tt«.ll| 

SuperMstar 

Plugs m between your compuiet ana ine lape player 
shows ycu tie Oest loading ie«si anO can be used lo 
adius! •''e neaa posiTion . . tItM 

Print Buffer 

G'eaTesl peripne'ai smce diS'i cJriwes Act* like a 
(unnei Vcur computer can send data to tne c"nter 
fasle-lhenl'-e pimte' can accept ■: So the butter lilis 
up and tels you use the computer whi.e the crir,ier ib 
siii| O'lnrmg Has lis own '(SK memory 30 da> trial i( 
you Oon 1 like i' senO ii bac*. No Quesiion? asked 
Print Butter SZII N 

Wabash Disks 

The besT tiisKs you can buy Super Premium 
BO track double density JM ft 

ao Iracn douO<e den^.ty 2 Sides Ml W 

8 -ch OouDie dens'W UttD 

All Gua'arfeea tar 2 reaii 

Pisase inclose 12 00 tor sPiiOCing and nandhng MC 
and Visa OK 

Blarlork IHnrrhousr 

1691 Eason • Pont.acMi dSOS"* 
i313l 673-2224 a l3'3i 673-8700 

Dealer inguir-ei /nnfeO' *'433 




FREE EPSON MX-80 PRINTER 



With the ' 

purchase of o 

TRS 80, Model 



M>UO(1VIO 



For a limited time, Doto Services, Inc.. will 
give you a FP.EE Epson MX-80 Printer (S645 

value), when you buy o TR5 60 Model III. 46K, 
with 2 PERCOM 40 track drives, ot o regulor 
price of $2,495. 

(Opttonol [\5 232 S90 extro Rodio Shoc^ w / R5 232 1 1 70 
extra Printer cable - add £35 OO; 

The perfect system, the perfect price! 

TRS 60 Model III, 48k - two PERCOM 40 

track drives - EPSON MX-80 Printer. 

Doto Sen/ices offers more — APPARAT'5 
NEWDO5 60, version VER 2.0, regulorly $149.95 
— now only £129.95 (Model III units only.) 

Up to 20% savings on TRS computers — 
accessories — programs, Plus; EPSON / 
PERCOM / APPARAT / HAYES / SMARTMODEM / 
VERBATIM DISKETTES. 

'TI^S-60 15 Q trodemork of Tandy Corporatian. 




■ FREE SHIPPING in 46 contiguous states. 

■ No Soles Tqx on out-of-stote orders. 

■ Viso/Moster Cord welcome. 

■ Personol checks, oHow 3 weeks to cleor. 

■ Clnternotionol orders, freight F.O.D. Wichiio, 

Kansos) 

CALL TOLL FREE: 1-800-635-1129 

or order by moil from: 

\]PJa SB^CES, Ml. 

COMPUTEf^ SERVICES SINCE 1970 ^249 

P.O. Dox 1157 Wichita. Kansas 67201-1157 
(In Konsos, coll 1-316-636-9021) 



I'S^mUtt of A<lv»tlii0rt on pmg» 4 18 
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UTILITY 



This processor really gives you your \\)ords worth. 



The Write Stuff 



Lynard Barnes 

1640 West Adams Street 

Chicago, IL 60612 



When typing at 75 words per 
minute and 45 of those 
words are throwbacks to the age 
of Chaucer, it is nice to have a 
computerized typewriter. Era- 
sure is but a keystroke away. 

TXTWRT, an assembly pro- 
gram, is the core of a more 
elaborate word processor. It 
should be of interest to those of 
you who. like me, learn primarily 
from doing. The learning is a 
basic assembly program; the 
doing involves expanding and 
modifying it. 

TXTWRT runs on a Level II, 
16K, unmodified cassette-based 
system. As written, using Ra- 
dio Shack's Editor/Assembler. 
TXTWRT enters text into a pre- 
assigned area of memory (a buf- 
fer) using upper and lowercase 
characters- With the program 
you can save the buffer content 
to tape or send it to a printer 
and load a saved buffer from 
tape. You can obtain multiple 
copies of the same text by sav- 
ing it on tape for later loading 
and printing. 



Creating A BuMef 

TWTWRT starts at decimal 
address 17999 (464FH), Twelve 
thousand bytes of memory are 
reserved for text. You can select 

one in-text control code (ex- 
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plained below), and seven over- 
all program operations from the 
options table. 

Modify and expand the pro- 
gram to suit your purposes. 
With a few hours work you can 
turn it into a full-blown word pro- 
cessor. Change the Origin state- 
ment in line 100 to locate it any 
place in memory. Be careful to 
change the amount of memory 
area reserved for text input. 

In line 3220 (see Program List- 
ing 1) Buff is Equated with $. 
The DEFS function reserves 
12.000 bytes of memory tor Buff, 
the string storage area. The 
starting address of the buffer 
area is 18740 (4934H). Subtract- 
ing the origin address from the 
start of the buffer, we discover 
that the main program with sub- 
routines is 749 bytes long. Add 
12,000 bytes set aside for the buf- 
fer and four memory addresses 
for Store. The total area of 
memory occupied by TWTWRT is 
from 17999 to 30748 (781CH). 

The alternative to equating 
Buff with $, letting the DEFS 
function determine the starting 
address of the buffer, is to 
equate Buff with a specific ad- 
dress. Line 3220 could have 
equated Buff with 18740. If you 
add more code to the program, 
you must change the address. 
With 2000 bytes of free memory, 
add code being careful not to 
push the end of the buffer t)e- 
yond 32667 {saving 100 bytes for 
the stack). 

Line 3240 reserves two mem- 
ory addresses for Store. Before 
anything is put into the buffer 
from the keyboard, Store con- 
tains the beginning address of 
the buffer. As each character is 



entered, the address in Store is 
incremented. Store acts as a 
pointer, showing the input rou- 
tine in LOOPTX (line 670) where 
keyboard input is to begin in the 
buffer. Input always begins at 
the address from which entry 
was last made; you cannot ran- 
domly enter the buffer area. 

Program Flow 

After the program Is loaded 
using System, Enter and press 
the Break key. The screen clears 
and displays the options table. 
The program loops at SCAN1 
until you make a selection. Be- 
fore entering text either from the 
keyboard or tape you must clear 
the buffer area with Option 6, 
KILL BUFF. You might want to 
see what information the first 
1020 locations contain before 
clearing the buffer. 

Option 7— View first 1020 
bytes of buffer: This option 
jumps to address 18484 (4834H). 
The screen clears at line 2870 
and the first 1020 bytes of the 
buffer move to the screen. If you 
have put nothing into the buffer 
it will contain computer gar- 
bage, if you have entered text, 
the lowercase characters will 
not display as such. Use this op- 
tion to discover the name of 
Basic programs or machine- 
code tapes. The LOAD TXT op- 
tion will load anything written to 
tape at the 500-baud rate into 
the buffer area. 

In a block move HL register 
pair loads with the source 
memory block, DE loads with 
the destination, and BC with the 
number of bytes to be moved. 
TheLDIRin line 2910 counts the 
bytes moved, decreasing BC 



and moving the data. 

After the block move the key- 
board scan routine in lines 
1520-1590 is called. The pro- 
gram loops here until any key is 
pressed, returning program flow 
to the VWTEXT routine at line 
2930. A jump is made to again 
display the options table. 

Option 6— Kill Buff: This is a 
mandatory flow for proper pro- 
gram operation; make this op- 
tion automatic by changing line 
3260 to: 

END START 

The program will begin execu- 
tion at memory address 17999 
(464FH) rather than at address 
18029 (466CH), the options 
table. 

Whether a selected option or 
automatic program flow, regis- 
ter A is loaded with null (as op- 
posed to decimal zero). HL regis- 
ter pair is loaded with the begin- 
ning of the buffer, and BC is 
loaded with the number of bytes 
to be cleared. LOOPCL loads the 
contents of A into the first mem- 
ory address of the buffer. HL is 
then increased by one. This ac- 
tion repeats until both the B and 
C registers contain zero. 

The buffer address then loads 
into Store. The buffer address 
starts at 18740 (4934H) and 
never changes. Store, Equated 
with address 30723 (7803H). also 
never changes. The information 
contained in Store will change 



The Key Box 

Model III or I 
Basic Level II 
16K RAM 



as text is entered. 

The first entry made in the 
buffer {line 340) is the graphic 
code 191. the buffer terminating 
code. This code is always at the 
end of the buffer, indicating the 
memory address of the last char- 
acter entered, plus one. The code 
is written over during input. 

The TB variable store address 
is loaded in lines 350 and 360 
with the numerical constant 
five. When the right arrow is 
pressed during text input the 
cursor tabs forward five spaces 
and the buffer loads five spaces. 
Change the tabbed spaces by 
changing the number loaded in- 
to the A register in line 350. 

From this point the program 
flows back to the options table 
loop, ready to enter text into the 
buffer from the keyboard or 
tape. 

Option 1— Add TXT: A jump is 
made to line 1420. (CHECK1). 
the screen clears and the cursor 
turned on. The IX register pair 
loads with the tjeginning address 
of the buffer and MESSAG (lines 
1630 through 1790. is called. 
MESSAG loads the screen with 
any information starting at the 
address specified by the con 
tent of the IX register pair. 
Loading pauses when Enter is 
pressed, and resumes when any 
other key is pressed. The pro- 
gram exits this subroutine when 
the null character loads into the 
A register, or the buffer ter- 
minating code 191 loads, 

CHECK1 continues at line 
1470 where the buffer address 
toads into the register pair BC. 
The input routine uses only two 
registers and one pair during the 
tab operation. A, BC and D, 

The program jumps to LOOP- 
TX. address 18078 (469EH). The 
main loop of the input routine 
calls the key scanning routine in 
ROM, which waits for a key to be 
pressed before returning. Upon 
returning, the value of the key 
pressed is in the A register. A 
call to CRT displays the keyed 
entry on the screen, or positions 
the cursor for a control key (car- 
riage return, upward or down- 
ward linefeed). The buffer ac- 
cepts all control key entries ex- 
cept the right arrow (intercepted 
in line 750 as the tab key) and 
the shifted @ (intercepted in 
line 710 as code for ending in- 



put). You can use any key for a 
special function with the follow- 
ing format: 

CF (name Key Oesigrtated for 
special (unction) 

JP 2, llabel of special func- 
tion subfoutloet 

tf the content of the A register 
is the same as the character or 
character code following OP, 
the Z flag is set. If the A register 

content and the character or 
code following CP are different 
the Z flag is reset {becomes 
zero). 

The Compare-Jump instruc- 
tion is illustrated with the logic of 
the Basic If . .Then statement. 



JP Z.NULOC nieaning It Z = 1 Tfien GOTO 
NULOC ELSE 
tf Z = OThen get m 
5 1 ruction below 

Compare-Jump instructions 
control assembly program flow 
just as effectively. 

Line 1000 is a relative jump in- 
struction. A JR jump does not 
tell the program to jump to a 
specific address, but computes 
the number of opcodes between 
its own location and the address 
to which it jumps. In line 980 the 
A register loads with the mem- 
ory address of the shift key. It 
the shift key was pressed during 
the call in line 670. the shift key 
address 14464 (3880H) will con- 
tain a one. Line 1(X)0 controls 
the flow of the program after a 
test determining whether the 
shift key was pressed (line 990). 
Illustrating again with the 
If. . Then statement: 



JR NZ.TESTO IFZ = 0Thenctropao*r6 
occoOes ELSE 

IF Z = 1 Then get mstruc 
tiofi betoiv 

The JP instruction would 
make line 1000 longer by one 
memory address. JR makes a 
program shorter and relo- 
catable. The 46 labels in this as- 
sembly program refer to 
memory addresses within the 
program, TESTO refers to mem- 
ory address 18168 {46F8H), JR 
NZ,46F8 results in the opcode 
2006, where 06 is the number of 
opcodes the program must skip 
to get to address 46F8H. Jp 
NZ.46Fe results in the opcode 
CAF846. 

All jump instruction between 



lines 700 and 960 could be 
changed to relative jumps: the 
program would be shorter by 
eleven opcodes. The JR instruc- 
tion takes slightly longer to ex- 
ecute than JP. If the number of 
opcodes the program skips (for- 
ward or backwards) is greater 
than 129 Of 126 respectively, you 
must use the JP instruction. 

Line 970 saves the content of 
the A register by a PUSH instruc- 
tion A test determines whether 
the content of the A register 
(now pushed onto the stack) is 
to load into the buffer as a 
lowercase or uppercase charac- 
ter. When this test determines 
the shift key was pressed, the 
original content of A is popped 
from the Stack back into A, and 
bit five is reset to zero (upper- 
case). A JP is made to TURE in 
line 1060 where the character 
loads into the next buffer ad- 
dress and LOOPTX begins 
again. 

If the Shift key was not 
pressed, a relative jump is made 
to line 1040 where the content of 
A is popped from the stack and 
bit five is Set to one (lowercase). 
A test is made in line 710 for 
the shifted @. If this character 
is found, input is immediately 
terminated and a jump made to 
line 1120. The A register is load- 
ed with the graphic code 191, 
and loaded into the buffer In 
line 1140, the current buffer ad- 
dress in the BC register pair is 
loaded into Store. The cursor 
turns off and a jump to line 400 
displays the options table. 



The only in-text control code 
in this program is the # symtXDl, 
used as an end of page marker. 
When the contents of the buffer 
are sent to the printer a Com- 
pare-Jump instruction inter- 
cepts the # symbol. The code to 
move the paper to the top of- 
form goes to the printer, starting 
a new page. 

To print double-width or com- 
pressed characters, underlines 
or subscripts, select your in-text 
control code as one, two or three 
characters. Enter them with 
your text- Set up Compare-Jump 
instructions to pull in-text codes 
out of the printer stream. Use a 
tier test to check for sequential 
multiple character occurrence. 
Subroutines make the second 
(or third) test and send the con- 
trol code recognized by your 
printer. 

Option 3 — Save TXT: This op- 
tion saves the buffer contents to 
tape. The program jumps to line 
1940. clears the screen and 
displays a prompt message. The 
A register clears and calls to 
ROM to turn on the cassette and 
write the sync byte. HL loads the 
address of the buffer. The 
WRLOOP sends the buffer con- 
tents to tape until the ter- 
minating code 191 IS loaded into 
A. The program jumps to GO- 
BACK, the cassette turns off 
and the options table displays. 
At PAGE, A loads with null to 
zero the line print count at ad- 
dress 16425 in ROM. The PRT- 
OUT routine uses the line printer 
routine in ROM. Next, A loads 



01C9H 


KLSC. Clears screen 


0033 H 


CRT. Displays A register 


002 BH 


KBSCAN. Scans keyboard re- 




turns if no key pressed 


0049 H 


Scans keyboard; does not re- 




turn until key is pressed 


032 AH 


Formats A register and displays 




on screen 


0212H 


Turns on cassette 


0287 H 


Writes sync byte to tape 


0264 H 


Writes A register to tape 


0296H 


Finds sync byte on tape 


0235 H 


Loads byte from tape and puts 




in register A 


01F8H 


Turns off cassette 


37E8H 


Line Print driver address in 




ROM 


1A19H 


Entry to Basic. Displays Ready 




prompt 




Table 1. ROM Routines 
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with the Epson MX-80 code for 
top-of-form paging. After the 
call to PRTOUT sends this code 

to the printer, program (low 
returns to PAGE which in turn 
returns the program flow to the 
main print routine. 

If A does not contain a car- 
riage return or the end-of-page 
marker, a relative jump over 12 
opcodes is made to address 
18472 {4828H) where program 
flow returns to the mam print 
routine in line 2480 Every 
character in the buffer is tested 
in the Space subroutine. 

Suppose you wanted to print 
a line of text in double width. Us- 
ing a colon at the beginning of 
the line as the in-text control 
code, you could intercept pro- 
gram flow, before the left mar- 
gin has been set, with a Com- 
pare-Jump test in Space. The 
jump would be made to a routine 
labeled DBL. where you would 
load the control code for print- 
ing double width into the A reg- 
ister and call PRTOUT. If your 
printer does not automatically 
exit the double width mode 
upon receiving a carriage return, 
you would also need a termi- 
nating code and a routine to 
send it to the printer. The entire 
concept involves repetitious op- 
codes with only the printer 
codes, loaded into A, changing. 

If you have a printer which 
mixes different modes of print 
on the same line, you can in- 
crease the program by 70 per- 
cent with in-lexl control code 
tests and printer codes. 



Program Limitations 

This program is ROM-de- 
pendent (see Table 1). Frequent 
calls to address 01C9H in Basic 

ROM efficiently clear the 
screen: the programmer does 
not need to write code. ROM 
routines written and run on dif- 
ferent computers must have the 
same routines in the same ROM 
memory addresses. 

There is no way to l<now when 
the end of the buffer is reached 
Set up another register pair (DE 
or HL) to act as a character 
counter: Load it with the number 
of bytes available and decrease 
it as characters are entered or 
load the register pair with zero 
and increase it. In either case, 
provide a prompting message 
stating "The End" after a test for 
zero in the low-order byte regis- 
ter. (The A register would have to 
be loaded with zero before a CP 
test could be performed.) 

TXTWRT accepts numerical 
values from the keyboard other 
than in the selection of options 
No numerical values are dis- 
played from memory addresses 
used to store numbers. To input 
numerical values into the pro- 
gram, use a routine converting 
ASCII digits into Binary, and 
store the result in a memory ad- 
dress for future use. To display 
numerical values from memory 
addresses, such as the current 
address of the butter in Store, 
use a routine to convert binary 
into ASCII. Expand TXTWRT by 
including both such routines. ■ 



Program Listing 



4e4F 

TEXT 
■ 1C9 

E IN ROM 



eeee2 
teee* 

B9Beb 



LYNARD BARHE 
MAY, 1981 



ORG 17999 ;MAy BE CHANCED. SEE 

HBllfl KLEC EQU aiC91! ;CLEAR SCREEN ROUTIN 



464F 3Ee0 
4651 211449 
4654 eiEeiE 
4657 77 
465B 11 
46 59 tb 
4G5A 2flFB 
465C 0D 

465n 2SFe 



ADDRS. TB IS 
B SPhCES 



Bei2e 

BBllB 

eei4B 

00150 

00160 
00170 
00160 
00190 
00200 
B«2ia 
ae22B 
•123* 
■■241 
■f25l 
B83GS 
eB27e 

B02BB 
0B29B 
BB3BB 



'START' LOADS MEM ADDRS IN BtlFFKR WIT 



u> 



LOOPCL LD 
IKC 
DEC 



JR 



A, 011 

HL.BUFF 

BC, 12000 

(HL) ,A 

HL 

B 

N2, LOOPCL 

C 

NZ, LOOPCL 



STORE IS LOADED WITH BEGINNING OF BUFF 
IS LOADED WITH NDHBER 5, DESIGNATING TA 



Program coritinued 



Program conf;nuei 







0B31B I 


465P 


213449 


0B32B 


4662 


221478 


00110 


4665 


36BF 


00340 


4667 


lEfl5 


00350 


4669 


321678 


00366 
aB37B ; 






00380 I 



466C CDC9ai 00400 OPTS 
4G6F DD21594B 00410 
4673 CD6247 00420 



4676 CD5S47 
TIOH 

4679 FE31 
467B CA3F47 
467E FE32 

4680 CAC047 
4683 FE33 
4685 CA9347 
4688 FE34 
46 BA CAF147 
46BD FE35 
4eBF CA3149 
4692 FE36 
4694 CA4F46 
4697 FE37 
4699 CA4548 
4G9C 18DB 
AGAIN 



TO BUFFER, 
Kl' TO 
IS LOADED 



0043B SCANl 

B044B 
B0450 
00460 
00471! 
00480 
BB490 
00500 
00510 
0052B 
00530 
BB540 
BB55B 
0B560 
BB570 



0B59B 
BBGB0 

00610 

00620 

00630 

006 48 

0065B 



469E CD1900 

HE IN BASIC 
46A1 CDB947 
YS ENTRY 
46A4 FEBD 
46A6 CABF47 
46A9 PE60 
T 'f 

46Afi CA1447 
46AE FEB8 
E CHARACTER 
46BB CA2347 

46B3 fzet 

AB 

46B5 CA2947 

46aB FE22 

46BA CA0A47 

46BO FE28 

tCBF CA0A47 

46C2 FE29 

46C4 CABA47 

46C9 CMhtl 

46CC VZ21 

46Ci: CAQfl47 

46D1 FE2A 

4SD3 CABA47 

46D6 FE21 

4608 CsVdMl 

46DB FE24 

46DD CA0A47 

46E3 FE2B 

46e: CA>?a47 

46E5 Ft:3F 

46E7 CA0A47 

46EA FE3C 

46EC CABA47 

46EF FE20 

46F1 CAklA47 
4 6F4 Fi.3E 
46F6 CA0A47 
46F9 F5 
46FA 3AaB3b 
TH SIJIFT KEY 
46FD FEBl 
46FF 2006 

LOWERCASE 
4701 Fl 
47 02 C3AF 

TO UPPERCASE 
4704 C3aA47 

4707 Fl 
47BB CBEF 
SE 

471;a 02 
BUFFER 

4708 03 
470C C39E46 
Alt;. 

47 Df 2 
MPS HERE. 

4710 03 

-UP FOR LINES 

4711 (:39E46 
4714 3EBF 

E BUFFER 

4716 02 
CODE 191 

4717 ED43147a 
ND ADDH3 



00660 ; 
00670 LOOPTX 



00690 
00700 
00710 

00720 
00730 

0074^ 

02752 

00760 
00770 
B0780 
B0790 

00808 
BB8ie 

a082e 

BC840 
BBiiSO 

BBSSI) 

eae7u 

aoeiiii 

30 90 
30913 
00920 
00930 
00940 
.' D 9 4 2 
33544 
B0:i46 
00948 
00950 

BC952 

BB9611 
00970 
00980 

0B990 
01B30 

01B10 
aiB23 

aiBie 

B1B40 te:>to 

01050 

01C63 t;;i -,: 

01070 
01080 

ciC9ii nlxl:." 

01100 
01110 

01120 rj;'Tsi 

31130 
31140 



HL.BUFF 
1 STORE) ,HL 
|HL) ,191 
A, 5 

(TBI ,A 



OPTIONS 



TABLE 



CALL KLSC 

LD IX.Ml 

CALL MESSAG 

CALL KBSCAN 



;hait for user selec 



JP Z.CHBCKX 

CP '2' 

JP I.TXTLOD 

CP ■!■ 

JP l.TXfBVA 

CP '4- 

JP Z.HARDCP 

CP '5' 

JP Z.BASIC 

CP '6' 

JP Z, START 

CP '7' 

JP Z.WrTEXT 

JR SCANl jKO SELECTION, WAIT 



THIS SECTIOIJ IS FOB ENTERING DATA IN 
'1' SELECTED, PROGRAM JUMPS TO 'CHEC 
DISPLAY BUFFER CONTEST IF ANi' . -aC 
WITH ADDKS OF LAST BUFFER ENTRY. 



CALL 
CALL 



4 4)1 

CKT 

0DI1 

Z.NEXLM 

96 

Z.Ol'Ttil 
8 

Z.SKSP 



JP 
CP 
JP 



CP 
JP 

JP 



JP 
CP 

JP 

CP 

JP 



PUSH 
LD 



JP 

POP 

SET 



LD 

luc 



£,ADV 
34 

a.TURE 
' ( ' 

Z.TURE 
') • 

Z.TURE 
Z.TURE 

2,TUKE 

Z.TURE 

Z.TURE 

'S' 

I . VURE 

' + ■ 

Z.TURE 

Z.TURE 
•<■ 

Z . TURL 
20H 

Z.TURE 

'>* 

Z.TURE 

AF 

A,(38B0H) 



rSA-'-.E AS INKt.l" KaCTI 
ITHIS ROUTINE DISPLA 
tCAHlilAGE RETURN 
:EMD INPUT WITH SHIF 

; BACK ARSOli' TO DELET 

iFOSwftRD ftPROi; FOB T 

jQUOTATlON KASKS 



ilF SPACE, GOTO TRUE 



;EAVE 'A' REGISTER 

J LOAD 'A' KI 



1 r-VAS SHIFT KEY HIT 

i:i,, TESTS ;IF NOT COHT 



AF 

TUBE 
AF 
5, A 

iai;j .A 
ac 

IXXJPTX iDEGIH INPUT LOOP AG 

inc),.'-'. ;r.-po:.- CP, PJiOOk/vN jv 

RC ; COUNTERS HAY BE SET 



;SHIFT-KEY7 



[COKVERTS TO LOWERCA 
:LOAD CHARACTER ItTTO 



LUOI'TX 



;0F TEXT IN BUFFER. 
;EtlD IIJPUT; TERMINAL 



(QC),A rBY LOADINO IT WITH 



(STGi'E),BC ;STORE NEW T 

PrograrT' continues 
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QmxL 

Publishpr Perish? 

An exoggeroiion o* course' Dut your 
choice of Q software publisher con 
rnni^e (he difference between success 
c c n-iediocre future fof your piogrorn 

ir<A o subsidiQi7 of IDM end o leodmq 
publisher of lop quQiiiy educQtrono,' 
software invites authors and creoio's o' 
superior software to subr^it completed 
programs 'oc e^o'uOtion and 
considerotion for pubiicoiion 

We ore inreresieo in programs for the 
iDM Personal Compuier tt^e Apple M*- 
Personol Computer ond the TRS 8C™ 
Mooe' III ond Co'or Compute' m ihese 
oreos 

• Dusmess and histonco' 
Simulotions 

• Adult and children s education 

• Gomes 

• Personol enrichmpni 

Only those submissions thoi meet our 
exacting standards for quohty 
ongmaliiy and pioyobiky will be 
published 

If the ideo of odding your superior 
progrom ro our top quality product line 
oppeois to you and you d lil^e to discuss 
the possibilities contact us for deioils 
(Xeg sie'ed ^'odemorKi ol 
Apple II® Apple Compjiefs Inc 
i[\S flCTM londv Corpo'OIion 



Science Keseotch Associates. Inc. 
Software Products Department 
155 North Wocker Drive 
Chicago, Illinois 60606 1^293 



CANADIANS 

NOW IN STOCK 

ACORN SOFTWARE 
BIG FIVE 

INSTANT SOFTWARE 

CREATIVE COMPUTING 

ADVENTURE 

INTERNATIONAL 

APPARAT INC. 
EPSON PRINTERS 

MANY MORE 

MOD I • MOD III • COLOR 

Excetlent 5'i" Diskettes 
S Den. or D Den. 
Fully Guaranteed 

Lower Case Mod - Mod I 
One IC $29,95 

IBM Selectnc Printer 
Conversion Kit $825.00 

Phone or Write tor Info. 
(403) 423-3919 

CMD MICRO 

PO Box 1212 

Edmonton, Alberta 

T5J 2M4 



:t »«^9>>K:i*S;^M!i4K>»«ii&>W>rS^^>«i>«»M^&^ 



Merr>' Christmas 

Oil 




H. 



PO. k> 
S'vf Mt •>! MS 



iisiTHi 9, 

ii, » L rjr i 



V J„THCRIZED SOCTH EASTERN REGION SERVICE ^ 
CENTER fOR AM ELECTROWIC5 .* 




Modtlitl Driv*KitAM-l S44S.00 

it 4BK 2-D.5kPeftecFI1ppySie25.OO Christmas 
rt JSK 2 Disk Teac $1825,00 Special 

;C 40TKPertecFlippy 30ms $230.00 

A 40TKTeoc20ms S230.00 

3- ilOTK Tandon 6ms 5230.00 

SOTKTeoc 20ms $335.00 



St 



■15'. COMPLETE DRIVES add $45 00 lo Bore pr.te 
AAA Mulliplief Double Deniity $99,95 



OKIDATA PRINTERS KAU 
EPSON PRINTERS SCALL 



FLOPPY DRIVE REPAIR $35 00 Flof Rote 

OPEN 3-9 pm (EST) MON— FRI 
Tachnklan avoilobl* ofler S PM. 



-V Call in wiitti an ordw. W« hivs » conoKlion M \ 

A (BBS) on lin« tor vour ma & 



Upgrade Your TRS-80 






NEC 41 16- 200 NS 

8 for ^1750 



Order Toll Free 

800-538-5000 800-662-6279 (CAL.) 

'tt TRS-80 IS a regisiereO trademark ol Radio $h«cli, a Tandy Company. 

^247 , 

JUK MICKOUhVICLS, INC. tERMS For shipping mciude $200 lorUPS Ground $300 'o- 

1224 So. BaSCOm Ave. UPS eiue La[M,-> Air SiOOO mifumum o'der Bav Area Resi 

»»0^ San JnsA f^A Q<t19ft '^^"'^ ^'"' ^'' °" ^^"^^ '^'' '^^'''o'"'^ Residents add B'o sales 

- oftA c-io cn/w* OArt ceo eoTft /^«\ ''" '*'^ 'eserve Ihe nghi 10 iim.i quantilies and subsiiiole 

S00-338-500u • 800'*DD2-o279 (CA) manutactorer Prices subject lo change without notice 

(408) 995-5430 • TeleK 171-110 SendSASE to-comoiele im 




'See Lisf 0/ Adverlisers on page 418 
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Program continued 




FROM TAPE '* 














47C3 DD21ED48 


82158 


LD 


IX, n7 


471B 3EBF 


01150 


LD A,0FH :TURN OFF CURSOR 


47C7 CD6247 


0216B 


CALL 


HESSAG 


471D CD2AB3 


0116B 


CALL 32AH 


47CA CD5547 


02170 


CALL 


KBSCAN 


4728 C36C46 


0117B 


JP OPTS 


47CD AF 


B2180 


XOR 


A 




BllBB ,- 




47CE CD1202 
47D1 CD9602 


B219B 
B21li 


CALL 
CALL 


0212H 
8296H 












47D4 113449 


■ 2111 


LD 


HL,BUPF 




S1200 ; 




4 7D7 7 7 


82218 


LD 


;hli ,a 


4723 as 


01218 BKSP 


DEC BC 


47Da 068S 


02238 RDLOOP 


LD 


B,8 


4714 3E2> 


01228 


LD A,28H 


47DA CD3582 


02248 


CALL 


0235H 


4726 C39E46 


01230 


JP LOOPTX 


47DD 77 


B2250 


LD 


IHL) ,A 




012 40 ; 




47DE FEBF 


02268 


CP 


191 ;END LOAD IF 'A' CON 






•*•*••*••• TAB CURSOR FORWAKD ROUTI 


TAINS 191 














47E0 CAe847 


82278 


JP 


Z ,DONE 




012G8 : 




47E3 23 


02280 


INC 


HL 


4729 3A1G7B 


0127B ADV 


LD A.ITB} 


47E4 18F2 


82298 


□JNZ 


RDLOOP 


472C 57 


01280 


LD D,A ;'D' KEGISTER L'SED A 


47E6 1BF0 


82300 


JR 


RDLOOP 


S CCXJWTER 






47EB 221478 


82310 DONE 


LD 


i STORE! ,HL 


472D it.29 


01290 FOBHAR 


LD A,20H 


47EB CDFBBl 


02320 


CALL 


81F8K 


472F GDa947 


B13BB 


CALL CRT 


47EE C36C4e 


82338 


JP 


OPTS 


4732 B2 


■ 1111 


LD |BC] ,A 




02340 ; 






4733 83 


01320 


IHC BC 




82350 ,*'••»* 


,,,,,,, 


•••(>•<••••>>••■•••••••••••>>• 


4734 15 


01)30 


DEC D 


tf-ttttttti 








4735 JEflfl 


01348 


LD A,B 




82360 ; 


SEND BUFFER CONTENT TO LIKE PRINTER. | 


4737 BA 


01358 


CP D 


0DH ICSl 








4738 CA9E46 


B136B 


JP I, LOOPTX 


22370 ; 


CAUSES 


LINEFEED, 'f SIGNALS END OF 


473B 3£2a 


8i37B 


LD A,20H 


PAGE. 








473D IBEE 


01388 


J R FORKAE 


23 68 : 


TO CHANGE LEFT-MAPGIN SETTING, LOAD | 




0139B i 




'B' IN LINE 










01(08 ;■••••• 


■■ CHECK CONTENTS OF BUFFER 




B239B ; 


2670 WITH DESIRED NUMBER FOB SPACES | 




81410 ; 




OF HABGIN. 








473F CDC9fll 


01420 CHECKl 


CALL KLSC 


ttitftttft 








4742 3EIE 


0143B 


LD A.flEH (TURN OK CURSOR 


47F1 CDC901 


02418 HARDCP 


CALL 


KLSC 


4744 CD2AB) 


8144B 


CALL 3 2AH 


47F4 DD218949 


02420 


LD 


IX.PBNTl 


4747 [ID213449 


■ 1451 


LD IX, BUFF iLOAD BUFF ACDBS IKT 


47P8 CD6247 


82438 


CALL 


HESSAG 


□ IX AND 






47FB CD5547 


B244B 


CALL 


KBSCAN 


474B CDC247 


01461 


CALL HE55AG iCALL MESSAGE DISPLA 


47FE 213449 


02450 PRINT 


LD 


HL,BUFF 


y ROUTINE 






4B01 7E 


82460 PRINT2 


LD 


A, IHLl 


474E ED4B147B 


8147B 


LD BC, (STORE) rADDB OF LST 


4B12 CD1148 


12478 


CALL 


SPACE 


BUF ENTRY 






4B05 CDlC4a 


024BB 


CALL 


PHTOUT 


4752 C39E46 


01480 


JP LOOPTX 


48B8 23 


02498 


INC 


HL 




81490 ; 




4889 C30148 


B2500 


JP 


PRINT2 






•* KBSCAN SUBBOUTIHE **•*••••*"••■■ 


4e0C D9 


2 510 FRTOUT 


EXX 






01510 ; 




4600 21E817 


■ 2520 


LD 


UL,37E8K 


475S DB 


B152B KBSCAN 


Pl;SH DE 


4 818 5t 


82538 PfiTLP8 


LD 


D, (HLl 


47Sfi PDE^ 


01538 


PUSH lY 


4B11 CB7A 


12540 


BIT 


7,D 


4758 CD2BBe 


0154B AGN 


CALL BIBH 


4B13 ciiiie 


02550 


JP 


HZ.PBTLPB 


475B B7 


B1558 


OR A 


4B1G FEBF 


02568 


CP 


191 


475C 28FA 


B1560 


JR 1,AGN 


4818 CA1E4B 


82570 


JP 


Z,OPT3 


47SE FDEl 


01570 


POP lY 


481B 77 


82580 


LD 


(HLl ,A 


47GB Dl 


B15B8 


POP DE 


481C D9 


B259B 


EXX 




4761 C9 


81598 


RET 


481D C9 


82680 


RET 






B168B ; 




4B1E D9 


12618 0PT3 


EXX 










4eiF C3fiC46 


■ 2620 


JP 


OPTS 


' 


B1628 ; 




4822 rE23 


■263B SPACE 


CP 


't' ;END OF PAGE MAJ^KKR? 


47&2 DD7EII 


01630 MESSAt; 


LD A,UX) 


4B24 CA3a4B 


12641 


JP 


Z , PAGE 


4765 FEII 


81648 


CP 1 


4B27 FEID 


■ 2G5a 


CP 


BDH jSET LEFT HABGIN MAB 


4767 CABfl47 


B1650 


JP I, RETS 


XER? 








476A FEBF 


01668 


CP 191 


4829 280C 


02668 


JR 


NZ.ADD 


476C CA8847 


0167B 


JP Z.RETN 


482B 0605 


82678 


LD 


B,5 ;LOAD 'B' SPACES FOR 


476F F5 


816B0 


PUSH AF 


MARGIN 








477B 3A4e3e 


B169B 


LD A,(3840H) JWAS ENTER K 


4820 CD0C4e 


82688 


CALL 


PRTOUT 


EY PRESSED? 






4838 3E28 


8 26 90 HARC 


LD 


A,20H rLOAD 'A' WITH BLANK 


4773 FEBl 


81708 


CP 1 










4775 CA7C47 


• 1710 


JP I.PAUS ;YES, GOTO PAUS i, KA 


4832 CD0C48 


02788 


CALL 


PRTOUT 


IT KEY EKTBY 






4835 1BF9 


82718 


DJHZ 


HARG 


4778 Fl 


81720 


POP AF 


4837 C9 


B2720 ADD 


RET 




4779 C3BB47 


01-'3e 


J P CONT 


4B3B 3E38 


827 39 PAGE 


LD 


A,38H ;LOAD 'A' TO iEHO LI 


477C CD5547 


B17 48 PAUS 


CALL KBSCAN 


NE COUNT 








477F Fl 


01750 


POP AF 


4G3A 322940 


82740 


LD 


(164251 ,A jADDfiS IN TR 


47BB CD8947 


01760 CONT 


CALL CRT 


S-8B 








4783 DD23 


81778 


IHC IX 


483D 3EeC 


2750 


LD 


A, 148 ;SEND FOIM-FEED CODE 


4785 C36247 


01780 


JP HESSAC 


TO PRINTER 








47SB C9 


ei79B RETN 


RET 


4B3P CD0C40 


12761 


CALL 


PRTOUT 




BIBBS ; 




4B42 23 


■ 27G1 


IHC 


HL 






'" DISPLAY KEYBOARD INPUT *•** 


4843 7E 


11764 


LD 


A.iHL) rGET NEXT CHARAC BEF 


•••• 






ORE RETURNING 








ilB2B ; 




4844 C9 


02771 


RET 


;RETUHH TO PRIMTIHG 


4 7B9 D5 
47 8A FDE5 
47BC CD33ee 


0183B CRT 

01B4B 
01858 


PUSH DE 

PUSH 11 
CALL B033H 




27 80 ; 






<...!*<. ..1 


02790 -•*••• 






47Bf FDEl 


81868 


POP lY 




B28BB ; 


THIS CODE BLOCK HOVES THE FIRST 1006 | 


4791 Dl 


01870 


POP DE 


BYTES OF 








4791 C9 


01880 


RET 




28 10 ; 


THE BUFFER TO THE SCREEN. BECAUSE I | 




B139B ; 




T IS A BLOCK 
ECOrail lABLE . 


■2821 ; 


HOVE, 


LOWERCASE CHARACTERS ARE NOT R 




















11911 ,- 


OPTION TABLE BRANCH ROUTINES 


ON ZERO ON 


02838 : 


AFTER 


BUFFER IS 'KILLED', THE POSITI 








8193B I 




RACTEF 191, 


02848 ; 


THE SCKCtn snuuLu be. inr. ijHArniL L.nn 


47 93 CDC9B1 


01948 TXTSVA 


CALL KLSC ;••••• SAVE TEXT 




B2858 ; 


FOLLOWED BY ' t' , 


TO TAPE *■•* 

479b DD21D148 81958 


LD IX, H6 










479A CI>fi247 


B19ti 


CALL MESSAC 


4845 CDC901 


02878 VWTEXT 


CALL 


KLSC 


47 9D CD5547 


11971 


CALL KBSCAN 


4B48 213449 


02880 


LD 


HL,8UFF 


47A* AF 


I19B0 


XOB A 


484B 11B83C 


B2S9B 


LD 


DK,3C00H 


47A1 CD12e2 


B1991 


CALL 212H 


484E 81FCB3 


82980 


LD 


BC,IB20 


47A4 CD8702 


82888 


CALL B287H 


4851 EDBB 


02918 


LDIR 




47A7 213449 


02810 


LD HL,BUFF 


4853 CD5547 


02928 


CALL 


KBSCAN 


47AA 7E 


02020 


LD A,(HL) 


4856 C3eC46 


02938 


JP 


OPTS 


47AB 06eB 


82038 MRLOOP 


LD B,B 




02948 






47M> 7E 


02840 


LD A,(HL) 




02958 "LIST 


OFF 




47AE CD6482 


82058 


CALL B26 4K 




03190 *LIST 


ON 




47B1 FEBF 


02060 


CP 191 jGRAPIC CODE ENDS HR 




03288 ; 






ITE 






4931 C3191A 


83210 BASIC 


JP 


eiA19H .-RETURN TO BASIC 'HE 


47B3 2SB5 


02070 


JR Z,GOBACX 


AD7' 








47B5 23 


020B) 


IHC HL 


4934 


13228 BUFF 


EQU 


S 


47B6 ieF3 


82898 


DJHZ WPLOOP 


lEBI 


83238 


DEFS 


12000 


47B8 18F1 


02188 


JB HRLOOP 


7B14 


83248 STORE 


EQU 


S 


47BA CDFBBl 


82110 COBACK 


CALL 91F8H 


7B1G 


83250 TB 


EQU 


5+2 


47 BQ C36C46 


B212B 
02130 ; 


JP OPTS 


4eGC 

NS TABLE 


03260 


END 


OPTS ! START PBOG AT OPTIO 


47CB CDC9ei 


02140 TXTLOE 




00BB0 TOTAL 


ERRORS 
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Simput"^ 

UTILITY PROGRAM i i FROM HIKARt GROUP 



SIMPUT is a flexible random access 
program for TRS 80 Model I' that lets 
you manage extremely complex data 
with great simplicity. It allows you to 
create records from one byte to more 
than 85,000 bytes long, with as many 
subrecords as you need, and it can be 
used with Microsoft's Basic Compiler. 



SIMPUT has been tested to be 
compatible with TRSDOS* (can be 
compiled), DBLDOS' (also can be 
compiled), NEWDOS+. NEWDOS 80', 
NEWDOS 80 V.2-, and NEWDOS 80. 
with Double-Zap/ll' 

Available on Dltk 

$29.95 

(206) 382-6632 



■TRS 80 MODEL I THSDOS TMs. TANDY COUP DBLDOS TM, PEPcoM Hikafj Group 3032 Foufth Avsnu© West 

DATACO NEWDOS- NEWDOS 80. NEWDOS flOV 2 IMS. APPARAT -, ,,, L,'„„.„„ na-t-tn 

INC DousLE zAF'ii TM SOFTWARE. ETC Seattle, Washington 98119 



101 U/€/ FOR 

mk:rocomput€R 

no. 2 




Electronic Engineers 

Electronic Hobbyists 

Electronic Students 

Ham Operators 



TRS80-* 

MODEL I 
LEVEL II 
2 DISK 



A General DC AC (steady state) 
Analysis of Any Circuit 

Win Analyze and Compute: 

• Node, Brdiu h Elfmeni. Voli^igrs 

• Ntidr. tirdrii h. Klrmrni. rurrrnl.s 

• Brani h Hnwrr DisMiiaiii)!! 

• Mafjniliiil^ .111(1 phj'.f v.iliiCsaiiil n iiiiplili- 
Irrqvirnrv rcsp<insr with ^Tjplnt ili'^|>l.i\ 

• V5cit1i(v .inv cIc-iiiriK ill ciri ml Iiir d(--i i cil 
rfiulls 




A cor 

■led 

conipara(»iev<0 I B M s 

E.G A P yrP'ogiarr, 
■AC Analyste P'OQ'am 

gom 



Altai ou( 
BIG SUCCESS 

Aiih these D'cg-d-^'j 
Ae cai TOA se ■ ' 

'O- G-l > 

S79.9S 

FOR BOTH PROGRAMS 



VISA OR MASTERCHARGE ACCEPTED 

i I. . N, .1 S.'iiil t .1-1. .n '111 Mill 



G ft L Software Enterp. 
2304 N. iBt. Street 
Upland. CA 91786 

TRS-80^'^ isalrademarkoMheTafuly Coro E.G A.P is a 
traaomatk o' Internalional Business Machines, Inc 



TM 



PONY EXPRESS: software for an electronic mail network 

Hook up your office and home micro-computers . . . Connect your branch offices . . . Create a micro- 
computer network with friends, clients or associates ... All you need is your present telephone and 



The Pony Express 



TM 






The Pony Kxpress lets two micro-computtTs exchange any information you choose — letter, a con- 
tract, graphics. VisiCalc '^ models, even other programs - over regular telephone lines. It is custom- 
fit, fully compatible with your software. With the unique on-line manual and guided waJkthru features. 
a computer novice can master Pony the first time he uses it. Pony's security system, and time and 
money saving features make it ideal for business applications. Home users will find it equally practical. 
The Pony Express is a package that is; 



desiuned by manaupmeiit consul lanls, ant! field- 
testf>tl in Ijusiness and professional application.s 

easy to use, requirint; only plain English. About the 
most complicated compulerese is the term "file." 
easy to learn, displaying WALK THRU comments and 
reminders while you run il. 

superlily documented, with a computerized manual 
that puis you a touch-of-a-l>utlnn away from all vou 
need to know. 



economical of vour time; unattended it handles a 
diskful of data" through its INBASKET and OL'T- 
BASKET features. 

secure and discrete, it lets an tiperalor run the system 
"blind", never laying eyes on sensitive information 
reliai>le, it automatically corrects transmission errors 
to ensure that what you send is what gets there, 
mindful of your phone bills, the TOLL-S.AV'ER and 
Sl'PER TOLL-S.AVER leaturescul transmission time 
up to 70'"'. 



PONY EXPRESS"' : "thoughtful software"^"" from the Philadelphia Consulting Group, Inc. 



^?ei 



Available for Radio Shack^ 32 K Model 111 
with 2 disks. Most features uork with 1 
disk. Modem and RS232 communications 
interface required. INQUIRE ABOUT FU- 
TURE AVAILABILITY FOR OTHER 
COMPUTERS. Dealei and OFM inquirit-s 
invited. 



Software for 2-nicmber network: $140 
Each additional member: 40 

Manual only (fully credited toward 
purchase) 1 ."i 

'Radio Shack and TRSDOS are trademarks 
of Tandy Corporation. DOSPLUS is a 
trademark of Micro Systems Software, Inc. 
VisiCak is a trademark of Personal Soft- 
ware, Inc. 



Visa and Master Card orders: 
Call 1-800-227-1617. EXTENSION 203. 

In California Call 1 -BOO-772-3545. 
Specify TRSDOS* or DOSPLUS*. PA 
residents add 6% sales tax. Inquiries and 
other orders (payment enclosed): The 
Philade'.phia ConsultinR Group, Dept. 
Pt:-14. P. O. Box 102. Wynnewood, PA 
19096. 



'See List of Advertisers on page 418 
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59 CALENDAR 



Coming Attractions 

So you've made a New Year's resolu- 
tion to control your fits of hair-pulling 
when you encounter a frustrating CLOAD. 
You're ready to dish out the dough and up- 
grade your system. Then the buyer's guide 
to disk drives tn January's 80 Micro 
is for you. 80 Micro is also kicking off 
the new year with stories on Videolext — 
what it is and where it is; Telidon— 
have the Canadians got the drop on Uncle 
Sam in the home information revolution; 
and a special business section for readers 
that finished the November 80 Micro 
hungry for more. 



January 

12-15 Ken Orr and Associates Inc., To- 



peka, KS. Course on structured re- 
quirements definition, Toronto, 
Canada. 

18-22 Ken Orr and Associates Inc.. To- 
peka. KS Course on structured 
systems design and structured re- 
quirements definition, Houston, 
TX. 

19-22 Ken Orr and Associates Inc., To- 
peka, KS- Course on structured re- 
quirements definition, Kansas Ci- 
ty, MO. 

25 Ken Orr and Associates Inc., To- 
peka. KS Course on management 
overview of data structured sys- 
tems design, Tulsa. OK. 

25-29 Ken Orr and Associates Inc., To- 
peka, KS. Course on structured 
systems design and structured 




program design, Cleveland, OH. 

26-29 Ken Orr and Associates Inc., To- 
peka. KS. Course on structured 
system design, Chicago, IL. 

27 Ken Orr and Associates Inc., To- 

peka. KS. Course on management 
overview of data structured sys- 
tems design, Tulsa, OK. 

28-29 Construction Industry Press, Silver 
Spring, MD. Conference on com- 
puters in construction, San Diego, 
CA. 

29 Ken Orr and Associates Inc., To- 
peka. KS. Course on management 
overview of data structured sys- 
tems design, Omaha, N8. 



February 



26-28 Adventure International. Long- 
wood. FL- Computer Expo '82 
trade show, Orlando. FL. 



March 

1-2 Michigan Association for Comput- 
er Users in Learning, Wayne, Ml. 
Sixth annual convention featuring 
sessions on facets of education 
uses for computers. Western 
Michigan University. Kalamazoo, 
Ml. 

3-7 Catalyst, Jersey City State Col- 
iege. Jersey City, NJ. Microcom- 
puter Week '82, "an international 
event of significance to educa- 
tors," Jersey City State College, 
Jersey City, NJ. 

7-9 American Management Associa- 
tions, New York, NY. Course on pa- 
perwork management, Hartford. 
CT. 
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■TRS-80 IS a traflemarK o( 

Radio Shacti Division ol Tandy Core 



Annotated BASIC— A New Technique for Neophytes. 

BASIC programming was supposed to be simple — a beginner's programming 
language which was so near to English Ihat il could be easily understood. But, in re- 
cent years. BASIC has become much more powerful and therefore much more dif- 
ficult to read and understand. BASIC simply isn't basic anymore. 

Annotated BASIC explains the complexities of modern BASIC- It includes com- 
plete TRS-80* Level II BASIC programs that you can use. Each program is annotated 
to explain in step-by-step fashion the workings of the program. Programs are 
flowcharted to assist you in following the operational sequence. And— each chapter 
includes a description of the new concepts which have been introduced. 

Annotated BASJC deals with the hows and whys of TRS-80 BASIC programming. 
How is a program put together? Why is it written that way? By observing the pro- 
grams and following the annotation, you can develop new techniques to use in your 
own programs— or modify commercial programs for your specific use, 

AnoofjfMf BASIC Volume 1 conrains Projecting Prolils, Sutveyor, Thmga to Do. Tax Etieller. Int'oduction lo 
Digilal Logic. Camolol, Tho Soundox Code, Deduction, Op Amp, Conlractor Coat Estimating (available 
NovembeO aK73a4S10^S tSBN 0-88006-028- X 

Annolatad BASIC VoIuitm 2 contains Hougfi Lumber LiSI, Trip Mileage. Fligfit Plan, OSCAR Data, SWR/Antenna 
Design, Supetmaze. Petals Around Itie Rose, Numeric Analysis. Demons. Air Raid Geography Test, Plumbing 
System Design (available February) BK73aS S10,95 ISBN r>«8006-037 9 

Order Both Volumes and Save! BK738402 $18.95 
Kilobaud Klassroom— 
A practical course in digital electronics 

by George Young and Peter Stark 

Learning electronics theory without practice isn't easy. And it's no fun to build an 
electronics project that you can't use. Kilobaud Klassroom, the popular series first 
published in Kilobaud Microcomputing, combines theory with practice. This \s a practi- 
cal course in digital electronics. It starts out with very simple electronics projects, and 
by the end of the course, you'll construct your own working microcomputer! 
Authors Young and Stark are experienced teachers, and their approach is simple 
and direct. Whether you're learning at home or in the classroom, this book pro- 
vides you with a solid background in electronics — and you'll own a computer that 
you built yourself! 

Kilobaud Klassroom contains Gelling the Ball Rolling, Gates and f lip-Flops Explained. J K. FhpFlops and 
Clocked Logic, PC Boards and Power Supplies. Hardware Logical Functions, Voltage. Current and Power Sup- 
plies. Transistors, Diodes and OP Amps, Pulses and More Pulses, Counters ano Registers. 8us Trallic Con- 
trol, ROM and HAM Mamories, 1(0 Circuitry, Parallel and Serial \I0 Ports, Computer I/O III. Computer \I0 IV. 
Computer l;0 V. Processor Connections, Finally The Kilobaud Krescando 6proms and Troubleshooting, 
Expansions and Programming, Machine-Language Programming. Assembly. Language Programming. Con 
necling to the Outside World 

ISBN ofl8oofr027-i (available December) BK7386 $14.95 

The New Weather Satellite Handbook 

By Dr. Ralph E. Taggart WB8DQT 

Here is the completely updated and revised edition of the best-selling Weather 
Satellite Handbook- containing all the information on the most sophisticated 
spacecraft now in orbit- Dr. Taggart has written this book to serve both the ex- 
perienced amateur satellite enthusiast and the newcomer. The book is an introduc- 
tion to satellite watching that tells you how to construct a complete and highly effec- 
tive ground station. Not just ideas, but solid hardware designs and all the instruc- 
tions necessary to operate the equipment are included. An entire chapter is devoted 
to microcomputers and the Weather Satellite Station. And for the thousands of ex- 
perimenters who are operating stations, The New Weather Salellile Handbook 
details all the procedures necessary to follow the current spacecraft. 

Weather Satellite contains Opefaiionai Satellite Systems. Antenna Systems, Weather Satellite Receivers. A 
Cathode Ray Tut)e fCRTj Monitor lor Satellite Pictu'e Display. A Direct-Prinlmg Facsimile Syslem tor Weather 
Satellite Display. How to Find the Satellite. Test Equipment. Microcomputers and the Weaiher Satellite Station, 
Station operations ISBN 0-88006^3158 BVaJlable HOW! BK7383 $8.95 




FOR TOLL-FREE ORDERING CALL 1-800-258-5473 
WAYNE GREEN BOOKS • PETERBOROUGH NH 03458 

Use irie order card or itemize your order on a separala piece of paper and mall to Wayne Green Book Att: Sales • Peterborough NH 03458 
Be sure to inciude check or detailed credit card intormalion. (Visa. Master Charge or American Express accepted i 

No C O D orders accepted All orders add $1 50 handling. Please allow 4-6 weeks after publication for delivery Questions regarding your order^ 
Please write to Customer Service at the above address 



-SeeL'Sf o'Atfwerr/sfffs on page 4' 8 
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TECHNIQUE 



LOAD 80 



Tips for those who aren't. 



Get Organized 



Stuart L. Lesley 
e05 S 'H' St.. Apt. 7 
Lake Worth. FL 33460 



My dining room table has 
disappeared under a pile 
of computer printouts, disks, 
reference materials and other 
items needed for programming 
my TRS-80 Model I . At the office 
the computer room (designated 
as such in name only) is in a 
similar state of disorganiza- 
tion. 

As a subscriber to 80 Micro- 
computing for the past nine 
months I have found fascinating 
articles that were extremely 
interesting and valuable to 
me. Yet I found that I 
could apply only a small per- 
centage of any article to my 
own personal or business pro- 
jects. There is a very definite 
reason for this. I am not or- 
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ganized. i was hoping the com- 
puter would help me to t>ecome 
more organized only to dis- 
cover that it added to my dil- 
emma. I will work on one pro- 
gram for awhile, leave it for 
another project, and come back 
only to find that I can't even 
remember which disk it was 
on or what name I had assigned 
to it. 

Therefore, I wish to pass 
along some of the things that I 
have tried that may help others, 
along with raising some inspira- 
tion among readers to write 
some articles on what you have 
found helped get you organized. 

Subroutine Library 

There is one technique that I 
use with a large amount of suc- 
cess. As ! create a program for 
a specific use, I usually find 
that the subroutines I create for 
repeated tasks have a fairly 
broad application. These sub- 
routines range in size from one 
line to 20-30 lines, and they not 
only save memory but also save 
time in the creation or writing of 
the program. 

I have started to create what I 
call a subroutine library. I write 



Program Listing 



1 CLERBIlfleeei :DEFINTH,S,Y,I,X,Z,T,N,0:CLS:PRINTCHHS123) "TWO - W 
AY ANOVA"iPRINT:PRlNT"llPDATE 07/24/88 ": PRIKT'THIS PROGRAM HILL 
USE UNF.QUAL":PRINT"SCORES PKB CELL' iFORX-lTOlBUe : NEXTiGOSUBig : GO 
SUB25!CLS:NC-CR:FORX''1TOCB:T1«TH-N(X1 :NEXTiT-Tl 

2 GOSUB3:G05UBll!GOSUB24 

3 CLS: PRINTe384 , "NOW COMPUTING COLUMN AND ROW "N" VALUES" : FORX'l 
T0C:FOHI-XT0NCSTEPC:S(X)''S(X)*N(I) : NEXTI ,X ; Y»! : FOflX-lTOfi: FORl-YT 
0|Y*IC-111 ■R(Xl-B(X)tN(i) :NEXTI:Y-Y+C:NEXTX:CLS:PHINTe3B4,"NOW C 
ALCULATING CELL MEANS" : FORX-ITOCH: FORI-lTONl XI 

4 L-L»iAlX,I} ) :NEXT1:L-L/NU) iMlX) =L:L-B:KEXTX:CLS:PRIKT^3e4,"NO 
W CALCULATIKG HAHHONIC MEAN" ; FORX = ITOCk: H-H-. ( 1/N( X) ) : KEXTX iH-CR,' 
H:CLS;PRINT^3e4,"NOW CALCULATING THE GRAND MEA^■ :G-fl : FORX= ITOCR: 
G-G->fl|X) sNEXTXiCLS 

5 PRINT§384,'(40W CALCULATING THE USABLE GRAND MEAN' :G' ( |G | 21/CR) 
:CLSiPRINTi3B4, "NOW CALCULATING CELL SCORE SOUARES" : FORX-ITOCR: F 
ORI-lTONlX} :E[X,I)-IA(X,I) [2) :NEXTI : NEXTX : CLS : FRINTS3 84 , "HOW CAL 
CCLATING SQUARES KITHIN CELLS" : FORX'ITOCR 

i FORI-ITON(X) :K1-KH(A(X,I) [2) : NEXTI :NEXTX: FORX-ITONC: FORI-ITON 

(X) :X2<K2+A(X,I) :NEXTI : K2'K2 | 2 : K2'K2/N(X) :K3-k34-k2 : K2-e : NEXTX : E3 

•Xl-K3:CLS:PHINT^3B4,"SOK CALCULATING SQUARE OP ROWS* !L6-B : L7-H : 

FORX-lTOCRSTEPCiFORI-XTOX+lC-l) iL6-L6*«lI) ! NEXTI 

7 L7''L7*L6; 2:L6-e:NEXTX!L7-L7/C!CLS:PRlNTS3B4,'I«)W CALCULATING C 

OLUKNS SQUARED"!L6-e:LB'e:FOHX-lTOCiFORl-XTOCRSTEPC:L6-1.6tB[l) iK 

EXTI:LB"LB + L6[2:L6«B:NEXTX:L8-LB/R:CLS:PRIIJTS3 8*,"NOH CALCULATIN 

G SQUARES OF ROW'COL HEAHS' :L9-a : FORX-ITOCR 

B L9-L9*(I1(X) 12) :NEXTX:CLS:PRINT*384,'NOW CALCULATING SSR":E2-(L 

7-G) •K!CLS:PRINT^384,"NOW CALCULATING SSC" : El -( L8-G| 'H :CLS ; PRINT 

?3B4,"»OW CALCULATING SSR'C" iE5- (( L9+G) - I L7 tLfl) 1 'H :CLS : PRINT?384 

,"NOW CALCULATING SST" : E4- ( E1+E2+E3+E5) iCLS 

9 PBllJTe384, 'DEGREES OF FREEDOM NOWI I I " jDC-C-l :DH-R-1 : DX- I IB-1) ■ 

(C-1) ) !FORX.^lTOCR:DW-DW.(N(Xl-l) :NEXT:DT-DC+DH*DX+DW:CLS: PRIMT#3 

B4,-N0H I'H DOING MS" :Q1=e:/DC:Q2-E2/DR! 03-E5/DX :Q4-E3/DW:CLS : PR 

INTi384,"NOW i'H ON CALCULATED ' F ' . * : PC-QI/Q* 

Ifl FR-Q2/Q4:FX-Q3/04:CI.S:RETUHN 

11 PRINT" DATA TABLE"!PRINT"SOURCE"jTAB[12| "DF 
";TAB(24) "SS"|TAB(36) "ME"; TAB I 48] "CAL. F" : PRINT'COL" ;TAB( 12) DC ; T 
AB(241 El!TAB(36)01;TAB(481PC:PHIST"ROW"|TAB{12)DR;TAB(24)E2;TAB( 
36)Q2;TAB(4B)FR 

12 PFIKT"C X R"rTAB(i:)DX;TAB|24)E5;TAB(36)03jTAB(48)FX:PRINT-H 
/ C"jTAB(12)DW;TAB(24)E3;TAB(361Q4;FRINT*TOTAL"|TAB(12)DT;TAB(24 
lE4:PRIKTiPRINT*F0R DF TO F TABLE USE :"■ PRINT "COL -" [DC ; "/" [DW: 
PRINT" ROW -•jDRi"/"[DW:PRIKT"CXH -"|DXi"/"|DW 

13 RETURN 

14 AS-"':LPEIWTSTHINGS(3,CHRSI13fl) ) :1NPUT"ENTER THE TABLE NAKE'j 
QHS:LPRINTTAB(2B) "DATA TABLE 'jCHRSdZS);" "jQRS;" ";CKRS(125); 
CHRSU3B) :GOSUB31:LPBINT"SOURCE-jTABI12)*DF*;TAB(24) "SS";TAB(3S) 
■MS"|TAB148) "CAL. F"!GOSOB32 

15 LPRINT"COL"|TAB(12)DCiTAB[24)ElfTAB(361QljTAB148)FC:GOSUB32!L 
PBINT"HOW"/TAB(12)DBiTAB(241 E2 iTAB[ 36) 02iTAB( 4 8) FR:GOSUB32 ! LPRI N 
T"C X R*;TAB(12)DX!TAB(241E5iTAB{3filQ3;TAB(4B)FX!GOSUB32:LPRINT" 
W / C*;TAB(12)DW;TAB(24)E3fTAB(3*IQ4:COSUB33 

16 LPRINT"TOTAL";TAB(12)DT;TAB|24)E4:GOSUB33:LPRIBT:LPRItJT"FOH D 

PrografT) cO"f">'t*"i 



each subroutine 1 create that 
might have further applications 
on a three by five-inch card. On 
one side is the actual sub- 
routine and any variable assign- 
ments. My library is small at this 
time but I know it will grow My 
hope is to eventually bring as 
much of the program creation 
process as I can into a Cook- 
book mode. 

As an example, I have the 
following subroutines in my 
library: 

• Press any key to continue— 
this subroutine also includes 
the screen format information 
so I know where the prompts will 
appear. 

■Press any key to continue/ 
CLS — this prints a flashing 
asterisk when the screen is 
about to be cleared, as in 
Tandy's Model disk instruction 
course. 

I can smell the smoke of spin- 
ning wheels now as you start 
thinking about putting the sut)- 
routine library into the computer 
itself. Why not? Simply ensure 
that the program line numbers 
assigned to the subroutine are 
high enough not to overwrite 
your main program and remem- 
ber to save your subroutine us- 
ing the ,A (save ASCII) option. 
When you wish to append your 
subroutine to your main pro- 
gram use the Merge command 
(subroutine on disk, main pro- 
gram in RAM). I have used this 
method with very satisfactory 
results. However, I believe the 
three by five-inch cards are the 
most efficient way to store the 
subroutines for program crea- 
tion. 

Program Boarding 

A second technique I have 
started experimenting with I 
borrowed from television pro- 
gram creation. This is a collec- 
tion of techniques used for 
creating many of the shows 
seen on TV. One of the most im- 
portant early steps in creating a 
television program is story 
boarding. Each individual scene 
is put on a three by five-inch 
card and then laid out in se- 
quence to see how it flows. 
By using these cards you can 
rearrange at will and complete- 
ly turn around the flow of the 
story (program) without having 



to rewrite anything at all. 

I have begun using this 
technique for organizing my 
screen formats. Now it is true 
that you cannot fit an entire 
screen format onto a three by 
five-inch card but you can put 
the general idea on the card. 
Once you have 'story boarded' 
your program you can then take 
those handy cards and create 
the screen format on the proper 
formatting sheets (available 
from Radio Shack only for the 
Model I). Upon completion com- 
bine that information with your 
flowchart of the computations 
involved and your program is 
now ready to be coded into 
Basic. I am limited to working in 
self-taught Basic so I am uncer- 
tain how well this will work with 
other programming languages. 
Considering that there is no ac- 
tual coding done until the very 
last step there should be lit- 
tle difficulty in adapting these 
methods to other languages. 

As I mentioned before there 
is no screen formatting sheet 
available from Tandy for the 23 
by BO format. In the meantime, I 
have created a screen format- 



P'ograT' conrmued 

F TO F TABLE USE : " iLPBIHT'COE. -" ,DC; ■/" iDW: LPBINTBOW -'jDH;"/ 

■jDHjLPRIMT'CXR -■iDX;"/"iDW 

n PRIffTjPRINT'ENTER 1 TO GET HARD COPY OF SCORES" : INPUTAS: IFAS- 

•1'TBEK2JEL£E1B 

IB INPUT'EMTER TO END*iA5:END 

19 DINBISI.SD.AfSBrSI) ,T(Se) ,n(5B) ,N(S)) ,C(5B) :CL5: PRINT93 64 , *g 

NTEB THE NUHBEB OF COLUMNS AND BOWS (C,fi) ' : IKPUTC,R:CR-C»R! CLSjC 

LS:FOR](-lTOCR!lffl-l!CLS:PBINT?3B4,'EtITEB SCORES FOB CELL *iX;:PSl 

NT" I END WITH ■ e ' smaOL I ■ 

29 INPUTAS: IFAS- "*"THENaiELSEA[X,NNl ■VAL(AS) : AS-" iNH-NN.l :GOT02 

■ 

21 AS-";H{Xl-HN-l!NEXTX:FORX-lTOCB!S-S»H(X) iHEXT:BETUBN 

22 CLS:PR1HTCHHS(23) *YOU HAVE WADE" iPRINT: FBIWT'AN ENTBY ERROR 1 
[■!PBINT:PRIKT"ENTEH AGAIK PLEASE* [F0RX-lT02flflB ! NEXTrGOTOl 

23 FORX-lTOCH:rORZ-lTOH(Xl !LPRIKT"CELL I " ; K ; "SCORE t " ; Z i ■-" j A[X, Z 
) :HEXTZ,XiGOT0ie 

24 PRI(n'"F0B PRINT OUT ENTER 1 " ( ! IHPUTAS ; IFAS-" 1"THEN14ELS 

En 

15 CLS:PRI(n'i3B4, "ENTER 1 TO EDIT SCDRES* : INPUTAS : IFASO "1"THEH3 
BELSEF0RX-lTOCR:PRI(IT"F0LL0VfIHG ARE THE SCORES FOR CELL t ";X:FO 
RY-1T0N[XJ :FRIST"SCORE 'jY;' IS " j I A [X , Y) ) :NEXTY : PBINT'DO YOU WI 
Stj TO CHANGE ANY SCORES IN CELL "iX 

26 INPUT"ENTER Y OR N " ; AS : IFAS-"N"THEN:9ELSEH-1 

27 PRIWT'END SCORE ENTRY WITH ' g ' ALL SCORES MUST BE HE-EN 

TERED.'iPRINT-SCOBE "jH;" FOB CELL "|Xi" SHOULD BE ?77" : INPUTAS : 
irAS-"e"THEN2BEl.SEA(X,m-VAL(AS) : N-N*l :G0TO27 

2a N-H-1:N(X1 -N 
29 NEXTX 
3B RETURN 

31 LPRINTSTRIHCS(6 ,CHRS{3 41n I CURS {241) ; STRINGS ( 14 ,CHRS( 2411 I I CH 
RS(2431 jSTRINGS(12,CHRS(2 41! ) fCRR5(2411 jSTBIMGS ( 12 ,CHRS{ 241) ) iCH 
RSI 2431 JSTRINCS(1B,CHHS(2411 ) ;CKRS(2421 : RETURN 

32 LPRINTSTR1NGS16,CHRS(2411 ) !CHBS125B) ; STRINGS U4 .CHRS I 241 ) ) I CH 
RSI25B) ! STRINGS il2,CHR5( 241) ) ;CHRS[25e) ; STRINGS U 2 .CHRS{ 241 | ) j CH 
BS(25il !STRI»GS(1B,CHRS1241) ) !CHRS!24 9! j RETURN 

33 LPRINTSTRI»GS(6,CHHSj2 41) ) rCKRS(24a) jSTRINGS (14 ,CHRS i 241) ) ;CH 
BS(248)iSTRIMCSll2,C:HRS(241));CHRS(24a) jSTRINGS(12,CHRS(241));CH 
BS(247} iRETlIHN 



ting sheet that has helped me 
greatly in creating screen for- 
mats for the Model II. I created 
it to fill my specific needs; 
these needs may not be the 
same as yours (see Fig. 1). 
Well that's it— nothing fancy 



or earth shattering, yet it just 

might make the programmer's 
task (either business or per- 
sonal) just a little easier. Now 
how about the rest of you out 
there? I could use some help; 
any idea5?H 



PROGRAM. 



23" 80 Format Sheet 



SCREEN 




Fig. 1 
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REIOAD 80 



This Christmas our LOAD80 
stocking contains some 
good news and some bad news. 
In addition, the LOAD80 Santa 
has consented lo answer reader 
queries about how LOAD80 is 
assembled each month. 

First, the good news: Starting 
with the JanuatY issue of 80 
Microcomputing, LOAD80 will 
be offered on tape and disk. The 
single density double-sided disk 
will operate under Model I TRS 
DOS. but will not contain an op- 
erating system. The Basic pro- 
grams can he used on (he Model 
III, except where noted in the 
magazine articles; convert these 
using the Model III TRSDOS Con 
vert utility. The price for the disk 
version of LOAD80 will be$14.95. 
The bad news in our Christ- 
mas stocking: There will be no 
Color Computer LOAD80 this 
year. An evaluation of the Color 
Computer articles published to 
date reveals that there just 
haven't been enough to warrant a 
special edition LOAD80 A Color 
LOAD80 wiM appear as soon as 
enough material is accumulated. 
Wayne Green Inc.'s Circula- 
tion Department will announce a 
subscriphon plan for LOAD80 
on January 1. 1982. Watch the 
LOAD80 advertisements in 80 
Microcomputing tor particulars. 

LOAD60 Errata 

The October LOAD80 tape 
contained two programs that 
did not appear in the October 
issue of the magazine. The pro- 
gram JERICHO accompanied 
the September article entitled 
■The Walls of Jericho", on page 
292 BOOKS, a Basic program, 
does not actually accompany 
the article on page 234 of the Oc- 
tober issue The article that con- 
tained this program was pulled 
from the magazine at the last 
minute. "Hard and Soft Print- 
ware" was a post-deadline sub- 
stitute and Its program will not 
be ottered on any LOAD80 tape 



Hows and Whys 

Frustration! That's the by- 
word for 80s editors each month 
as they sit down to decide which 
programs will appear on the 
LOAD80 tape. We would like to 
include all the programs on the 
tape, but there are constraints. 
We know it is frustrating for you. 
the reader, as well— we thought 
you might be interested to learn 
of the problems we run into. 

The first problem we encount- 
er is time. Our manufacturer has 
requested that we keep the 
LOAD60 tapes under 28 min- 
utes. Some months this is easy, 
but during others it means some 
programs have to be sacrificed. 
Our selection process Involves 
an evaluation of a programs 
usefulness and the quality of its 
conlruction. We realize you won't 
always agree with our choices, 
but we hope you understand why 
we have to make them. 

Another constraint, very often 
a more important one. is the 
absence of a magnetic copy of 
the program. If an author does 
not send us a program copy on 
tape or disk, we cannot include 



it on the LOAD80 tape. We make 
every effort to obtain magnetic 
copies from authors but occa- 
sionally do not succeed. Over 
and above this difficulty, we 
sometimes lose a tape or encoun- 
ter a glitch that destroys a pro- 
gram too late in the production 
process to obtain another copy. 

Finally, there is the constraint 
of first publication rights. We 
sometimes purchase, always at 
an author's request, the right to 
publish an article and program 
listing only. This request is 
usually made by an author plan- 
ning to commercially produce 
the software. 

We constantly upgrade our 
administrative procedure for the 
LOAD80 project in an attempt to 
eliminate these problems (and 
the problems listed in this 
month's Errata section). For ex- 
ample, in coming months the 
LOAD80 logo will appear near 
the title of each article whose 
program appears on the 
LOAD80 tape Any suggestions 
you have will be welcome. 

Next month, more on 80 Af/cro 
production hassles.! 





December LOAD80 DifCtory 


Pgm# 


Pgm Name 


PageN 


Comments 


1 


Logbook 


100 


Disk Basic 


2 


Stamps 


108 


None 


3 


Planti 


116 


None 


A 


Plant2 


116 


None 


5 


Coins 


134 


None 


6 


Chess 


154 


None 


7 


Heat 


220 


None 


8 


Golf 


226 


None 


9 


Sentry 


242 


None 


10 


Rammer 


252 


None 


11 


BIckbk 


278 


None 


12 


DDentry 


280 


None 


13 


Writer 


290 


None 


14 


City 


310 


None 


15 


AnInMan 


314 


None 


16 


FloppyFix 


326 


None 


17 


Queue 


368 


None 


18 


Logger 


374 


None 


19 


Lunacy 


386 


None 


20 


Organize 


398 


None 
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Program Ncune 


Page Number 


Compare 


271 


Educ4 


14 4 


Educ8 


144 


Cents 


192 


Dotgam 


210 


Checks 


214 


Lunar 


March 


Wherzitl 


252 


Wherzit2 


252 


Expo 


26 6 


Boothe4 


117 


BootheB 


117 


Boothe6 


X17 


BootheV 


117 


Boothe/Src 


117 


SiraulSB 


154 


Astrol 


17 9 


Manage 


186 


Vardoc 


291 


Sort 


26 4 


Homecalc 


100 


Encode/Bas 


234 


Disco 


195 


Boa 


294 


Dome 


128 


Cardeal 


113 


Random 


246 


Wrap 


109 


Invid 


176 


Dollarl 


216 


Dollar2 


218 


Average 


292 


Scroller 


204 


Car an 


93 


Scroller/Src 


205 


Listl/Src 


39 


List3/Scc 


40 


Shftrv/Src 


262 


Invert/Src 


176 


Comprs/Scc 


270 


Linel/Src 


139 


Ramtst/Scc 


14 8 


Sargiol/Src 


27 4 


Sargio2/Src 


27 4 


Boothe3 


68 


Henmgr/Bas 


17 8 


Sub 


186 


Copykill 


224 


Mileag 


236 


Lunar 


244 


P/Cmd 


246 


Electr 


288 


Porecast/Mkt 


269 


Stock/Ana 


274 


Fin/Ana 


284 


Ledger 


May/222 


Pilot 


122 


Pilot2 


124 


Bbox 


217 


Disas 


244 


Tpascal 


154 


Twohaf 


282 


Twohaf 2 


202 


Hispeed 


280 


Frknstn 


92 


Tank 


104 


Spcemp 


106 


Strgurd 


116 


Race 


122 


Epexcr 


126 


Epslct 


126 


Lastest 


136 


Morse 


150 


Message 


150 


Dataen/Src 


168 



8 
8 
8 
8 
8 
8 
8 
8 
8 
8 
9 
9 
9 
9 
9 
9 
9 
9 
9 
9 
9 
9 
9 
9 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

10 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

11 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 

12 



Vidspc 


180 


Relshp 


192 


Vcesyn 


208 


Srtsof sr 


214 


Disas 


240 


Phodex 


24 8 


Sprusr/Src 


256 


Dirprog 


270 


Strtrk 


86 


Cmdfil 


27 8 


Rotate 


154 


Rotate2 


154 


Memxpd/Src 


17 4 


Convrt/Src 


186 


Hidpics 


204 


Sorter 


220 


Slptslpc/Stc 


228 


Hrsrce 


24 4 


Errprt 


25 


Lifetime 


252 


Diskchrgr 


286 


Cartoon 


320 


Bascal 


33 4 


Lastest 


Aug/136 


Mastmind 


122 


Syllog 


132 


Voice 


141 


Speak 


141 


Type 


141 


Talker 


146 


Bskball 


184 


Horaeinvt 


220 


Sunset 


272 


Freezer 


274 


Trscpm 


288 


Yahtzee 


302 


Bridge 


306 


Firefght 


316 


Space 


334 


Jericho 


Sep/292 


Tprgen/Src 


196 


Autokey/Src 


242 


Asmptch/Src 


326 


Edasf ix/Src 


344 


Copyit/Src 


370 


Tenant 


138 


Invest 


144 


House 


160 


Graphs 


176 


Prodtimer 


220 


Chain 


250 


Alter 


27 4 


Credun 


321 


Sprlist 


333 


Secsrc 


348 


Enhance 


384 


Logbook 


100 


Stamps 


108 


Plantl 


116 


Plant2 


116 


Coins 


134 


Chess 


154 


Heat 


220 


Golf 


226 


Sentry 


242 


Rammer 


252 


Blckbk 


27 8 


DDentry 


280 


Writer 


290 


City 


310 


AnInMan 


314 


FloppyFix 


326 


Queue 


368 


Logger 


374 


Lunancy 


386 


Organize 


398 
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Annual Index 
To Articles 



Articles are listed in alphabetical order by category, month 
and page (m:pg), short explanation, title and author's last name. 



APPtlCATIONS 






10141 


Hurnan applications 


Pgms For Handicapped 


l>lowak/ 


1:120 


Piecious metaJ caic 


Alter The Goiarush 


Frost 








Muswick 


1:174 


Oueueing simulator 


Line Up 


Anderson 


1&184 


Bbaii stats 


Hoops 


Corn well 


1233 


Population stiidies 


Number Cruncher 


BarPaiello 


10220 


Home inventory pgm 


Worldly Goods 


Fail 


2:122 


Piinier an 


Can Compiling Be Art 


Conroy 


10.272 


Predict these times 


Sunrise Sunset 


Skramstad 


2 152 


Lincoln- Peterson analys 


Pooolai'on Estirrtaiion 


Solomon 


10274 


Meat inventory pgm 


Fat City 


BuKll 


2154 


Evaluate property 


LanaiorO 


Tuotiy 


10.296 


Analysis-yourcnoices 


Cadet Decision Maker 


Albtno 


2:194 


Compule pefcenl comp 


Molality Crunching 


Slider 


10:316 


Fireman s Inend 


Fire St ream 


onto 


2:198 


Tally time carOs 


Punch Oul 


Conroy 


10:338 


Pocket comp loan pgms 


Loan Sharp 


AtMnt 


3:152 


A scheduling secretary 


fly Appointment Only 


Bused 


10:374 


Format a listing 


Lislprog 


niHH 


3:192 


Text analysis by letter 


Letter Counter 


Atttins 


11 118 


Computers in the ottice 


Paper Mountain 


Weirenga 


3:230 


Use sounO toi control 


80 Appliance Control 


Lewart 


11:220 


Assembly line analysis 


The Pacemaker 


Tinis 


3:274 


80 in the supermartiet 


Shopl'St 


Smith 


1V348 


Compare op-amps 


Second Sourcing 


Tin is 


4179 


Party interview 


This Am t No Pflffy 


Fason 


11 392 


Pocket comp analysis 


Pocket Stats 


Atkins 


4 186 


Casselie data bases 


Sans DisAs 


Hunier 


12 106 


Stamp collecting 


The Philatelist's Friend 


Castor 


4:192 


Evaluale da pennies 


Two Cents Worth 


Clayton 


12:116 


Horticulture 


House Plant Index 


Chipman 


4:214 


Chech writing rouline 


Endorse It 


Welcfwr 


12:128 


80 model railroad 


The BO Limited 


Latamore 


4252 


Keyword inOexing pgm 


Whenit 


Fox 


12 134 


Com inventory pgm 


Coirs 


Lloyd 


4261 


Ct)eck primer 


Check Vi/nte' 


Tiinberg 


12 150 


Pocket comp in super mk 


Sharp Marketing 


Atkins 


4266 


Ease 


Enpanentiai Smoothing 


Gorney 


12 172 


Computer and consumer 


Shopper's Aid 


Maninger 


5 182 


Geodesic Oorr^e design 


Dome Time 


NicKeil 


12 310 


How (ar (rom fiere to — 


City Accessibility Cal 


Todd 


5:219 


Language iranalatior 


Foreign Language TransI 


RoOinson 


12.314 


Ueihod of stock control 


Analytic Inventory Mng 


Harper 


6:122 


Micro- police net 


Dragnelworh 


KenneOy 


12.374 


Tape based file tracker 


The Logger 


Harris 


6:127 


80 runs oOservatofy 


Appi In Real Time 


Genet 


12:386 


Moon calendar 


Sheer Lunacy 


Harris 


6;U0 


Photocell data gathering 


Eye-BO 


Hawkes/ 
Heese 


BUSINESS 






6:236 


Gasoline usage trends 


Mileage Manager 


Frink 


2:216 


Elementary computing 


Some Fundamentals 


Tune 


7154 


Tiny pjl on disk 


Moa Tiny Pascal For Dsk 


Harrell 


3:200 


Analyze your business 


Mind four Own Business 


Glau 










3 240 


Payments, rates eic. 


The Loan Wrangler 


Jensen 


7,202 


jau-up Pasic 


EriharKe Lev II Basic 


Speocer 


5 222 


Tape based double entry 


The General Ledger 


Conhaim 


7:243 


Ponies on pochel cmptr 


Nag Analysis 


Crosby 


11 138 


Rental properly mver 


Tenant Tracker 


Kwascha 


8:150 


Ham application tor 80 


Morse-Besource P-1 


Jotte 


11 144 


Real estate analysis 


Investment Properly AnI 


Sparks 


8:192 


Trace roots 


Family Relationships 


Morwitz 


11 160 


Real estate invent ory 


The House Detecinre 


Comtnio 


8-248 


Photo cataiogir>g 


Hold That Pose 


Etwrts 


11:190 


Financial analysis 


Investment Du Jour 


Honess 


8:268 


Directory tracker 


Disk Index 


Schilling 


11:321 


Credit union health ani 


Slate ot the Union 


Reid 


8:290 


Business Letters 


Take a Letter 


Mullin 










8:294 


80 tracks sun position 


Solar Altitude Plotter 


Rea 


CONSTRUCnON 






9:130 


Ham soltware 


Morse Resource P-2 


Jolfe 


1:190 


Sound for Ihe 80 


Ormmatoeighty 


Mem 


9:252 


Calculate yours! 


Lifespan 


Wsiland 


1:20H 


Screen sketching 


Doodlebug 


McKenna 


9 262 


Pocket comp- horse race 


Equine Equation Evalu 


Herold 


2:175 


Build your own 


Very Versatile Interface 


Stanley 


9:286 


80 and election relurns 


Secret Ballot 


Busch 


4:134 


Build an HD interlace 


High Density Graphics 


Murray/ 


9:290 


On line printer IV 


Enhanced Word Processing 


Rogers 








Fowler 
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LEARN MATHEMATICS T>1E FUN WAY! 

PfOgrams thai aevelop malhematrcal reasorrinfl 

and estimaiion skill 

Beyona Ofili and practice' ' 

All ages will enioii these games itiat teacfi 



The Esdmal ion Game (Animaiefl' 
Casselte 

The Distance Game 
Cassette 



Wv i»e Visa o< Masiei Charge iinciude card! ■»□ 
eipirai.on Qiiei c"ec«s Tioney o'Ovi 



■■V EDUCATIONAL^^ 
2^^ PROGRAMS 1 

P O 2345 

Weil Lafavette. IN 4790e 

(3 17)463-4778 ^ 303 



MORSE CODE, BAUDOT and ASCII RTTY 
FOR THE TRS-80 MODELS I and III 

DISASSEMBLED HANDBOOK - VOLUME 4 
no nS-232C inlertac* >S raquirsc] 

Chapl ' 6 to BOO VjPM Morse I'ansmn pgm 

Ciapi 2 Aaoing type aheaa capaD^iities 

Cfiapl 3 Mo'se receive tJecoOinq ctograrri 

Chapl & Meramg » \2 preca'^ "lessaqes 

Chapl 6 Baudot transmit 60-66-76-100 WPV 

Chapt 6 Bauflot receive for aDove speeds 

Chapt 7 Merging - 22 prepared messages 

Chapt e ASCII iransmii program ilO BauO 

Chapl 9 ASCII receive decoOmq program 

Chapt "0 MerGing . 22 frpp^rpt: messages 

SIS I US! pc copy ac''^ ^2 shipping 
|S4.S0ov«fSMS airmail I 

-GERMAN & FREIMCH LANGUAGE EDITIONS — 

Morse. Baudot & ASCM on disks Sd9 
'Vol. i requlied tor irislruclions 

RICHCRAFT ENGINEERING LTD. 
#1B Wahmeda Industrial Park 
Chautauqua. New York 14722 ^21% 

CODorderslUSoolyl | 716| 753-2654 



Smartmodem 



*^ti 



^ 



• Auto-Answer • Aulo-Dial • Repeal 

• Programmable Use Any Language 

• Touch-Tone and Pulse Dialing 

» Audio Monitor ■ Lislen to Connection 

• FCC-Approved Di'ectConnect 

• FuJ; or Hall Duplex 0-300 Baud 

» RS 2320 interface* 7 Status LED s 
• Two Year L mited Warranty 

$249 

Send cerlilied check or money order 
Aiioor two weeks tor personal check 
Florida residents ado 4°ii sales la« 

fiC€ COMPUT€R PRODUaS 

ol Florido tnc. 
■640 N W 3rd STREET 
DEERFlELD BEACH FLA 3344" 
VOICE 305 427 12S7yDATA 305 437 6300 



- .A^ y '/ ^ou -ve Written an 

\^ Outstanding Program- 

We'd LJke to Publish W 
We're looking for EDUCATION 
Programs: 

SPECIAL EDUCATION' AtD 

lO THE HANDICAPPED 

MULTIMEDIA COMPUTER INSTRUCTION 

TEACHER-AUTHORJNG LANGUAGES 

MANAGEMENT TRAINING 
SIMULATIONS 

Earn money while helping others. 
Write for our free Programmer's 
Kit todayl 

INSTANT SOrrW ARE, INC. ^2 

Submissions Dept. 

Peterborough. NH 03458 




COLOR G»Mt 

LIMITED OFFER' 



*l 11 &(NC lOii Ol.B tClHllS ant Of 'HI VON < • 
■ HIM lOi' SI>IC<<5 > Mil ADD^tSMD STlHIt T 

Ii..t.C»f ram Oi» '*yf COiob "nnr.Byiw . iS- 



16K,;':i':p^ -HI- RESOLUTION GAWES" 

STARBASE ATTACK "^'^ 

KQSniC KftniKftZE 18.95 

JOYSTICKS RfO'D *■.;...." 

rfHIi'ilDCHtCOS on ••OIM' OHDf** OMIT 

S P.O.BOX 289 

W WILLIAMSIOWN. MA 01267-0289 
LXPIHES '2-15-81 ■■CASStne ^^^, 



IMEXA/ 



PROGRAM WRITES 
PROGRAMS FOR YOU 

Education • Business • Hobbyist 

NoM jnyone can create BASIC Programs 
in minutes with QVIKPRO. You don't 
have to be a computer programmer to 
produce filing programs, data manage- 
ment & entry. QUIKPRO gives vou a sep- 
erate BASIC Program everytime that you 
can List, eiamine, or even modify- QUIK- 
PRO will pay tor itself the first time you 

use it. Order from this ad for the 
Introductory price of $89. 

MICROSOUTH, Dept. F. P.O. Boi 1446 
Orange Park, FL 32073, (904) 269-1918 

1 r.^^_J 



"DEfiTHBLDLU" 
Pn kncredibkeDedj 
SPACE fiDUEHTURE 
From LG.5. in Basic 




SejndCheck O 1GK - $ IS.DO 

Or Money O 3L?K- $17.^0 

Order To: D^BK- $20.00 

I.D.S. OAlt3- $30,100 

PO, Box14S8 '" '"'-"°'";i;*;,„ 
□i-iilas, Tnxas "IIV/,!."' ' 

y^cdcZ ' DO<UV1NIAT|0N INduOED O 



^^366 



1 



ENGINEERING ANALYSIS 
SOFTWARE ..569 

&0X I0i9 

Highitown, N) 08520 

(201) 367S735 

Critiol PaUi (CPM| P'oi^t Conirol 

iDmpuies rm-ort irniiiop iUt« ''-ih Hoii 

cnnii (Oil mtf pro^t iiuui Eulujiion ftpon 

A FviMDrt finri chin -- VXJ node f^utnf 

IRSIDll II ( III] A NonhSur tiOOOO 

Tii^ >«idwi| — 1jtK<jTio/i diu kK bmi lubt sTupf^ 

'npv.[ Qend radmi jnd noOt iOorOiojltv 

lompuin [u&e LLui ifTjih btnd and pUnr t'*pF\ irjirni 

Itfigihs ji>d mandrrl Hop wiTiri^ rtqijifrt kn bfrtd^ni 

nuihnn - TR^« |l II ft lin 1 Nonh kirlUSOO 

Lmcv Profrvnmiii| — EDi^ipucn nunrmm lo^j hjixTron^ 

TRS-8D |l. II a III) 1 North Siv UO DO 

Ciniom jppkaiom o* rhn pr-ogom td loiniiiir !»d muti 

vr (rrjm NrM^ rneti mijiiurf^ eri irt i<i>OMr 

C»S b' quoir 

Qrhff Enginnnng Propimi rncluding MC2 Sohwv? 

SpKf Fnmr S{nj<TUfil Anilyv^ 

HVAC LmU CompLlJIBTl 

firr Spn'»klef [>rsijn 

Hinjj CroM WjiM Sjsrtm Aniljin 

Sh«i MfUl Euimjiing 






LNW80P'**. 



n»n«n«a 

• COMPUTERS ° 



n HIGH RELIABILITY DESIGN n 

n 



TRS-80* COnPATIBLE 



^S&t Lisl of Advartismrs on page 418 



H STOCK NOW!! call for 

SPECIAL SYSTEM PRICeI 

(213)650-5754 

EXCELLONIX 

• 7180 WooDROw Wilson Dr. 
n Los Angeles, CA 90058 

n»n»n«n«D«a«n«n«n«a»n«n«n«D 
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4:218 Install a stringy 

4:228 Ton bock mod 

4:248 Lowercase studies 

i:BO Pari 2— BBMn^blo/install 



S:202 

5:254 
7:184 
B-.296 
9-^18 

sjse 

9:296 

10:196 
10:202 
10:234 
10:242 
10:310 
12:192 
12:302 
12:312 



Solder card In tor good 
Ball charger pwr supply 
Transient supression 
Build a box (or an 80 
CLOAD aid 

ADJ print deosity— 779 
Cheap Ic mods 
Tape back-up project 
Communications rrxxl 
Printer interface 
Syninetic keytx)ard 
Monitor litter cure 
The conclusion 
16 Carats on all conlac 
Sound tor the Mod I 



EDUCATION 

2:6B Teaching with an SO 

2:86 Graphic s in school 

2:96 Mints on using aOs 

2:226 Learn foreign vocab 

4:144 Hints lor software auth 

5:194 Disco dance step tutor 

B:180 Part 1 education series 

8:188 Flash card ciry 

B:214 ClassrooTTi househeepinQ 

9:204 Learn twith games 

9:244 A tiorse race math game 

9:272 Pgm for classroom network 

9:292 Sunday school computing 

9.328 Game of analogies 

10:180 Learnmg POKEs 

11:274 On number systems 

11:306 Classroom rwuseKeeping 

12:154 Learn openirigs 

12:220 80 in physics lab 



GAME 

3.118 
4 154 

5294 

6-160 

6186 

6:244 

7:217 

a:S5 

6:86 

8:92 

8:102 

8-104 

8:106 

8 112 

8 116 

8122 

10:302 

10:320 

10:334 

12:176 

12:226 

12:252 

12:290 

12:296 

12:346 



1:212 

1.222 

1:226 

2:74 

^78 

2:126 

2:220 

3:62 

3:68 

3:82 

3:154 

3:196 

3:209 

3:216 

3:219 

3:244 

3:248 

3:250 

3:272 



Tall person's game 

Emulate a processor 

Game and graohlcs lesson 

3-D maze game 

Sea-going simulation 

Version of pop game 

Refraction game 

History o' gaming 

Star date today 

Three word games in one 

The 'later wars 

Combat 

Imperialism 

4K and Level II 

Five ships in 3-D space 

Car race 

Popular pastime 

^4on-sexlSt version 

Spaced Out Game 

Hide and seeK 

Eteclronic version 

Dnve on! 

How to write adventures 

Color version of game 

Better than RuDick's 



The Model t v. 
Lower Cosi Lowercase 
Red Letter Day lor LC 
H D Grapnic Intaiiace P-2 

Hardwire RS23S 
An Alternate Source 
Lightning Strikes Twice 
Tn» Wandering SO 
Wave Shaper 
Width Contml 
Lowercase Done Right 
Tape Regenerator 
Real World Interteca Pi 
Hard- So ft Prinlware 
Auto-Key 

That Annoying Twitch 
Real World Interlace P-3 
Goid-Plaied eo 
Another Noise Maker 



Programming For Education 

Classroom Doodles 

Notes From the Classroom 

Vocabulary Builder 

Pgm For Education P3 

Dancin A Disco Primer 

Alternate Course 

Quiz 

Green Register 

Alternate Course P-2 

Math DerDy 

Teacher Mod 

Walls of Jericho 

Analogies 

Alternate Course P-3 

Alternate Course P-4 

Calling All Teachers 

The Chess Tutor 

Specific Heal 



Micro-Basketball 

Simul-ao 

Boa 

Superman a 

Suttdeslroy 

Lunar Lander Revisited 

Level II Black Box 

Walk on Monster Side 

Startrek 4 

Frankenstein 

Space Potaioea 

Tank 

Space Empires 

Simon 

Star Guard 

Formula SO 

Micro-Yahtzee 

Hang Person 

Star Colony 

Capture the Computer 

Go/' Tee Solitaire 

Rammer 

Writers of a Lost An 

Color Concentration 

The Magic Cut>e 



GENERAL (Cofnblr>M Data Msnagemenl, Home, SoHwire, Style) 



Var cross-ret llstir^gs 
Video page layouts 
Communicalions software 
13 year old ed project 
Mmnesola school pro| 

Graph any function fast 
Stringy storage 
Take on a reader 
Facts atx)ut disks 
Top brass speaks to 80 
Poetry on a computer? 
Benefits o( computing 
Wnte a trainer module 
Level II manual errata 
Electric ullllty monitor 
A simple memory map 
Consistency and Tandy 
Tape backups ol disks 
One line programs 



Cross re I 

The Plan Of The Page 
Terminal Plus 
Protect Local 
Classroom Computing 

Function Plotter 
Floppy Tales 
Badinage and Discipline 
Disk Dossier 
Kornf eld/Roach Interview 
Computer Cantos 
Just a Matter of Time 
Better Documentation 
Between the Lines 
Watts It All About? 
The Shadow Knows 
Opinion = Peek lUell) 
Disk to Tape 
Shod and Sweet 



Fortna 


4:74 


Look at education mkt 


Van Praag 


4:17B 


Tongue n cheek glossary 


Ferbar 


4:222 


Less eipenslv* ways 


Murray' 


4:246 


Use them affectively 


Fowler 


4:297 


Create a block cursor 


Dejarnatta 


5:99 


Mortgage and closing 


Conner 


5:192 


Programming tools 


Fowler 


5:208 


Compulerists r>ot birds 


Hubert 


5:258 


Set disk drive speed 


Shreve 


5:272 


Save ongoing chess ganw 


BartMrello 


664 


Survey of printers 


Burgan 


6:194 


Addition to Lev II man 


Lewarl 


6:197 


Bone up on Mod II lore 


Rand 


7«) 


Computers In business 


Sinclair 


7fl6 


Which is best tor you? 


G^a^^ 


7:102 


Why a macro 


Smith 


7:112 


Buzzwords defined 


Rand 


7:118 


Intro to Cobol 


Martin 


7:122 


New CAI language 


Ert> 


7:162 


Intro lo Fortn lang 




7:179 


Biography of a user 




7:254 


On a micro 




7294 


Of arps, moogs and aOs 


Welnlraub 






Rosenburg 


8:156 


Series 


Von Kaenei 


8:194 


Summarize and display 


Zimmerman 


8:286 


Look at rww machine 


Meintraub 


9:101 


Lexicon laugher 


Modi a 


9:104 


Micros and robots 


Duffln 


9:142 


Why compilers tall 


01 sen 


9:300 


Use of strings 


LaBorde 


9:320 


Computer carloon 


Dutin 


10118 


Whal's happening in Al 


Duttin 


10.136 


Al in sci-fi 


Fisn 


10:146 


Talkir^ computers 


McNicholas 


10:228 


MetaBasic and lo lang 


Spencer 


10:258 


Better record use 


Duffln 






Duftin 


10:264 


Communications 


Hedden 


10:285 


32 Ic char-nol 26 


Dowd 


10:290 


Mod 1 and mod ill look 


Fetchko 


11:110 


Effects of new tach 




11:112 


Electronic mail 




11.184 


Survey -word processors 


Weindorl 


11:243 


More on UeiaBaslc 


Kilsz 


11:272 


Who and where 


Myers 


11:328 


Color comp 


Batie 


11.384 


New commands, now uses 


Cominio 


12.100 


Disk t>asad runner's log 


Bermger 


12:142 


Sman-ass prompts 


Jones 


12:181 


What's available 


Laiamore 


12:206 


The finale 


Commander 


12:278 


Find ROM addresses 


Nicholas 


12:304 


150 bytes of free RAM 


Brumme 


12:306 


Discussion of features 


Rice 


12348 


Save on-going o^'^^^ 


Smith 


12358 


Use it don'i abuse It 


McGlumpny 


12:362 


Fancy graphics 


Bermger 


12:384 


A man. a t»y, an 80 


Sprague 






Johnson 


GRAPHICS 


Hilton 


4.116 


Disk commands draw line 


Be ringer 


4:117 


3-D rotating graphics 


Fisher 


5:119 


Mach lang printing tech 


Ratke 


5:176 


Turn black to white 


Keller 


5:204 


Segmented screen scroll 


Albino 


6:68 


High-res with dot matr* 


Wyre 


6:96 


Matrix head control 


York 


6:147 


ASCII ana graphic elem 


At 


9:214 


Animation-packed siring 


■1 

Ewart 


9:256 


Graph math turK:(lons 


Mac Lean 






Gorsky 


9:302 


Nice title pages 


Petrakos 


11 176 


Using graphics 


Droegemuler/ 






Bell 


HARDWARE 


Graue 


1:172 


Ease cassette I/O 


Keener 


2:230 


Shack's tv rt mod board 


Penninglon 


3:214 


Monitor CPU witti lEDb 


Commander 


3:252 


Stop unplugging cables 


Robertson 


4:262 


Using joysticks 


Griffiths 


4:272 


Expansion bus proposal 


Busch 


5:188 


Re-inking print ribtxjns 


Fert»r 


5:236 


Control CLOAD levels 


Mc Ternan 


12:266 


Select ric Interface 


Hubert 


12:320 


Shifty mods 


Romkey 






Glosser 


INTERFACE 


Hocking 


4:276 


Level i.'Levei II comtn 


Gundlach 


6:92 


Join them 



Toward Courseware 


Petrakoa 


Urtexpurgaled Version 


8u9Ch 


CotI Effmctivm Want Pre 


H«— In 


Loops and Arrays 


Wein 


Block That Cursor 


BalBwskI 


Home Buyer's Helper 


Stinson 


Hardlimes 


Fettig 


A Field Guide 


Doherty 


Speedset 


Wmings 


Sargon Saver 


Ouindry 


Buyer's Guide- Printers 


StaH 


The Level II index 


Mercer 


Model II and A 


Yager 


Micros- Bus iness/Pleasure 


Latamore 


Language Quest 81 


Vose 


Macroprocessor- Basic P-1 


Olmstead 


Coming to Terms 


Fugate 


Cobol— Ready and Wailing 


Bradley 


Piloi-lnstr Language 


Hawkins 


First Look at Forth 


Krutch 


Getting Involved 


Batty 


Regre ss lon-Correla lion 


Honess 


Quick Rill on Syntheirs 


Keen/ 




Dischert 


Microprocessor-Basic P-2 


Olmstead 


Vital Statistics 


Honess 


Color Comp^First Impress 


KMmon 


All Robotese To Me 


Gisamte 


Robotics 


Brown 


Macroprocessor-Basic P-3 


Olmstead 


The Magic Trick 


Busch 


BO Cartoon Capers 


Do Vigili 


Al at MIT 


Vose 


Realm ol Sci-Fi 


Rotierlson 


Voice Synthesizer 


Hall 


Macroprocessor-Basic P-4 


Olmstead 


All About Files 


Bernard/ 




Bernard 


Adven lures-Modemland 


8 lech man 


Soft Characters 


Moulton 


Basic Dillerence 


Blachman 


Computeriialion- Workpic 


Brown 


Digital Delivery 


Latamore 


Fast Round-up 


McComb 


Macroprocessor-Basic P-5 


Olmstead 


User Groups 


Nadeau 


Colorful Maneuvers 


Wood 


Enhanced Again 


Goodwin 


A Runrter's Logbook 


Vose 


Let's Get Rude 


Ramella 


Buyer's Guide — Peripherals 


Staff 


Macroprocessor/Basic PS 


Olmstead 


ao Black Book 


McGlumphy 


The Freeble 


Adams 


NEWDOS ao 


Jackman 


The Sargon Saver 


Quindry 


Ins and Outs ol Edit 


Schrader 


Poke A. Color Computer 


Esposito 


Lenny's Story 


Busch 


Advanced Techniques P-1 


Boot he 


Turn ol the Screw 


Boot he 


Advanced Techniques P-2 


Boot he 


Inverse Video 


Smilh 


Flexible Scroller 


Myers 


Advanced Techniques P-3 


Booths 


Tiger with Dots 


Somers 


Unlocking Graphic Code 


Weintraub 


Picture This 


Keen/ 




Disc hen 


CumPloner 


Zimmerman/ 




Stanley 


Title QreptticM 


Kalinowski 


Ups artd Downs of Qraphlcs 


Foley 


Audio Interface 


Balie 


Perverse Video 


Winter 


See Mo Evil 


Macre 


Switched On CLOAD 


Bickel 


BO Joystick Control 


Barker 


00 Bus Conductor 


Fox 


Keep It In The Black 


Johnson 


The Pulse Jockey 


Suter 


IBM Joins Tandy 


Stanley 


BO Cursor Control 


Waltjen 


Model 1 Dumb Terminal 


Tail man 


Xerox 1740 and Mod II 


Nestor 
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ACCOUNTS R£C£WABL£ 
& SALES ANALYSIS 

* 1300 Customers 
' 1300 Sales/Payments 
" 99 Departments 
' Alphabetical Listings 
' Selective Late Charges 

* 30-60-90 Day Agmg 

* Maihng Labels 
' Sales Analysis by Dept. 

* Rapid Entry & Operation 
REQUIRES 48K MOD III 

2 DRIVES 

S15Q.00 

JERRY MEDLIN & ASSOCIAHS 
310 SOUTH JEFFERSON ST. 
NAPA. CALIFORNIA 94559 
(707) 255-4475 



-405 



n 
n 

D 
D 
D 

n 

D 
D 

n 

D 
D 

□ 

D 
D 
D 
D 
D 



- - - LIICOS - - - 

CASSETTE OPERATING SYSTEM 
FOR RS MODEL I LEVEL II USERS 

THE LOWEST ALTERNATIVE TO DISK 
FEATURES: 

■ UP TO 9 TIMES FASTER THHUPUT 

■ LOGICAL RECORD PROCESSING 

■ NEW LIICOS STATEMENTS 

OPEN - CLOSE - EOF - DEFM 

■ INCREASED TAPE CAPACITY 

UP TO 700.000 BYTES/60 MIN 

■ OPTIONAL 2000 BAUD TAPE ROUTINES 
LIICOS S34 05 COS-2000 BAUD S44 05 
ADD 2.00 SAH DOCUMENTATION S8 05 

I0O4I 478-0765 „ 

CANTY ft ASSOCIATES 

BQOS BELUNGTON. PENSACOLA FL 32504 



FROFESSIOKAI. MAIUVa 
LIST FROORAICS 

rAancAn.-:; ijnf iahel oftionai. 4'n( linf oh 

IINfTHNTFO MNF HIR RKARCH (XllWi^. TABUlAh 
nUNTOUT SFJ^BC.^^ AND FRINTONSCRFKN OR PRINT- 
FR. SORT 500 NAMFJ! IN ZIP OR AI.PHA NirMERIC 
ORDER IN 10 SECONDF, HFIZTE DUPLICATFS MFRGE 
FII£P AJJD MORE tnjOO 

MAIUKMH »t.0S- AIJ. THE FEATURF^ OF FAST 
MAIL INCLUnraG THE OPTIONAL 4 TH LINE, EEFA 
RATE IJNF-S POH PHOKZ ALPHA NUMERIC SORT 
CODE AJJD SEAilCH CODES ITB-OO 

noamAU to maxitulaxb mammb tumb 

■OBT- MERGE DISKS OF NEW. MIXED NAMF„'^ INTO 
YOUR MASTER DISK. SORT AND DELETE DLrPLI- 
CATFS tlS.OO 

■PUT -TAKE FILES WHICH HAVE BECOME TOO 
lARGE AND SPLIT THEM AT THE POINT OF YOUR 
CHOICE •18.00 

ITU PRINT nilT NirMPER OF NAMFR IN EACH 
FIl.F ■tS.OO 

KnT/mjT/nLBfr mmoKiujuMauMi raoomAX 

■ ISB.OO 
laquiBIBB WMUCOMM 
THE PERIPHERAL FEOfLE ^576 

rO. BOX II 123 

StATTLt. WA98I II 

I06-63I-B649 



i\ y J» If You've Written an 

" Extraordinary Myogram— 

We'd Like to Publish W 
ProgruDB Deeded for MANAGE- 
MENT applications: 

PERT ft CPH SCHEDULING 
PREDICTIVE MODELING 
DECISION-MAKING SIMULATIONS 
PRODUCTION SCHEDULING 
EXPENSE ANALYSES 

Royalty checka may be in YOUR 
future. Write for our free Pro- 
grammer 'a Kit today. 

INSTANT SOFTWARE, INC. ^^ 

Submisalona Dept. 

Peterborough. NH 03498 



B17 TAPE OPERATING SYSTEM will let you 

• Save A Load ptoQrams 6X faster than Model-i 

• Save S Load Data Arrays over 800X faster 

■ Backup standard System tapes that load-n-QO 

• Cerlify cassette tapes al 3000 baud 

124. S5 Specify Model 1/3 ^GK/32KJABK HAM. 
Inexpensive Upgrades available. 3rd year of sales 

B1 7 DISK/BAS IS a Dish version Letsyousaveany 
disk file to cassette at 3000 baud Iriexpensiue way 
to backup your fMes Works with any DOS Includes 
tape certifier Requires 32K HAMup. 
S14.fl5 

WORDSMITH Word ptocessing piogram m BASIC 
A Trainer' for more CDrnple* W/P D'OQfa"'S Easy- 
lo-use Specify Tape/Disk version Tape version 
requires B17 Tape Operating System [above] Disk 
version requires 32K HAMup. Uses MX-80 Printer 
Only S14.95 

30-day money-back guarantee with all programs. 

ABS Suppliers ^^o 

3003 Washtenaw. Suite 4A • Ann Arbor. Ml 46 1 04 
(3131 973-8266 

Coming soon 

Ineipensiwe computer service business Write'" 



TRS-80 SOFTWARE 

Htwiw Dl^ Index (MDI): S 1 2.'cdsset1e 
$16 /5U' d^^k Creates and mainlaiiiE a 
master hie ci disk directones updated by 
automatically reading each disk's diret-lory 
MDI records may be selectively displayed, 
prmted or deleted by rather string matching or 
record nurnber Uses last machine code sort 
NEtD? 32k 1 disk Level 11 Basic 

Lun^LondarS 10' cassette 5obdly based on 
physics Displays the landscape, craft and 
changing navigrftiorial information KEEDS 
16k Uvei i: RiF,i,- 

Oth»llo 3.0: 5 J * ■' t-dssette Better than the 
board game Minti t"*>fler because it [lidys you 
V? TRS-SC. yovj vs ^ tnrnd. or TRS 80 vs it 
sell' Slaughters programs that maximize cap- 
ture NEEDS 16k Levelll BASIC 

Note NY residents add sales tan 
CUSTOM SOFTWAHE 
PO Box 3241 Haymorid Avenue 
Poughkeepsie NY 1260? 



Subscrfntion 



80 Microcomputing does not keep 
subscription records on the premises, 
therefore calling us only adds time 
and doesn't solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to: 

80 Microcomputing 
Subscript lor> Dept 
PO Box 981 
Farmingdale, NY 11737 



Thark you and en|Oy your SuOscription 




If You've Written A Program 

And Need Copies 

(1 to 1,000,000) 

Give Us A Call! 

Penner Bros.. Inc 

305-287-0588 .-m 

210 Seville St. Stuart, FL 33494 



COLORSOFT 



TM 



' 'Quality Software at an Affordable Price ' ' 
TRS-80* Color Computer Software 
FriCBti from $7.95 

• Home/personal • Games 

• Educational • Financial 

We Also Offer: 

• Custom Programming 

• Royalties for Software 

Documentation and a limited guarantee 
with all COLORSOFT™ software. 
Free catalog containing descriptions of 
30 software items, write to: 

Color Software Services 

P.O. Box 1723 
Greenville, Texas 75401 

'TnlyCorpTradvTwk V1sa/U»»rcara AccwM 



^S»t List ol AOvwrtistrs on page 418 
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6:157 From scrUch 

6:166 AYI^aQIO sound gwisrstor 

6:288 RochMtef data I/O pak 

7:171 For frustrating loada 

7:262 Mod 33 and multl 80 

ft:1d4 Tl printsr and htod I 

0:114 Kennor'sR202 Meets 80 

11:164 Splnwri tar divers 

11:208 Rnishlha ptoject 

11:362 More mamory movee 

PERSONAL 

5:87 Car ttuying advisor 

5:103 Wrap-around mortgages 

5:113 Evaluate auto financing 

5376 Generate nasty lettors 

6:26S 7 pgn Investment anayl 

6:296 Loan calculations 

7:289 Loan formulae 

B:13$ Will writing pgm 

TECHNKXIE 

1:211 Bar graph generation 

1:218 Data file handling 

5:240 Generate distributions 

6:174 Intro to Pascal 

B-2S5 How to do It 

8:294 Use read, data, restore 

7:199 Replace Ready message 

7:296 Use 16-bit reoisters 

8:230 Memory conservation 

8:292 Programming lectiniques 

0:154 Rotating cubes in 3-D 

9:220 Machine lang sort 

9:226 Array teaches array 

ft322 Self -modi tying pgms 

10:249 Save data 

10:296 Basic tricks 

10:350 Easy data entry 

10:354 Deep nesting 

11:204 Organized programming 

11:250 Using chaining 

12:396 Tips on how to ba 

TUTORIAL 

1.-98 What. when, where, why 

1 :100 Essence of variables 

1:114 Curses and cures tor 

1:162 Inlroto simple 3-D 

Z1X Secrets of subroutines 

2:166 Machine code and Basic 

2:168 Predict random numbers 

2:224 Learn these concepts 

3:92 Afterthougiits on style 

3:104 UsesoflNKEYS 

3:178 How to use Inlenupls 

3:186 Debugging techniques 

4:240 DOS software speed mods 

5:148 A RAMmOM tutorial 

5:108 Assm lang for t>eglnner 

5:292 Ways to express avgs 

6:106 Review-error messages 

6:112 Let's assemble 

6:202 Inside ttie Color Comptr 

7:146 Qo (or It 

7:271 Random access technique 

7:291 More on error messages 

8:206 Speaking computer 

8:254 Use machine code 

6:262 Data comm with 80 

8:304 A brain teaser 

8:308 Intro 10 sorls 

9:148 Intro to sorting 

9:170 Additional Lev II convls 

9:182 Utilities for Mod III 

9:242 Pgmng for profit 

9:312 What it really meana 

9:327 Head cleaning program 

9:334 Hybrid language 

11:292 Muscle sutKOUtlnes 

11:300 Using command mode 

11:352 Keyboard trick 'n treat 

12:230 Everyday programs 

12:324 Bom again programmers 

12:386 How a line works 

12:380 Uses of ioopi 

imuTY 

1:130 Fast bug awattsr 



Joysticks For Uo^ I Dlnunzk> 

Polyphonic Sound Synlhs Brocaw 

E/ecfTO-Wec/i Htnt Copy Lavlr>e 

Last CLOAD Fix Stanley 

Hacfpe For Hanioopy Keith 

m-ns 232-11 810 Herman 

One Man's Robot McAllister 

A Drivan Prlntar Mueller 

RmI WorKf Intarfaca P-2 Rand 

ROM RolfarOvar Kelch 



Tha Auto Uantor Spares 

Houaaa-How To Buy/Salt Whitman 

A Dollar Down Martin 

Computafizad Complaint Gilllg 

Softwara Brokar Harper 

Rulo of 78s Confialm 

Real Rule of 78s Conhalm 

Baing ot Sound Algoftnm Weinberg 



High On Histograms Lovy 

Ffficlant Cassatte I/O Sabin 

Nof-So-flandom Numban Zeigler 

Pascal Draam Krutch 

Pgm Chaining/Var Daffn Brown 

Embadding Data Adams 

Nevar Raady Balowski 

Undoeumantad Insfrs Camsfon 

RAMSqueoza Adams 

rnrve's Not A Crowd Mawdsley 

flofafton YBllln 

High Speed Sorta Bobson 

£rud/(o Arrays Barnes 

Slice/Dice Basic Scneider 

Debug with GOTO Pape 

Mo/f(-Sfa(emeftf Keen/ 
Dischert 

Formatted Screen Input Byrnes 

Thoughts on For. . . Naxt A/ny» 

In Praise 01 Oullinas ft»w 

Chain Command Implement Pape 

Ge( Organized Lesley 



On Modems Brown 

Into Iha aOs Smdair 

Cload. Five Latter Word Kltaz 

Perspective On Cubes Gerhardt 

Into The dOs Sinclair 

Be A USR User Joffe 

Random Tricks Perkins 

Compi/e-/nferprer-Assem Faulk 

Into The 80s Sinclair 

Do No( Enfof Welntraub 

Do Two Thirrgs At Onca Gorsky 

Wild Glitch Hunting Warren 

Fast C'ocA DOS Domuret 

Memories-Made 01 This Randall 
Idiot's Guide-Assm Lang Montgomery 

On The Average Gomey 

To Err Is Forbidden Adams 
Idiot's Guide-Assm Lng P-2 Montgomery 

Inalda Color Computer Manel/ 
Nicholas 

Join Pascal Crusade Grothman 

Handle Random Filaa Kneclti 

To Err Is Forbidden P-2 Adams 

Pgmng Voice Synthesizer Werner 

Be A Super USR User! Alford 

Datacom Decisions Derfler 

Digits For Fun Wkth 

All About Sorts P-1 Gomey 

All About Sorts Gomey 

New IVortfs For Basic Nelbaur 

Lev II UtII On Mod III BIgelow 

Oojng Pro Moss 

Clear N Salsbury 

Head Bright Hesse 

eases' Metzler 

Customized Commands Rupert 

In Command Rut ledge 

Keyboard Irtcanletlona Robnett 

ft>c*»f Full of Chipa Dolan 

The Conversion Woeger 

Queue Theory Nelbauer 

for My Next Trick. . . MacLean 



ZBug Harrell 



1:200 
2:112 

2:138 

2:144 
2:214 
2:218 
2:236 
3:160 
3:166 
3:180 
3:191 
3:210 
3:222 
3:225 
3:232 
3:236 
3:247 
3:256 
3:270 
4:271 
4:296 
5:190 
5:216 
S:234 
5:244 
5:256 

5:260 
5:264 
5:270 
5:283 

5:284 

5:288 

6:178 

6:192 

6:219 

6:224 

6:232 

6:246 

6:265 

7:226 

7:244 

7:251 

7:259 

7:280 

6:168 

6:240 

8:260 

8:270 

8:274 

8:278 

6:282 

9:174 

9:186 

9:228 

9:240 

9:250 

9:276 

9:282 

9:317 

9:333 

10:156 

10:288 

10:306 

10:312 

10:326 

10:340 

10:344 

10:358 

10:360 
10:364 
10-J70 
11:172 
11:284 
11:314 
11:333 
11:356 
11:360 
11:366 
11:390 
12:200 
12:222 
12:236 
12:238 
12:242 
12:260 
12:262 
12:326 
12:356 
12:300 



Disk Basic to Level II 

up-date TRSDOS clock 

Screen dump graphics 
Fast editing 
Peck strings tigfitly 
Quick load EOT ASM 
Save screen contents 
Protecting softwara 
Program packing tech 
Searching strings 
One disk copy utility 
Tape kiading help 
Scrlpslt to DOS moves 
Hex and octal constants 
Cheap word processing 
Folkiw program branct>es 
Adjust print width 
Assembly lang renumber 
The disk version 
Check ASCII disk dumps 
Answers prompts in hex 
Retrieve lost files 
Formatted Input commnds 
Hex Inatrs to Basic bik 
Calculator t\ex conversns 
Single disk copy progm 

Uc'lc shift reversal 
Name list quick sort 
Remove rams and spaces 
Recover lost lines 
Move it all tt>e way up 
List variables and more 
Don't type run or list 
Convert uc to Ic 
Kill files last 

One command kills pgnvs 
Disk speed routine 
Underlining 

KILDOS-free disk space 
Cheap for the Mod II 
Read ROM 
LI printouts from L2 
List all variables 
Machine tang data tapes 
Mach lang to Basic data 
How to write one 
Get INKEYS working 
Disk cataloging 
Calendar pgm 
A warm boot-up 
Basic wds in t keystroke 
Mach lang space delete 
Mach lang conversion 
Conversion util 
Delete Inslr/save mem 
Auto debugging 
Serial printing 
Scripslt-Mod IIMod 111 
NEWDOS Mods 
Data-obI code to Basic 
Terminal software 
Cp'm text editing 
Join iKHir programs 
TRSDOS ipl routines 
Patches for Level II 
Full error messages 
Disk storage tricks 
Using your keypad 

NEWDOS chain mod 

Look into keyboard mem 

Shorthand data entry 

Special print functions 

New technique for Lev II 

Inexpensive wsy out 

Easy to read listings 

A disk doctor 

Sector \IO m TRSDOS 

New T-Bug commands 

T-Bug tor Mod III 

Use that keypad 

Faat printing 

Mod II screen dump 

Join files today! 

Shift entry 

New prompt 

Mach lang data from Bas 

DIskzapper 

Easy POKEIng 

Word processing 



DS To LenI II ConverT 


Mumford 


C/oc* Bool 


Soertfnhtf 


Paper Tiger Screenprint 


Lewan 


Auto Edit 


Rollins 


Lprini Formener 11 


Tzlnberg 


fast Edit 


lllk 


Now You See It 


Borrmann 


No Forwarding Address 


Then 


El Cheapo Packer 


Browne 


Find II Fast 


Yolvlngton 


Single Drive File Copy 


Gorsky 


BabyDub 


KItSZ 


Script Patch 


Allred 


Constant Aliamalivas 


Hand 


Pauper's Pttwessor 


Oslxjm 


Where Have GOTOs Gone? 


Borrman 


Ez Wider 


Chepko 


Speedy Renumberer 


Dowd 


Kbaepfix Revisited 


Whitehead 


Compare 


Everett 


SmaH Ant wart 


Williams 


Diract Stalamnt In File 


Fitchfwrn 


Dollars and Sense 


Andrews 


The Encoder 


Cam 


Hex Converter 


Malorw 


One Wheel Drive 


Keen/ 




Pezzuto 


Shift Lock 


Hambei 


Spare Time Qeneratof 


Mehesan 


Comprs 


Barker 


Line Loss 


Borrmann 


Take TBug Higher 


Stanley 


Know-lt-AII 


Sehmer 


Disk Auto Menu 


He win 


Captran 


Gorsky 


Purge 


Ligori 


Copykill 


Kelley 


Salt Tech 


North 


Underscore Scripsll 


Iseli 


KILDOS Is Here 


Soltyslk 


Mod II Word Proc 


Kilroy 


Basic Disassembler 


Dellirte 


LUST lor Level 1 


Ogden 


Variable Lister 


Webstar 


High Speed Data Tapes 


G lesser 


Delagen 


Lewarts 


90 Disassemble 


Wuebker 


Uc/Lc Fix 


Thurkjw 


DIrprog 


Egbert 


The Date Maker 


Grosse 


Command File Modifier 


Crawford 


Basic Shonhand 


Rwlln 


Memory Expander 


Kanaaty 


Base Conversions 


Yttlvlr>gton 


Split N Splice 


Mills 


Throw Away 


L^ngslon 


On Error- Fix 


Richardson 


Serl Print With EDTASkf 


Cohan 


Patching Across 


Koch 


Rename 


Busch 


Dateline BO 


Press 


Em term 


MilH 


CROSSDOS 


Means 


Building Bridges 


Mueller 


Through-Boot 


Smith 


Tale of Two Drivers 


Blair 


Full Error 


Keelma 


Modifying EDTASM/Plus 


Rohnde 


Datafix 


Bernard/ 




Bernard 


Weak Link 


Denfwltz 


Memory Window 


Mwkey 


Copyit 


BalewskI 


Scripsit-Sant Serif 


CoOwaii 


Marge For Let U 


Dslesartdry 


Baudot LPRINT 


RIster 


Superlist 


Jones 


Purezzap 


Stanley 


Simplezap 


Safford 


Nawbug 


Marks 


TBug III 


Klelnfelter 


Dexterous Data Entry 


Shuken 


Print Spooler 


Oault 


The Dumpater 


Faber 


Mergers 


Lloyd 


The Sentry 


Rastin 


RMdy—For the Mod II? 


Barbarello 


The Death Wish 


Smith 


Floppy Fixer 


BMbe 


Cheater's Poker 


Divtes 


More Write SMt 


Barnes 
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64K COLOR 

TRS-80' COLOR 
COMPUTERS 

64K $699 16K $389 
32K $429 4K $329 

Atfd $90 tor •xtwKlcd bmic 

EXPANSION KITS 

64K $375 16K $35 
32K $75 XBASIC$90 

CaN for details on othor TRS-SO' 
computara A accaaaorlaa. 

SOUND CENTER ..^ 
RADIO SHACK DLR 
Los Alamos, NM 87544 
(505) 672-9824 

'TRS-80 la a tradamark of 

Taiwty Corp. 



TRS-80 MODEL I EXPANSION 

LM SYSTEM EIPAdSION BOU)D I 330 

Zn, FLDPPT CONTftDLLER, REM. TINE CLOCK, 
PMALLEL PfllflTER, RS/232 20M I/O. 
RADIO SHACK EIPANSIOH INTEItEACE 

K...I 270 It K...I 310 32 K...IH 
ItPBRAK YOUR EIPANSIOH INTERFACE MITH 4I1& 
200 NS NENORY CHIP, INSTALLED k TESTED. 

UK I 40 32( I H 

TF*S-aO MODEL III 

HITM 1U.,.I no 32K...I W 4tK...I fSC 

NITH 4BK 4 2 SIN8LE SIDE DRIVES 11930 

NITH 4K I 2 DOUHE SIDE DRIVES 12150 

TANDON DRIVE ON SALE! 

40 TRACKS SIN6LE SIDE I 210 

40 TRACKS DOUBLE SIDE I 110 

SERVICES ti REPAIRS 
L3H LON PRICE- CALL FOR DETAILS! 

NORTH I EAST SOUTH NEST 

(112) 4«-4773 (71JI 4BB-13J2 1400) 723-MM 

KAM ENTERPRISES "^ ^ 
P.O. HI 1013, MMTHHOOK, 11. M0i2 



4 MHz 



FOR THE 



MOD 3 



PC BOARDS DOC 



ONLY S34 95 



THIS EASY TO INSTALL KIT WILL 
DOUBLE THE SPEED OF YOUR MOD- 
EL III COMPUTER. 

COMPLETE KIT S74.95 

ASSEMBLED & TESTED S99.95 

CALL OR WRITE 
J.E.S, GRAPHICS 
P.O BOX 2752 
TULSA, OK 74101 

PHONE 19181 742 -7104 ^ t59 



TOOLS 



MODEL III CASSETTE COPY 

• Copy and verity cassette programs 

• Split large programs into sections 

• Convert between 500/1500 baud 

■ Produce mjltiple cassettes efficiently 

• Copy programs larger than avail memory 

• Flename programs tdT^^ 

MODEL II SCREEN EDITOR 



Edits all ASCII files 
Scrolling 
Find/Change 
Block Move/Delete 
Improved listings 



Full Screen 
Insert/ Delete 
Split/combine lines 
On-screen HELP 
Auto line numbers 



WRITTEN IN BASIC - FULL SOURCE PROVIDED 

Rec]Uiit5 64K Mod II 
Specify DOS 1 3 or 2 



$97" 



CLARK CONSULTANTS 

363 Lafayette Street. Salem, MA 01970 

Masucfiuselts resilenij t6a 5S taWs lax ,^. 



TRS-80 MODEL I ^"* 
GOLDPLUG 80 

Eliminate disk re-boots and data 
loss due to poof conlact problems 
at card edge connectors. The 
GOLD PLUG - 80 solders to the 
board card edge. Use your ex- 
isting cables. 
CPU/keyboard to 

expansion interface $18.95 

Expansion interlace to disk, prin- 
ter, RS232, screen printer 

(specify) $9.95ea 

Full set, six connectors. . . $54.95 



EAP COMPANY 

P.O. Box 14. Keller, TX 76248 

1817)498-4242 

*TRS-8Disa trademark of 

Tandy Corp. 



NEW! 



HONTEL 




-SPOOKS— Rack 
uij [Mimls following 
triuls and eating dots 
bul walch out tof 
Ilif spooks' 
When you get tougfi 
—SPOOKS— W'H qct 
touqher • bound 

• FASTGn*PMICS 
■ BECOBOSBEST SCORES 

—SPOOKS— I casscltf poM.uH' p^iuli S1B.95 



NEW!. 



SSBUG 

h~i(im HONTEL Single Steppar 

For serious machine code debugging SSBUG 
displays all registers and more within a small 
moveable area ol Screen This utility eKamines and 
alters memory, breakpoints, anti single-steps usmg 
a user selcctabk- key suppresses loltowing calls, 
and much, mucti more SSBUG is human engi- 
neered so as not to intertcro with regular program 

execution • E*SV tllOPE«*TF • US£S*BOUI!K 

SSBUG I. d'.M-it,' p,r.Li.;i- ii.i '' $19.95 

Both Programs lor TRS-SO ADD. I ind III 

S*»d Ch*ct or t*anii Ord» Id 



[nnzHHi ^^ 



903 Shady Drtv« 



D«pl M 

m s *u(.- •:■ ■ SAi I 
A Kir, inAivw4^K 01 



Vienna. VAZ2180 



GET YOUR 
TRS-80 DIRECT 



WTKinnO IMiS Cf ■TH 



qT-T ■■ fit UUfW ITTVaiHAlll 



AND 
VtOEO 



377 PLAZA, HWY 3776MMUItY 

FWn WWrrn TX 7BMB ^^e2 



AND SAVES 

0*1 our Quolm 'bulofw' yov buy 

FuH mmnutmctunrt' omrmntmm 

Tm*aa maiOmnlt adtS 4% aalm tmx. 

^817-573-4111 



COST OF CALL HEf UNGED FOR OROeRS BY TILEPHONE 



1^' 






M^ 



You'ite Written 

a Fantastic Game? 

Then We'd Like to Publish W 

We're looking for hot GAME pro- 
gruns: 

ARCADE (HI-SPEED GRAPHICS) 

ADVENTURE FORMAT 

FANTASY WARGAMING 

BOARD GAMES 

LOGIC ft PUZZLE GAMES 
There's Gold In them there 
Games) Write for our free 
Programmer's Kit today. 

INSTANT SOFTWARE. INC. ^2 

Submlsatons Dept. 

Peterborough, NH 03458 



MODEL II 

All Graphics • Non-ScroUing 

S1ARSHIPI 

Bctnlt' irit' invaders from vour 

complete command consc^le 

Documenianon and basic 

source code on 8" diskette 

>t() postpaik! ^253 



PANORAMIC 



2\(v 2 Wf SI James Stiet'i 

Lancaster PA UWA 

Phone 1717) .i9;M'n7 



^ S»« list ot AOvBftisers an page 418 
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80 Reviews 



Books 



Pi u ou c t 

57 Pnctical Prog & Oam«s/Bisic 

A Smte Hotiam €laetronic»lly 

Ainmata Sourv«, The 

BaSK Foftrmn 

Basic Sctantitic Subfoutmas 

CnatiM Kids GuiOa/Horna 

Compuiars 

Data Fila Programming In Basic 

HaalMit Assambly Lang Couna 

Insuia Basic Qamas 

Intro To Pascal. UCSD Pascal 

Microcomputing Tactimquas 

Uindstorms. ChiUiran, Computar 

Uora TRSW Basic 

Uorsa Coda. Bau</ot and ASCII 

Musical Applications ol Micro. 

Nature ol Computation. Intro 

Naw Usss For Homa Comp/Stock 

Mkt 

Owning tour Homa Computar 

Guida 

Pascal 

Small Computet In Small Business 

Structured Basic and Beyond 

Tha CP/M Handbooli With MP/U 

TRSSO Assembly La/tguaga 

TfiS-aO Laval ii Basic, T Ouida 

UCSD Pascal Compiler 

Your First Computer 



HanufKturw 



ImM 



Tandy/Radio Shock 


4/81 


Tandy/Radk) Slwck 


2fll 


Magazine of Advancod Applications 


1/81 


Haydan Book Co. 


6flt 


Byta PublKatuns 


»St 


Doublsday & Co. 


4/B1 


John Wiley & Sons 


11/81 


Heath Corp. 


Ml 


SytWK Inc 


Ml 


Sybox Inc. 


11/81 


Reston PuUlshing Co. 


3«1 


Basic Books Inc 


2/81 


Jo^n Wiley & Sons 


izni 


Richcfatt Englneecinfl, Ltd. 


11/81 


Hay den Booii Co. 


9/81 


Computer Science Press 


1(V81 



Thomas V. Lanz 

Everest House 

Matrix Publishing 

The Stephen Green Press 

Computet Science Press 

Sytwx 

Prantice-HaH Inc. 

Tandy/Rwlio Shack 

FMGCorp 

Sybei Inc. 



Pioduct 

Centronics 739 Printer 

Coosol 101 aM€ Printer 

DipSI 

Dynatypar Keyboard Actuator 

Homa Computar Wort rabia 

Internal Memory, Ttie 

KQS Kayoard Actuator 

LX-aO 

LyriE 

Microconnection 

Microconnaetion. The 

Modal T SpaedUp 

Rei-aO 

SASOO 

Telapttone litiartaca H 



Produ c t 
Computerworld/Krattwerli 



Hardware 

HanulBclurar 

Canlronlcs Corp 

Coosol Inc. 

Dip Inc. 

Rochester Data inc 

Computer Roomers Inc. 

Holmes Er>glneerlng 

Nik International Trading Co. 

l,ot>o Drives International 

Emtrol Systems Inc. 

The Microperipheral Corp. 

Micropenpheral Corp. 

Archbold Electronics 

Palomar Computer Products 

LotM Drives International 

Tandy/Radio Shack 

Record 

Hanulacturer 

Warr>er Bros 



Software 



Piudud 



Manutactunr 



11/81 

a«i 

11/81 
11/81 

3/81 
1Q«1 

1/81 
lOffil 

2ni 



12«1 

i2/ai 

1081 
12/81 
1081 

12/81 
9/81 
7/81 
9a^ 
8«i 
9.B1 
7)81 

12/81 
7(81 
9/81 



12«1 



Accel 2 CompiletlOlsk Bas Tab 


Allan Gelder Software 


11)81 


AcQuire 


Avalon Hill 


11/81 


Aids ll/Aids III 


Meta Technologies Corp. 


4«1 


Aids III with Calcs III 


Mela Technologies 


8ffl1 


As tro-Scope/Sexoscope 


Aga Software 


9^1 


Astrology 


Tandy/Radk) Shack 


blB^ 


B1 Bomber/Nukewar/N at Con 






RDR 


Avalon Hill 


6/81 


Bascom: Basic Compiler, Mod 1 


Microsoft 


5/B1 


Boss 


Soft Sector Marketing Inc 


7B1 


C-Bug 


The Micro Wortu 


Ml 


CCA Data Manager 


Personal Software 


8(81 


Cocobvg 


Allan Qetder Software 


Ml 


Creator, The 


Complete Business Systems Inc. 


11/81 


Dancing Demon 


Tandy/Radio Shack 


4ffl1 


Dateslortea ol Ryn 


Automated Simulations 


4/81 


DOT(Diak Drive Timer) 


Disco- Tech Mic'ocompular Prod. 


4/81 


Deathmaie 5OO0 


Med Systems Software 


2/81 


Deluxe Personal finance 


Small Systems Group 


5fl1 


Discat/ Mod 1 32KJ4aK 


Mystte Smith 


7/81 


Edaa 


MlBosys 


11/81 


EDTASU Plus 


Microsoft 


1(V81 


Electra Sketch 


Macrotronics Inc. 


1/81 


Eliza 


Tandy/Radio Shack 


4/81 


Evermsl Explorer 


Acotn Software Products irK 


BIB^ 


Fill Mansgement Syitem fFMSJ 


Exatron Corp. 


Ml 


Fiexiext 


Apparat 


Ml 


Flopycat/Bas/Disk Name/Bms 


Marvin Plunkett 


Ml 



Fractional Sound 

QalactK Emptn 

Galaxy Invasion 

Gambiet SO 

General Accounting Package 

Haunted House 

Helllire Warrior 

In Memory Information 

Invaders Plus 

Invaders Plus 

Invasitm From Outer Space 

Keynote 

Kim 's Game 

Labyrinth 

Lazy Writer 

IDOS 

Master Directory 1. 1 

Maxi Micro Manager 

Midway Campaign 

Mualc Box. The 

Music Master 

Mychess 

Orchestra BO 

Rats Revenge 

Regression II 

Remassem 1 

Remodel & Proload, Infinite Basic 

Sargon II 

Stinks 

Small Home/Business Software 

SmartaOD 

Southeastern Texian 

Space Shuttle 

Spooler 

STBO-III 

Subedit/Subscrlpl 

Subscript 5.0 

Supernova 

Superscript 

Supersiep 

Swamp Wars 

Tao-FSI Flight Simulator 

The Patch 

Tiny Pascal 

Trackcess 

TRS-Opera 

Two Heads Of The Coin 

UltraMon 

Varkeep 

Winged Samurai 

Wizard. Ttte 

Word Challenge 

Wordo 

XBasIc 

XBE 

ZBasie Compiler 



The Innovative Penguin 
Broderbund Software 
Big Five Software Co. 

MIcroed 

Tsndy/Radio Shack 

Automated Slmuiatk^na 

Tandy/Radio Stiack 

Level IV Products 

L«vel IV Products 

The Software Exchange 

Hayden Book Co. 

General Computer Co. 

hted Systems Software 

ABC Sales 

LAtxi Drives International 

Micro Systems Software 

Exador Inc /Adventure Intnl. 

Avalon Hill 

Newtech Computer Systems 

Instant Software 

Software Affair 
hied Systems Software 
Dynacomp 
Remsoft irK. 
Racet Computes 



Blechman Enterprises 

The Microperipheral Corp 

Soutfwastem Software 

Instant Software 

Mum ford Micro Systems 

Small Busirtesa Systems Group 

Prosoft Software 

Prosoft 

Big Five Software Co. 

Acorn Software Products 

Alien Gelder Software 

Instant Software 

Sublogic Company 

Ceedat 

Supersoft 

The Alternate Source 

Acorn Software 

Adventure International 

Inierpro 

Circle J Software Ranch 

Discovery Games 

Programs Unlimited 

Acorn Software 

Mlcrofantastlc Programming 

Snapp Inc. 

Computw Applications Unlimited 

Stmutek 



Ml 
Ml 
Ml 

12/81 
8ffl1 
Ml 
1M1 
11(81 
Ml 
4ffl1 
Ml 
Ml 
5/81 

afli 

M1 
Ml 

4I8^ 
Ml 
Ml 
Ml 
Ml 

12/81 
Ml 

11/81 
Ml 

t2fl1 
9/81 

12ffl1 

12/61 

11/81 
Ml 

1M1 
Ml 

1M1 
Ml 
Ml 
9(81 
8/81 
Ml 
M1 
Ml 
Ml 
2/81 
7/81 

1M1 
Ml 
M1 
4/81 
4AI1 
BA1 
M1 
Ml 
4/81 
Ml 
11(81 
Ml 
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KraTOfm 




University Microfilms international 

300 Noflh ZoeD RoaO 18 BeO'ofO Ro* 

Deot. PR Depl '^ ^ 

Ann Arbot, Ml 48106 London. WClR 4E J 

U.S A England 



TA« 




^epA 



PROFESSIONAL 
FEDERAL INCOME TAX 
PROGRAMS 

• (0' iRS-eo Mooei I ij' Moan in He«i.i'e» .; Dii« 
Drives and 32K 

• D«li'"'i."e» Leas' Tai Q,jic«iy 

• Eiiunlpji lt>'oi"'a[.cn R»t«yea twTH'rrn Fo'ms 
Ai.tQni)ilicaiiy Avo-Oi Dupi'raripg £"('*> 

• Uiei IPS o'es<:r;t>«j Compuiei Gsrie'ateo C'lri-oi.Ji 

• Pion-bii* Bypasiing o' Manilatory En>p*s 

• Accuracy Assured tiy f'fi'p Cnec* tofl.c 

■ tniet oniy Pertinenr u.fw^ Muci Faslei Iha" Line 
ny L'Fie Eniiy 

• Single Li"e Ccettioti W'tti AutoTiai-t updai* e' 
SucceMing Totals 

aaiic Package 1040 lo^O* Scnaduies A B A TC 

All lor S10000 ACOit'onai Scneduiej SJSOOesch 

Single Soedijles may M Du'cha&ed sepaialXy 

•^■"■1 S?5Dio' Full [Vst'iolion and Sanr-'f 

■ acC'SO "^ CJ'Ciase p'irei 



^ MICRO-TAX 

PO Box 4262. Mountain View CA 94040 

Call: (415) 964-2843 .,,, 




TOTAL 

DISKETTE 

BACKUP 




DO NOT TAKE UNNECESSARY RISKS 
WITH YOUR SOFTWARE, 

II yout dukeiie tolTware libiary ri noi com- 
pletely backM uD. or, if you are wniing disk 
ettet Ov making backup copiM of all your 
diiketlei. your problem is tolvedl Uting 
OUWPLOAD, the loial contents of your disk- 
ette* can be safely dumped lo tape. The hi- 
ipeerl tape option allows sm 35 or 40 track 
ditkettei to fit on one CGO csiEtTe. 
■ TRS-eO Model 1 16K - 4aK 

• TRSDOS or NEWDOSeo Compal.blB 

• May be used to back-up TRSDOS. VTOS 
4.0, NEWDOS, MICRODOS, or data 
disks. (Single DeniHy) 

— 516.96 on CJweite — $19 96 on Dukette 
Plus S1.00 handling (Indiana Rei. add 4%iai<) 
TOLL FREE 24 HH. ORDERING SERVICE 
1 ■800-525-9391 lExt, 509) (Exceot Colo.l 
l-eOO.332'9259 lExt 509MColo. Reiidenu) 

ur Mail Cneck or Money Order To 
COMPLETE CO»flPUTER SERVICES 
8188 HEATHER DRrVE 
NFWBURGH INDIANA 47630 .-4'^. 
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If You've Written 

State-oJ-the-Art Software- 

Wed Like to Publish It! 

We're looking for SYSTEM software: 

DISK OPERATING SYSTEMS 

MONITORS 

PROGRAMMER AIDS/UTILITIES 

LANGUAGES 

DATA BASE SYSTEMS 

Then, sit back and collect your 

royalty checkB. Write for our free 

Programmer's Kit todayl 

INSTANT SOFTWARE, INC. '^^ 

Submisslont Dept. 

Peterborough. NH 03458 



PRACTICAL 



ilSA LYSIS 



■ reieriCi comiiuter progrann 
ENGINEERIMG PROBLEK: 



'or cofrnori 



" :h Ccaiputes the dcceleraticn 

tlae for starting electric 
fwtors uti^r load 

'PIPELINE - CakuUtes uresiut^ vertu* 
flowrate cury^ data points 
for pipeMries 

. PIPE - Analyies trancned piping 

CESISfl SySter-J to detemine 

flowrales and preiiures 

For MODEL 1 LEVEL II 16K 
CftSSETTE DP aiSK 

KOTOR START SI9.95 

PIPELINE H9.9b 

PIPE DESIGN S49.96 

ALL rMPEE S75,nO 

■:■ .no FOR DISK 

■Li .■■ MONEY ORDER TO: 

PRACTlCAl. ANALYSIS 



BOWLING 



L*«)«i 

n*..uap, LEAGUE ■'"''>"'"i" 



K!i'i.i S.. 
Tcflm. 



STATISTICS 

FortheTRSSO* 



Pinnis 



BOWLSTAT 2 will gi'ni'rjr^ rtjm stondmy 
shells suitable tor posting with lull learn and 
playKT sialislics. and also prints Wnqye scoring 
sh«tls A w\Ak range of handicapping and 
sciHiny upliuns me^ts almost am, Icoqup s 
rvquiiem^nts Entry of uuipekk' scores i-. tasi 
and simpW wilh exlBrisiv^ prornptlrtg and 
,Ttni dt^ti-Ctl'Jii 

On [)iskettt> wllh Us<^r's Manual 

lor ih<^ Modfl I II or III 

J79.95 

Manual Only 
ItJtfductibU- iin putfhaM' ol l)isk#ttt'l 

19.95 

fu -ruiir-il) uifd f-'V S.iW\ Tot 

Datascore 

p. O. Box 995. Sharon. Pa 16146 



m 



microcomputing 



Back Issues 




January 1980 $5.00 

February to June 1980 3.00 

Single back issue 
Juiy 1980 on 3.50 

Single back issue 

Adr/ M (Hi per mana/ine lor '^hippmu 

10 or more back issues 

,)d(t i~ iC p(.'r '■nirr In' shipnmu 
See Lisi of Aawertisers on page 4 18 



COMPUTER SOFTWARE 

10% Discount 

ATARI 



TRS ao Lll 



Adventure SermK-ll T AT AP |^7MTape 

Conllici ?S00 T AT *P 13 50 Tape 

OeainmuebOOO T AP ii AS Tape 
ErT>c<faoliriaOv*rmind T AT APt3IM0>*li ;700Tape 

Invaders from SpK* T only i345Tape 

Rescue al Rigai t AT AP ?e M Tape 

Superscript I only 26 9S Tape 



RadouOi T I'apei t?;4i Dnn li'K Tape 
AP(Dt«ki 



Many moregames uliiilio« business elc available 
Diak and CaiMtl* 

Purcnase by M O Cn«ck (Allow iO days to clear) 

or C O D 

Add Si 00 Postage Per Order 

|MD Add 5S Sales Tai) 



Fof price ah««t. wrlto lo 



A 



Co'ipuie' So'lwart 
PO BOX 596 1; WALTER REED STATION 

WASHINGTON nr ?oci? 



TR5-fln f^^^^' ' 

SOFTWARE 

Machine Language 
Programs 
featuring: 

* GAMES - Fast action 
Great Graphics 

* UTILITIES - For 
novice to professional 

Send S3.00 for Demo 
tape (Refundable) 

SOFTTOUCH 

Software Inc. „, 

P.O. Box 46607 

CiMCINNATI, Ohio 45246 
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SHARE YOUR 
IDEAS 

Wayne Green Books announces 

April 1, 1982 deadline for 
submission of new manuscripts 

for consideration for 
^-w^ the Fall Book List. 



For submissions procedures and 

further information, contact 

Chris Crocker, Editor, Wayne Green Books 

Peterborough, Mew Hampshire 03458 

^4 
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IS 



HARD CDPV 



STDRflGE I 

a problem? 



;M>/Cr',V>i^i'> 



7 



¥l 



i 



^, 



■>•'(■ 



% 



^k 



Her(.>''. the ideal way to keep your 
KrowJny collection ot m Micro- 
computing m order' The HO Micro- 
computing Library Shelf Boxes 

■•lurilv. corrugated, white, dirt-ri- 
sistanl boxesrtill keep vour issues of 80 Mirrni nmputinp nrderlv 
and available for constant reference Sell-siiLkmjj labels are 
-uailahle for the boxes, too, rot onlv for «0 but also for Kilol\iu(l 
MiLrocomputing. 7) M,i(,M/ine, CQ. Q.S7, ll,im Radio. Perwnjt 
Qompuling. Interface Af-e. Ryte and Radio / /ectron/cs Ask fur 
whichever labels vou want with your box order Tach box holll^ a 
full year ot the above rnaya/mes Vour m.iHa/me library is your 
prime reference Keep il handy and keep (t neat with these stronj; 
library shelt boxeb One box (BXIOOO] is S^ (N), -'-7 boxes (BXKXH ] 
are SI "iO each, and 8 or more boxes (BX11X)21 <^^f $1 25 each He 
sure to specify which labels we should send. Shipping and handling 
charges are $1.50 per order Call in your credit card orders on our toll 
tree line 800-258-5473, or use the order card in the back of the 
maga/ine and mail to 



/ 



m 



microcomputing 



Peterborough, 
NH 03458 



(l.'llMTV N.lt (>[) 



MAKE *«$$$$ 
«$$ MONEY 

Selling 80 Microcomputing, the only major journal for the users of the 
TRS-SO*, is a sure bet for getting the computer enthusiast into your 
store. Once through the door you can sell him anything. 

We know "80" will make you money. . ,it*s the only magazine for the 
TRS-So • users and you know how many of those there are. So call today 
and join the dealers who make money with ^^80". 

For information on selling 80 Microcomputing, call 603-9XI-7296 and 
speak with Ginnie Boudrieau, our Bulk Sales Manager. Or write to her 
at 80 Microcomputing, Pine Street, Peterborough, NH 03458. 



*TR$-80 Is a trademark ol the Tandy Corp. 
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—BASIC & PASCAL— 







• INTRODUCTION TO TRS-N LEVEL II BASIC AND 
COMPUTER PROGRAMMING-6K1219— Dy Uicn^ei 
P Zabinski Written by an e«penencM educate' this is 
Itie Ooo* tof those beginners wiio want to learn about 
comoulefs milhoul liaving lo Mcome an e<pe'l It nas 
craclical proflrams, useful line-byline commenis, e»- 
celleni (lowcfiarts accompanied by line nurnbeis and 
over 200 e'ercises wtiich ^lelp ihe reader assess prog 
'ess. reinlorce comp'ehension, and provide valuable 
praclical eipe'ience. $10 95 * 

• 60 BASIC EX6RCISES-BK1192-Dyj P Lamoiner 
This booli IS siructurea around the idea Ihal tlie besl 
Adv lo learn 3 language is tri'ough acljal practice II 
contains W completely enpiamed eie'cises slate 
r^ent aid analysis o' me p'obiem flowcharls pio- 
g-ams ana actual 'jis Program subjects 'ncluOe 
'tiat'iemaics busmess ga-nes and operations re- 
sea'cr-. an,: a'e p^ese^te■3 - t3'r"Q leveis o' di'ii 
cuilv ifi'S to'mat e-iac es ai.cine to 'ea'" GASiC 'a^: 
idiv cfi«c'iin5 tnei' proQ'ess at eacn step S12 9S" 

• THE BASIC HANDBOOK-BKn74-NEW. SECOND 
EDITION by David Lien This book is unique II is a vii 
lual ENCYCLOPEDIA of BASIC While not favonng one 
computer Over another, ii eiplains over 250 BASIC 
MfO'ds. how to use them and alternate st'alegies If a 
computer does not possess the capabilities oT a need 
ed or specified word, Iheie aie often ways lo ac 
compliSh the same function by using anolfier word or 
combination of words. Thai's where the HANDBOOK 
comes in It helps you get Ihe most from your com- 
puter, belt a'bottom-o1 the line" micro or an oversized 
monster S19.95 ' 

■ LEARNING LEVEL II - BK 1 U'l- D, Dav.d Lien Writ 
leT e' ■-.»■■- , to' tr-e TBSBO ir..^ dooK concentrates 
o" uj.e ■■ BASIC e>^ o"nq e.erv impo'tani BASIC 
'angua^je ca^an";t, U^^dates a^e :nc uOed 'o' those 
*ric ^a.e stoQiea fe i.e'.e ' Use' s Manual Sections 
iiclud'' "o* '.:> d^e t"? Edio' dua' cassette ooe'a 
tion c "te's aia peripheral devices and the confer 
sion n' Leve' i s-oarams lo Leve i' S'S 95 ' 

• BASIC BASIC (2ND EDITION)- BK 1026 — by James 
S Coai' Tri.s 'S a te'iboo*! which mcorpoates l^e 

leariing t;' ^orrputer programming using the BASIC 
language *iih the teaching o' malfiematics Over '00 
sampre p'ograms iHust'ite the lechnigues o! Ihe BA- 
SIC language and every section is followed by pracli' 
cai problems This second edition covers character 
string handling and tlie use of data files 110 50 ' 

• ADVANCED BASIC — BK1000 — Applications, includ 
ing strings and tiles, coordinate geometry, area, se- 
quences and series, simulation graphing and games 

110 75- 

• SIXTY CHALLENGING PROBLEMS WITH BASIC 
SOLUTIONS (2nd Edilioni- BK1073 — by Donaid 
Speicer provides the senous student ot BASIC pro 
gramming with ir'ieresiing problems and solutions No 
knowledge o< math abo«e algebra 'eguired includes a 
number of game programs as weli as programs 'or 
financai interest conversions and numeric manipula- 
tions t6 95 ■ 



• PASCAL-BK11B6— by Paul M. Chrrlian. Professor 
Chiflian's teilbook combines a simple approach to the 
PASCAL language with comprehensive coverage on 
how a computer works, how lo use a flowchart, work 
mg from a terminal as well as balch operation and 
debugging. Special ailention is paid to idiosyncrasies 
of the language and syntax flowcharts abound lor the 
convenience o' Ihe experienced programmer. Wall in 
dexed S12.95' 

• INTRODUCTION TO PASCAL- BK 1 189- by Rodna, 
Zaks A step by-step introduction lor anyone wanting 
to learn the language quickly and completely Each 
concept IS explained simply and in a logical order All 
features of Ihe language are presented m a clear, easy 
tO-unOerstand format with exercises to test the reader 
at Ihe end ol each chapter It describes both standard 
PASCAL and UCSD PASCAL. Ihe most widely used 
dialed for small computers No computer or program 
ming experience is necessary 114 95 ' 

• PROGRAMMING IN PASCAL-BKIUO-bv Peter 
Grogono The computet programming language 
PASCAL was the first language to embody in a coher- 
ent way the concepts ol structured programming, 
which has been defined by Edsger Oijkstra and C.A H 
Hoare As such, it is a landmark m the development ol 
programming languages. PASCAL was Oevefoped by 
Niklaus Wirth in Zurich, it is derived from the language 
ALGOL 60 but is more powerful and easier lo use 
PASCAL IS now widely accepted as a useful language 
Ihal can be efficiently implemenied. and as an ex- 
cellent teaching tool. It does not assume knowledge of 
any other programming language; il is therefore suit- 
able tor an introductory course $12 95." 



—GAMES— 



• 40 COMPUTER GAMES— BK7381 -Forly games in all 
in nine different categories Games for large and small 
syslems. and even a sectiofi on calculator games. Many 
versions of BASIC used and a wide variety of syslems 
represented A must to' the senous compuler games- 
man J7 95- 

• BASIC COMPUTER GAMES-BK1074 — Okay SO 
once you gel your computer arid are running in BASIC, 
then what'' Then you need some programs in BASIC, 
that s what This book has 101 games Tor you Irom very 
simple to real buggers. You get the games, a descrip 
tion ol the games, the lisling to put in your computer 
and a sample run to show you how Ihey work Fun Any 
one game will be worth more than the price ol Ihe book 
for the (un you and your family will have with it. (7 50 * 

■ MORE BASIC COMPUTER QAMES-BK1182- 
edited by David M. Ahl. More fun in BASICI 84 new 
games from the people who brought you BASIC Cam 
puter Games. Includes such favorites as Minotaur (bat- 
tle the mythical boast) and Ehza (unload your troubles 
on the doctor at bargain rales). Complete with game 
description, listing and sample run $7 50.* 

• WHAT TO DO AFTER YOU HIT RETURN — BK1071 - 
PCCs lirsl book ot computer games 48 dilferent 
computer games you can play in BASIC . programs, 
descriptions, many illustrations Lunar Landing. Ham 
murabi. King, Civel 2. Qubic 5. Taxman. Star Trek. 
Crash. Marhai. ate S10 95' 



,■ qI their executives 
i< tie alert bus.iess- 



• THEORYZ—BK 1 226— How American Business Can 
Meet the Japanese Challenge — by William Ouchi. Why 
are Ihe Japanesri calching up and surpassing 
American induslnal productivity'' What allows 
Japanese mduslnahsts to offer guaranteed lifetime 
employment to their workforce'' This book will help 
»ou uiderstand ihe Theory Z managerial philosophy 
aid its imphcaiions 'oi the American corporate future 
Enamp'es are g .en o' fe American mdjsLr.ai giarts 
ai'eady operaimg uidpr Z stye management and the 
impact of th's styio on the qua^ 
and workers IS e»3iore0 A must 
man arge or smai- S12 95' 

• SO YOU ARE THINKING ABOUT A SMALL 
BUSINESS COMPUTER-BK1222-Oy Richard G Can- 
ning and Nancy C Leeper For a AeM-organ'zedmanual 
on the process ot selecting the right compuier system 
tor your small business, this le't cani bo rsxcelled. De 
signed to introduce Ihe novice in dala and word pro- 
cessing to Ihe real benefits of computerization, the 
tX)Oh IS filled with money- and time-saving tips, pholos 
ot equipment, lists of suppliers, prices, explanations 
of compuier terminology, and helpful references lo 
additional sources ol information Everyone con- 
templating a first computer mstaiialion should have 
this book iM 00 ■ 

• PAYROLL WITH COST ACCOUNTING-IN BASIC- 

BK1001— byL PooleiM Borchers includes program 
listings with remarks descriptions, discussions o' the 
principle behind each program. Iiie layouts. anQ a com- 
plete users manual with step by step instructions 
tlowcharls. and simple reports and CRT displays Pay 
roll and cost accounting features include separate 
payrolls for up to 10 companies timetesied interac- 
tive data entry, easy correction of data eniry errors job 
costing ilabor of distribution), check printing with lull 
deduction and pay detail, and 16 diHereni printed re 
ports, including W 2 and 941 lin CBASICl J20 00 * 

• SOME COMMON BASIC PROGHAMS-BK1053- 

published by Adam OsCworne S Associates, Inc Perfect 
for non-technical compulerisis requiring raady-to-use 
programs Business programs, plus miscellaneous 
programs Invaluable for Ihe user who is not an ex 
penenced programmer All will operate in the stand- 
alone mode S14 99 paperback 

• PIMS: PERSONAL INFORMATION MANAGEMENT 

SYSTEM — BK1009-Learn how to unleash the powe- 
o' a personal compuier for your own t)enefit in this 
ready to use data case management program 

— MONEYMAKING— 



• HOW TO MAKE MONEY WITH COMPUTERS- 

BK10O3— In 10 mtormationpackeO chapters, Jerry 
Felsen describes more than 30 computer-related, 
money-making, high profit, low capital investment op- 
portunities. S15.00 * 

• HOW TO SELL ANYTHING TO ANYBOD¥-eK7306- 

According to The Guinness Book oi World Records, the 
author, Joe Girard, is 'the worlds greatest salesman.' 
This book reveals how he made a fortune— and flow you 
can. too S2 25 • 

• THE INCREDIBLE SECRET MONEY MACHINE- 

BK1178— by Don Lancaster. A dilferent kmO ol 'cook- 
book' Irom Don Lancaster Want lo slash taxes? Get 
tree vacations'* Wmai investments'' Maksmoneylrom 
something thai yoo like lo do? You'll tind ihis book 
essential lo give you the key insider details of what is 
really involved in starling up your own money machina 
SS 95 - 



NoC.O.D ofdersaccepted. All o(d«fS add J1. 50 for first book, II. X each additional txxjk, 
$10.00 per book loreign airmail Please allow 4-6 weeks for delivery. Questions regarding 
your order? Please wrila lo Customer Service at the lollowing address. 



"Use l^e ofder card in this magazine or itemize your order on a separate piece ol paper 
and mail to 80 Microcorrpulmg Book Deparlmeni • Peterborough NH 03458. Be sure to 
include check or detailed credit card information. 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 







• MICHOCOMPUTINC CODING SHEETS MicrocomptiMg s 

Oozen or so p'ograri'iiers wouldn't iry lo *crk withoul 
iriese handy scatch paOs. *hich helD prevent Ihe little 
eiTors that can cost hou'S ano rioors of pfOgramiiiing lime 
Available lor programming is AssemblyjMachine Language 
|PD1001), wtnictn Inas columns lO' aOOress. inst'uction (3 
DytesK source cooe (label, op code, operanai and com- 
menls. ana tor BASIC iPD1CX)2) whicn is 72 columns wide 
50 s^eels to a paa %2 39' 



PROGRAMMING 
— Z-80— 

• TRS-BO ASSEMBLY LANQUAOE- 6" t2T ;- o> 

Hubefi S Moi»e. Jr Tliis booh mcoroorales inio a 
Single volume all the perlinent (acls and intormatior' 
you need to Know to pfoflram and enjoy the TRS 80 in 
eluded are clear presentations □! all intioductory ccn 
cepts. cornpteiety tested practical programs and sub 
'Oulines. details of ROM and RAM and di^K n(>»raiing 
systems, plus comprehensive tables, charts and ap 
pendiCBS Suitable tor the lirst time user oi mi, ea 
perienced users. J9.95 " 

• INSIDE LEVELII — BKiiaa — For machine language 
programmers' This iS ^ comprehensne reference 
guide 10 the Lewei II ROMs aiio*ing easy uiiluation ol 
Ihe sophislicateo routir^es ihey contain ii concisely 
eipiains setups ca'ung sequences variable passage 
and I'O routines Pan u presents an entirely ne* com 
pos-te prograrr struciu'e *hiEh unloads unOer thp 
SYSTEM command anO eiecules in botn BASIC anf! 
machine code *<f tne ^peeO and efficiency of a com 
piier Special cnns^dfation is given to Ois* system^ 
115 95 ■ 

• PROGRAMMING THE Z-BD-Bnil^2- Py Rodna. 
Za's Mere sassen.bi. anguage ^'Ogra-^.rvi.ng Icr Ihe 
Z 8C piesenlea as d p'ogressiwe slep t> slet^ ou'se 
Triis boo" s Doin an pfiucaiiona' tent ana a self 
cor-lained reference booh useful lo tiolh Ihe beginning 
and fhe e'pprienced programmer n'lo *ish io learn 
about the Z fiO E 'P'cises in test the 'pader arp ir>ciua 
eO It4 95 ■ 



• Z-80 SOFTWARE QOURMET GUIDE AND COOK- 
BOOK— BK1045— by Nal Wadsworlh. Scelbrs newest 
coot(Book! This Exjok contains a complels description 
of Ihe powerful Z-80 instruction sel and a wide variety 
ol programming information. Use the author's ingre- 
dients including routines, subroutines and short pro- 

8 rams, choose a time-tesled recipe and Start cooKina' 
16.99.- ^ 

• Z-ao ASSEMBLY LANGUAGE PROORAMMINO — 
BK1177— by Lance A. Leventhal This book thoroughty 
covers Ihe Z-80 mslruclion set. abounding in simple 
programming examples which illustrate software de- 
veloprDenl concepts anO actual assembly language 
usage Features include Z-SO I/O devices and inlBrtac- 
ing methods, assembler conventions, and compan 
sons with fl080A/8085 instruction sets and interrupt 
structure. $16.99.* 
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• 6809 MICROCOMPUTER PROGRAMMING ANO 

INTERFACING-BK1215-hy Andre* : SlaugaarO. 
Jr Getting involved with Tandy s new' ■ .n' Cumputpr'' 
II so. this new book from the Bi^i ^istn-rg Group wiii 
allow you lo eiploit the awesome power of Ihe 
machine s 6809 microprocessor Detailed information 
on processor architecture -idilreSMMg modes, rfyister 
operation, data movement arithmetic logic opera 
tions I'O and interlacing is pri,. deil as well as a 
■eview section at It>e end ot each cha^ie- Fnur appen 
dices are mcluOed covering the 6609 iTisi'uction sel 
•■pecificaliun sricflb. ,>' 'he 6809 family i' tnucf^ssors 
olhe' 6800 scr.e^ euuipmeni and the 6«0S'6e2l 
Pe'ipfietai Inieffact adapter This book is a must for 
ine seriou:. Color Computer owner J13.95 " 



A NEW PROGRAMMIMG SERIES 



Th» MIcroprocaiior Software Engtne^rlng Series by 

John ZarreHa provides common sense descriptions 
of advanced computer system topics tor engineers 
programmers and development managers. Each 
volume IS a se It-contained review ot a soUware 
engineering topic. e«plaining lundamenial concepts 
in easy to understand language and describing 
sophisticated soltware tools and techniques De 
lailed glossary ol lechriicai jargon is included in 
each volume This series win help you tind Ihe solu 
lions lo your software problems 



• WORO PROCESSING ANO TEXT EDITING 6KI194 
— P'O'ides a firm basis 'or understandiiiQ word pro 

■ -^bing tprminoiogy am) tfi iijmpannQ systems 
17 95 ■ 

• SYSTEM ARCHITECTURE BK1195 P'esen'i a 
■Jeia^eJ o.eiuie* of aOuanced computer system 
desicjii including object architecture and capabihlt 
nas*KJ addressing S9 95" 

• OPERATING SYSTEMS CONCEPTS AND PRINCI 

PLES B"'!"!* PreSen'Sdrif.v.T,;HA,ntl>ii-ll,i'.,, op 
•-rdtirig s^^l•— I \,iii", Ihi-r ,.„ i,.in(.r;s art) i .i|i,-ir.iii 

1 .'s irq"; ■ 



ALL NEW— FOR 80 OWNERS 

ENCYCLOPEDIA FOR THE TRS-BO* 



ENCYCLOPEDIA FOR THE TRS-80** is 

the newest peripheral for your micro- 
computer. This ten-volume reterence 
series contains programs and articles 
especially selected to extend the docu- 
mentation that comes with the TRS-80, 
Volumes of the EncyclopfldJa are being 
issued one-at-a-time. approximately six 
weeks apart. This means that each new 
volume Will reflect the latest develop- 
ments tn TRS-80 microcomputing. 
Encyclopedia for th« TRS-80 is avail- 
able in two editions. The deluxe 
COLLECTORS EDITION has a hand- 
some green and black hard cover with a 
dust jacket. A soft cover edition is also 
available. 

To order single hard cover volumes of 
the Encyclopedia please specify: 
Volume 1 ENB101 $19.95* 

Volumes EN8102 $19.95* 

Volume3<avaii. Nov) EN8103 $19.95* 
Volurne4(avail Jan t EN8104 $19.95* 
Volume 5 (avail Feb) EN6105 $19.95* 

Toordersincjle soft cover volumes of Ihe 
Encyclopedia please specify: 

Volume 1 ENSOei $10.95* 

Volume 2 EN8082 $10.95* 

Volumes (avail. Nov.) ENS083 $10.95* 

Volume 4 (avail Jan ) EN8084 $10.95* 

Volume 5 (avail. Feb.) EN8085 $10.95* 



?^MSS^ 



tHCKlOPHUi 



SPECIAL INTRODUCTORY OFFER 

Order the entire set (the first ten volumes) 
of the Encyclopedia for the TRS-80 and 
receive the 'tenth volume FREE! 

10 Volume deluxe hard cover 
COLLECTORS EDITION —a $199.50 
value. 

ENaiOO S1 64.00 postpaid 

10 Volume soft cover edition, a $109.50 
value. 

EN8080 $83.00 postpaid 



ENCYCLOPEDIA LOADER is the 

software companion to the 
Encyclopedia for the TRS-80. This 
special series of cassettes will 
allow you to load selected pro- 
grams from the Encyclopedia in- 
stantly. Hours ot keyboard ing time 
and the aggravating searcn tor 
typos is eliminated Dy using the 
Encyclopedia Loader. 

Encyclopedia Loader for Volume 1 
of the Encyclopedia of the TRS-SO 
is available at a Special Introduc- 
tory Price of $12.95 (a $14.95 
value). To take advantage of this 
offer specify: 

EL800111 $12.95* 

Additional Encyclopedia Loaders 
will be available as each volume 
of the Encyclopedia for the TRS- 
80 IS issued. To order specify 
Encyclopedia Loader 

Volume 2 EN8002 $14.95* 

Volume 3 EN8003 $14.95* 

Volume 4 EN8004 $14.95* 

Volumes EN8005 $14.95* 



NoCOD orders accepted AllOfdersaddSI 50 lor first book. $1 Meach additional DooK. 
S10 00 per txjoh foreign airmail. Please allow 4-6 weeds lor delivery. Oueslions regaiding 
your ofdet'' Please write to Customer Service at the loHowing addtess. 



■ Use Ihe order card in Ihis maflazine or itemize your order on a seiiaiaie piece ol paper 
and mail to 80 Uiciocomputing BooK Depariment • Peleftxjtougli NH 03456 Be sure lo 
include check or detailed credit card tnloimatior 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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• UNDERSTANDING AND PROQRAMMINQ MICRO- 
COMPUTERS-BK7382-A valuaDle addition lo your 
compgiing library This 1*opar1 texl includes Ifie besi 
articles Ihat have appeared in 73 and Kilobaud 
Micfocompuling magazines on the hardware and so*1- 
ware aspecls of microcomputing. Well lino wn authors 
and well stiucluied teat l>elps the reade' get involved 
StO.95* 

• SOME OF THE BEST FROM KILOBAUD MKROCOM- 
PUTINO— BK731 1 -A collection o( the best articles that 
have appeared m Kilobaud MICROCOMPUTING Includ 
ed IS material on the TRSflO and P€T systems, CP/M. the 
808Ofl0ft&;Z-80 chips, the ASn-33 terminal Dai^i base 
management, word processing. le«t editors aiid Me 
structures are covered loo Programming techniques 
and hard-core hardware conslruction projects tor 
modems, high speed casselte mlerfaces and TVTs are 
also mctuded m this large 'ormal. 200 plus page edition 
J10,9S ■ 



• YOUR FIRST COMPUTER-BKl191-t;y Rodrray 
Zaks Whether you are using a computer thinking 
about using one or considering purchasing one. this 

book IS indispensable It eiplams what a compuier 
system is. what il can do, how it works and how to 
select various components and peripheral uniis II is 
written in everyday language and contains invaluable 
information lor the novice and the eiperienced pro 
giammer (The tiist edition of this book was published 
under the title "An Introduction to Personal and 
Business Computing ■ i $8 95* 

• MICROPROCESSOR INTERFACING TECHNIQUES 
~BK1037— by Austin Lssea & Rodnay ZaKs — will 
teach you how lo inlerconnecl a complete system and 
interface it lo all the usual peripherals It covers hard 
ware and software skills and techniques, mcluding the 
use and design of model buses such as Ihe IEEE 486 or 
SIM S15 96- 



• HOBBY COMPUTERS ARE HEnE(-BK7322-l( you 
want to come up lo Speed on how computers work 
hardware and software this is an eicelleni book li 
starts with lundamentais and eiplams the crcuits, and 
the basics ot programming, along with a couple ol TVT 
construction ptoiects. ASCII Baudot etc This book has 
the highest recommendations as a teaching aid %* 95 * 

• THE NEW HOBBY COMPUTERS— BK7340 Tins 

book takes it from where MOBBY COt^PUTERS ARE 
HERE' leaves oti wiih chapters on Large Scale Integra 
lion how lo choose a microprocessor chip, an inlfoduc 
lion to programming, low cosi l/Q for a computer, torn 
puter anlhmelic, checking memory boards and 
much, much more' Don't miss this tremendous wjlue' 
Only I4 9fi ■ 

• AN INTRODUCTION TO MICROCOMPUTERS. VOL 
— BK1t30 The Beginner s Book — Written fo' readers 
who know nothing about computers — tor those who 
have an interest in how to use computers and tor 
everyone else who must live with computers and 
should know a little about them The hrst m a series o> 
4 volumes, this book will enplain ho* computers work 
and wfiat ttiey can do Computers have t>ecome an in- 
tegral part ol Itte and society During any given day you 
are altectefl by computers so start learning more 
about them with Volume if %b ' 

• VOL I — BK103a — 2nd Edillan completely revised. 

Dedicated lo the basic concepts of microcomputers 
and hardware theory The purpose of Volume I is to 
give you a Ihorough understanding o! what microcom 
puters are From basic concepts (which are covered in 
detail). Volume I builds the necessary components ola 
microcomputer system This book higniighis the dif 
lerence between minicomputers and microcomputers 
It299 ■ 

• VOL. II — BK1040 (With binderl- Contains descnp 
lions of individual microprocessors and support 
devices used only vrnth the parent microprocessor 
Volume II describes all available chips J31 99' 

• VOL. Ill — BK1133 [with binder) — Contains descrip- 
tions ol all support devices thai can t* used wiin any 
microprocessor 121 99' 




■ TRS-SO DISK AND OTHER MYSTERIES BK' 181 - 
by Harvard C Pennington This is the definitive work 
on the TRS-80 disk system It is lull of detailed "How 
to' information with examples, samples and in-depth 
eipianaiions suitable lor beginners and prolessionals 

alike The recovery of one lost file iS worth the price 

alone 123 50 ■ 

• MICROSOFT BASIC DECODED AND OTHER 
MYSTERIES— BKll86-by James Farvour From the 
company that brought you TRS-80 DISK AND OTHER 
UYSTEHIES'. Contains more than 6500 lines of com- 
ments for the disassembled Level II ROMs, sii addi- 
tional chapters describing every BASIC subroutine, 
with assembly language routines showing how lo use 
them Flowcharts for all ma^or routines give the reader 
a real insight into how the mlerpreler worhs 129,50, 



—SPECIAL INTERESTS— 



• THE CUSTOM TRS-80 AND OTHER MYSTER1ES- 

BK1S18— by Dennis Kiisz More than 300 pages of 
TRS-80 customizing information With this book you N 
be able to eipiore your computer like never tjefore 
Want to turn an 8 track into a mass storage unif In- 
dividual reverse Characters'' Replace the BASIC 
ROMs'' Make Music'' Hlg^ speed, reverse video. Level I 
and Level IPFm it ifit breaks down'' All this and much, 
much more Even il you have never used a soldering 
iron ot read a circuit diagram, this book will teach you 
liow' This IS the definitive guide to cuslomizmg your 
80' (29 95 - 

• BASIC FASTER AND BETTER AND OTHER MYS- 
TERIES— BK1221 —Dy Lewis Rosenfelder You don't 
have to learn assembly language to make your pro 
grams run fast. With the dozens of programming tricks 
and techniQues in this book you can sort at high speed, 
swap screens m the twinkling of an eye. write INKEY 
routines that people think are in assembly language 
and add your own comiriands to BASIC. Find out how 
to write elegant code tfiat makes your BASIC really 
hum and explore the power ol USR calls $29 95 " 

• THE CPfM HANDBOOK (with MPfM)-BKl 187-by 
Rodnay Zaks A complete guide and 'efe'ence hand 
l>ook for CP/M the industry standard in operating 
systems Step Qy-step instruction tor everything from 
turning on the system and inserting the diskette lo cor 
reel user discipline and remedial action for problem 
situations This also includes a complete discussion 
o' all versions ot CP'M up to and including 2 2. MP.'M 
and CDOS 114 95- 

• INTRODUCTION TO TRS-SO GRAPHICS- BK1 180- 

by Don Inman Dissatisfied with your Level I or Level II 
manual S coverage ot graphics capabilities'' This well 
structured book (suitable for classroom use) is ideal 
tor those who want lo use all the graphics capabilities 
built into the TRS80 A tutorial method iS used with 
many demonstrations II is tiased on the Levell but all 
material is suitable lor Level II use i8 95 ' 

PRICES SUBJECT TO CHANGE WITHOUT rjOTICE 




eTOOLS * TECHNIQUES FOR ELECTRONtCS- 

BK7348 — byA A Wicksis an easy to-undersiand Oooli 
written for the beginning kit builder as well as Ihe ei- 
perienced hobbyist It has numerous pictures and 
descriptions of the safe and correct ways lo use basic 
and specialized tools for eieclronrc projects as well as 
specialized metal working lools and the chemical aids 
which are used in repair shops I* 95 ' 

• HOWTOBUILDA MICROCOMPUTER— AND REALLY 
UNDERSTAND IT — BK7325- by Sam Creason Theetec 
ironies hobbyist who wanis to build his own microcom- 
puter system now has a practical How To ' guideI>K)k 
This txio* IS a combination technical manual and pro- 
gramming guide that takes the hobbyist slep-by step 
through the design, construction, testing and debugging 
of a complete microcomputer system Must reading tor 
anyone desiring a true understanding of small compuler 
systems J9 95 ' 



No C,0,D, orders accepted Ail orders add S1 60 for first boott, SI 00 each additional boott. 
StO-00 per book foreign airmail. Please allow 4-6 weeks for delivery. Questions regarding 
your order^ Please write lo Customer Service at the following address 



"Use the order card in this magazine or itemize your order on a separate piece ol paper 
and mail lo 80 Micfocompofrng Book Department • Petertwrough NH 03458 Be sure to 
include check or detailed credit card information 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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other Money Savings Opportunities Order by PtKHW or Mail 



CABLES 



TRS-aO 



2DnveCable $29.00 


16K Model III 5B99.00 


4 Drive Cable 539.00 


48K Model 111 




w/2 Disks 51900.00 


Diskettes 


Printers 


Syncom . 10 tor $35.00 


Epson MXao . $550.00 


Plastic File Box $3.95 


MX80 F/T $675.00 




MX1CX) 5850.00 


Operating Systems 


16K Memory Kits 


TRSDOS2 3 $14.95 


Prime NEC 200ns dynamic 


40 Track Patch. S9.95 


RAM. Comes with complete 


NEWDOS + 


instructions . . . 539.00 


40 Track .. . $99.00 




Newdos80 2.0 $139.00 




Super Utility 549.00 




Make 60 $14.00 




Make 60 til $29.00 





Still have storage problems? 

Fully TRS-80® Compatible 

(Model I or III] 

Disk Drives 

Model 148 250K, 1 Side, 40 Tracks S321.00 

248 500K, 2 Sides, 40 Tracks per side $439.00 

196 500K, 1 side, 80 Tracks $439.00 

296 1 Meg. 2 Sides, 80 Tracks per side $590.00 

Includes: Case and Power Supply — Fully Tested 

10 Day Money Back Guarantee 

90 Days Parts and Labor Warranty t.c s.,^, 

Standard Features Include 

•40/80 Tracks • Speed constant (1/2% 

• Hi-Temp stability • Single/double density 

• Flippy Option Available 

ADDS MORE POWER TO YOUR SYSTEM 

Save time . . . Order by phone 
(Orders only: 1-800-621-3229) 

Information: 312-987-1024 
Tech. assistance: 312-987-1032 



1 



F 



MIDWEST 



COMPUTER 



PERIPHERALS 



146/ S MICHIGAN 
CHICAGO ILLINOIS 60605 



ms 8C iA%0' cot-t: 



FHEEi UPS GROUND SHIPPING ON ALL ORDERS OVER S100-00 



Quantity 


DescriDtion 


S each 


Total 



























































C Cfieck enclosed 
Bill rny „ Visa ._ Am fci 
~ Master Charge 
Acct No 



^^ S Eli 



E«o. 



Name 

Address . 
City 



State. 



.Zip. 



MIDWEST COMPUTER PERIPHERALS 

1467 S. NUCHIGAN AVE. 

CHICAGO. IL 60605 



No'Rmooos*i»'o' "vDOa'aD^":* f-a-i P-'CM Si.Bi#c' to Cia-ige ■ 
D'lve Doc- May Hal Be Ai Shftrr 
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WfeVe got It! 

Th« best dg*|y can buy • • • 

If your data is important use quality 
MAXELL disks. 



Buy our year-end special 
('til December 31, 1981). 



All MAXELL certified for single or double density. 



maxell 




MD1 S'A" sector, single-sided 
For TBSSC Sapertxain, Apple 

MH1 574" 16 sectors, single-sided 
For Mtcropoiis Systems 

MH1-10 574" 10 sectors, singl 
For North Star Zenith. 



$29.95 



MD2D 



sector, do 

ForSupe'i 



MD2-10 10 se. 




§44.95 



*t*.*f- 



$41.95 
$54.95 



The Mini-Disks with 



maximum quality. 



Mini Micro Mart, Inc. 

943 W.Genesee St. Syracuse, N.Y. 13204 (315)422-4467 



^S4, 



,'SmLlttoi AtfmtiMOionpagw'ig 
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Why use their flexible discs: 

Athana, BASF, Control Data, Dysan, IBM, Maxell, Nashua, 
Scotch, Shugart, Syncom, 3M, Verbatim or Wabash 

when you could be using 

MEMOREX 

for as low as $1.94 each? 

Find the flexible disc you're now using on our cross reference list... 
then write down the equivalent Memorex part number you should be ordering. 
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Memorex Flexible Discs.. .The Ultimate in Memory Excellence 



Ouainy 

Memorei maarii ouahly products trial you car Oeoend on 
Quality control >I Memorei meani ilarting vitti tne Dosi 
mater'Bls available Continual murw«i1lancv Ihroughout the 
entire manufaclurmg prrxiesE T^e bsnflfhl o< Memcxea's years 
o* enoenence m maonelic media production, resuitinfl tc 
mstarKie m proonaiarycoat-ngloxnutalions The most sofihiv 
Iicaled Eestir^gprocAdures you'll fmd anywhere in tf>ebus>rvesa 

100 Parcant Error Fr«« 

Each and flvery MemorvH f leji'bte Disc is csrtihed Id be 100 
percent erro' free Eacn track o> eacn fleiible ditc it tested. 
indwdusDy to Mentoreis strngeitt standarOs ol eiceNarNce 
Ttiey lost ngnal amptitixM. resolution low-pass modulatio'v 
^emrfite. missing pulse vfrof ar^d eilra pu^aa miror Ttiay afe 
toraue-lesled. and comoeli lively tested on drives aviiiabte 
Irorn Birtiost every ma^ drive mar>utac1u'er in the industry 
ir>cluding drives lltat Memorex rrtanuf acl urers Rig*d Quality 
audits are built mio every sieo o* the manutacluting pipcess 
and stringent testing result >n a slandird of eicellence ttiat 
assures you. our customer, ol a quality dtdOjcI aeiignea for 
mcreased data reliability and consistent top pertormance 

CuetomarOrteolad Packaging 

MemoreK's com mil men t to excellence does not slop *itn a 
quality product Ttiey are proud of tlieir llemble Qisciand ttiey 
package ttiem wiin pride Both their packaging and Itieir 
labeling have Qeen designed with youi ease of idantrficalion 
and use in mind. The desk-lop t>oi containing ten disci is 
convenient for filing and storage Both bo> labels and lacKet 
labels provide full inlormatlon on compatibility, density, lec- 
tofing. and record length Envelooes «lth multi-leriguagecare 
and handling instructions and color-r:oded lemovabJe labels 
are included A write- protect feature i! available To provide 
data security. 

Full One Year Warranty — Your Aaauranca ol Quality 

Memorei Fleiible Discs will be replaced by Memorex if Ihey 
are lound to be defective m malanals or woiii.mans'iip within 
one year of the date of purcFiase Other than replacement. 
Memorei will not be responsiOle for any damages or losses 
lincludrng consequential damagesl riaused by the use ot 
Mamorai Flexible Oisca 



Ouanttty DIacountB AwallaWa 

Mentorex Flexible Discs are pactied 1 dnc* to a canon and 
10 cartons to a case Please ortler only m increments of 100 
units for quantity 100 pncing We are also ■rillir>g to accom- 
modate your smallc orders Ouantilies less than iDOun.iiare 
available m increments o* 10 units at ■ 10^ surcharge 
Ouanttty discounts aie a'so available Order 500 or more 
discs at the same time and deduct 1% 1 .000 or more saves 
you2<^. 2.000 or more saves you 3^ 5.000 or rnore saves you 
4%. 10.000 or more saves you 5%. ZS.OOO or more saves you 
6V SO.OOO or more saves you 7^ and 1 00.000 or n>ore discs 
aarrnyouanS^discountoHDur super low quantity 100 price 
AJmost all Memorei Fleiible Discs are immedislely available 
tiom CE. Our warehouse facifTties are equipped to help us get 
youthequalityproductyouneeO.wtie'iyouneeOil ff you need 
further assistance to lind the tieiibie disc that 9 right lot you 
call the Memorei compatibility hotline Dial SOO-S38-8D80 
and ask for the 'leiib'e disc ho'lrne extension 0997 in Calitomia 
dial B00-6T2 3525 extension 0907 

Buy with Conftdanca 

TogeiihalsarastdtlivervtroiTiCEci'rDur MemorHAFi«iibiaD4Cm s*n{3 
or Dhons yourordtrdirtclir 10 OVf Computei Piachx:lt Pivimion Bm lui# 
locHlculatflyour pnc«umir>at^CE prmei inlht^ id Uichigfemtfidtnli 
pleas* KM '■■« salst tsi Annan purt^aH rvcMis ■'■ aCEIulM tiam 
■pprovw] Qovarnmenf agencws mmi rr>Dtl wall rattd firmt It i 10^ 
■urcharQ« lor n«t 10 billing All salei ara subject to BtfaiiatniiTir. 
■Qcaptince and vanficBlion All ulem ■!■ Iinal Prices tarrnt an<] 
■pacificalions are ftubiecl lo chsnga vnt houl notice t>i[ ol stock ilarni 
will bfl ptBced on t»c«crd*r ■irlomilicAlty unl«H CE is inslik>ct»d 
difltrentiy Uinimum ordflrSSO rX) lnlernaficn«l ordsn arn invitH *itn 
a 120 DOaurchHrQfttorsoAcisl^ndllngina^diTioiiioihiopingrhHrDBm 
All Bhipmenls are F O B Ann Artxn Michigiin No COO'b plwi»s« Morv 
certifiad and toralgn clieclis require D»nl> clearencp 

Mail oriMrs to: CommunlcallDni Elaclronlca Boi lOOf Ann 
Arbor. Michigan 48106 J S.A Add SB 00 par cau or pertisl-caM of 
1CXI i-incn dim or teOO per i:iia ot 100 i''- inch mini-OiKi for 
UPS giaund HhipDina and handling in tha conlinantal U 5 A It you 
have ■ Master Card or Visa card you may c*ii anyiima ind place 
a credit card order Oiter loll-lrH in tha United Sliltl Cin 
anytime 800-521-4414 » you are QursiOs Iha U S or in WK-higir 
dial 313-994.4444 Daslw InqulrlH InilMd All orOe' lines at 
CemmufilcBHons Electronics are iTarted ^4 hours 
Ca«yn«M MHt dHwoenlcBllans ElaclraMc*' 



.a— ^■'■<' 



VISA 



Order TolhFree! 
(800) 521-4414 



In Michigan r3ii 994-4^44 




a 



For Data HeHaUtty— Memorai Flexible Dtaca 

,^263 



COMMUNICATIONS 
ELECTRONICS" 



Computer Products Division 

854 Phoenix u Box 1002 G Ann Arbor. Michigan 481 06 U S.A. 
Call TOLL-FREE (BOO) 531 -441 4 ik oulaida U-LA. {31 3| M4 **41 




* High Resolution! 
' Perfect for TRS-80 

$174.95 
Cat No. 2999 
$155.00 

SOFTWARE SPECIALS 

STARFIGH IKK ADV. INTL. 

Cat No. 3209 Mod 1 . L2, 32K, Disk 

$29.00 

FLIGHT SIMULATOR SUB LOGIC 

Cat No. 2850 Mod 1. L2, 16K, Cass 

$23.00 



REDUCED TO 

$525.00 

CABLE FOR EPSON TO TRS-80 EXP. 
INT. 

Cat No. 3048TR 
$27.95 
TRS-80 KYBD. TO EPSON INTER- 
FACE 

Cat No, 3150 (Complete) 

$89.95 

TRS-80 BOOKS 

BASIC FASTER & BETTER 

Cat No. 3246 

$27.50 

TRS-80 DISK & OTHER MYSTERIES 

Cat No. 2959 

$19.95 

TRS-80 MANUALS Call for info 



HOW TO ORDER 

Mention this ad and WE PAY SHIPPING (UPS ground only). Write or 
phone. Pay by CHECK, M/C, VISA, or COD. (Add $1.40 for COD.) Of- 
fer expires Jan. 1, 1982. 19511 Business Center Dr., Dept V12. 

Northridge. CA 91324 
(800)423-5387 (Outside CA) (213) 866-9200 (Inside CA) 



When in Southern California visit our two retail stores. 



l'f]/\/ELECT7V3NICS 



19511 Business Center Dr. 
Nothridge. CA 91324 



2301 Artcsla 

Redondo Beach, CA 90277 



^SBWfsriW *rf»wi'Wsti''(-JS^ "« 
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MEET THE^MTI FAMILY OF 
LOW COST COMPUTERS 




•CPM 

• WINCHESTER 
HARD DISK 



• 80 X 24 DISPLAY 

• 4Mhz 
OPERATION 



• 90 DAY WARRANTY 

• LOCAL DEALER SERVICE 

• MODEL Ml COMPATIBILITY 



• CPM OPTION 

• GREATER DISK STORAGE 

• 4 Mhz OPTION 
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&3449 

CPU/M ■ 14 OUplay $««>. 
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8v>t«fn. ) J fn»9ab|fl*» V( 
• lofag* ireikidaa a S m^tttft* 
Wincbailar taid disk drWa iM 
10 Hack dual htad dllk flnm 
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vantMHtV tWBPV dMN ooafaltoo 



4 Mhf Spaad-tip •fihancamdnl |14I. 



MTI AUTHORIZED SALES AND SERVICE CENTERS 



Phoaf>l>. AZ 
Sitna Viala. «Z 
Tamoe kZ. . 
Tjcaor. kZ . . . 
Ariahaiir C* . . 
Coaira C* 
Qoiaia. CA 



r«02f 244 9739 
[(1021 49a-}479 
t«0}» a»-9»46 
[«02l 313 999I 
[M4» 773 a}40 
{2131 333 4MP 
(ftOS) «ST-TS3e 



HijntlnstDn Bch .CklfU) a43-134& 



Ino^weod, CA 
Lanoaalar CA 



12131 67}-320t 
19051 S4J ST4T 



SA 



Noitnridtia CA 
Poti Muai*p»a C* 
nvdondo Bch . C* 
Sitr Oiago. CA . . . 
Sar JoM CA. . . . 
Saria Cmt. CA . . 

Vallate. CA 

Walnut CA 
Gfat«r< CT 
Hollyarnod FL 



r3)3i Mf'Oaoo 

[BOSi a«8-333l 
C3U» 37Ca9S» 
[714» 3;9-4243 
[4Qa) 946 t2«S 
(4091 427 0939 
(707) 9B4-rS90 
(714) 994-9311 
13031 449-51M 
13091 eai-ton 



Notuou OA 
BlaCK*09t 10 

CoMiiftviita IL 
ftlit*vapo*l LA 
Anoka. UN. . 
jDpkrt. uo. . 
MMMWia MT . . 
R4t4»Qf< NC 
Card FcMla HO 
Jarieda HV . . . . 



1404) 449-9912 
«3I») ^99-1497 
1919] S4S-S0e« 
(310) e«9-7993 
l«il) 437'9?93 
(417) 791-IT49 
[409) M9-9T1S 
tS1») TS9-11T9 
I7Cn 773-7849 
[fi19» B97-9W9 



U«rM*aa«I.HV 

IlD» HI 

UMK<at OH 
Oaiiaa TX 
Ctiayanna WV 
Ua«kai>. IC 



[9t9l 9«9-ft33S 
[919) 3T3-ft411 
[4191 8«3-42e9 
(314) 141 •ft79 
|307t 613 9133 
(7l4j3i7 471T 



ovensEAs 

AuaU9i>« 3«77-«94e 

eai|ium 1693-3493 

Rap el S««tli Ainca 214S-I04T 



MICROCOMPUTER TECHNOLOGY INC. 

3304 W MACARTHUP, SANTA ANA. CA 92704 
(714) 979 9923 • TELEX C7a0401 TABIRIN 



Call or trm* *0' 'raa Ittocdu'ai 

US MtiCES roi santa aha 

CAitrOANU ANO WAV VARY It AKA 




I 




*l 



Frustrating isn't it! No matter how 
much you speed up your program 
it still seems to take forever to save 
data onto a cassette. Wouldn't it 
be great if sraneone could design a 
mass storage system with the speed 
of a disk, hut al half the cosf 
Exairon did. the Exairon Stringy 
floppy (ESF) . 

Totally self-contained, the FSF 
is an extremely fast, rehablc. and 
economical alternative to cassette 
or disk storage of programs or 
data. All of the ESF's operations 
arc under the computer's control, 
with no buttons, switches, knobs or 
levers to adjust or forget. 

The ESF uses a mmiature tape 
cartridge, about the size of a busi- 
ness card, called a wafer. The 
transport mechanism uses a direct 
drive motor with only >nc moving 
part. Designed to read and write 



digital data only, the ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, for the TRS-80. Apple. 
PEZ OS! and an RS 232 unit 
Even the slowest of the units is 15 
times faster than a cassette, and all 
are as reliable as disk drives - in 
fact a lot of users say they are more 
reliable* 




excellence m electronics 

exatron 



To get further information about 
the ESF give Exatron a call on 
their Hot Line 800-538 8559 
(inside California 40R-737 7 M I ). 

[f you can't wait any longer then 
take advantage of their 30 day 
money-back guarantee, you've 
nothing to lose but time! 

181 Commercial Street 
Sunnyvale, CA 94086 
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